无法在Show中组合图形对象[

时间:2018-05-20 14:29:11

标签: wolfram-mathematica

我为Show方法收到此错误,为什么? :/

sol = First@
  NDSolve[{eq1ad, eq2ad, eqrad} U CondizioniIniziali, {q1, q2, 
    qr}, {t, 0, T}]

p1 = ParametricPlot3D[
  {xE, yE, zE} /. sol,
  {t, 0, T},
  AxesLabel -> {"x[t]", "y[t]", "z[t]"},
  BoxRatios -> {1, 1, 1},
  PlotStyle -> Red
  ]    

Manipulate[
 Show[
  p1,
  ListLinePlot[
   {{0, 0, 0}, {xB, yB, zB}, {xE, yE, zE}} /. sol /. t -> time,
   PlotStyle -> {Thick, Red}
   ]
  ],
 {time, 0, T}
 ]

是否可能因为我无法将ParametricPlot3d与Show?

组合在一起

1 个答案:

答案 0 :(得分:0)

我认为您正在尝试将2D ListLinePlot与3D ParametricPlot3D结合使用。阅读ListLinePlot的文档似乎表明它只接受2D点,而不是3D点。

你或许可以适应这样的事情

T=2;
p1 = ParametricPlot3D[{Sin[t],Cos[t],t^2}, {t,0,T}];
Show[p1, Graphics3D[ Line[{{0, 0, 0}, {1/2,1/2,2}, {1/3, 1/3,3}}]]]

可以将3D点列表转换为LineGraphics3D,然后合并你的ParametricPlot3D