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

Wolfram mathematica 无法在Show中组合图形对象[,wolfram-mathematica,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,

我在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}
 ]

这可能是因为我无法将ParametericPlot3D与Show结合使用吗?

我认为您正在尝试将2D
ListLinePlot
与3D
ParametericPlot3D
结合使用。阅读
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
,然后将
参数绘图3D