[問題] XYZ數據 3D動畫圖
對於Manipulate動畫的用法，想請教版上大大
目前我有兩組數據，皆是矩陣形式
ex: data1={{0,0,1},{0,1,0},{{0,0,1}}
data2={{0,1,0},{0,0,1},{{1,0,0}}
其個別表示X,Y,Z的值，兩組DATA的數據量相同，且對應同個時間
我利用以下程式碼，畫出在球面上的行進軌跡
data1 = SetAccuracy[DAT1, 10]
Fig1 = Graphics3D[{Thick, Blue, Line[data1]}, Axes -> True,
BoxRatios -> Automatic, BoxStyle -> Directive[Dashed]];
Fig2 = Graphics3D[{Lighter[Yellow], Opacity[0.05],
Sphere[{0, 0, 0}, 1]}];
Fig3 = Graphics3D[{Dashed, Line[{{0, 0, 0}, {0, 0, 1}}]}];
Fig4 = ListPointPlot3D[data1, PlotStyle -> {Red, PointSize[Large]}];
FigS1 = Show[Fig1, Fig2, Fig3, Fig4]
目前有得出兩個DATA的行進軌跡3D圖
現在想把兩個圖合在一起，並且能觀察兩軌跡的相對位置
不知是否能做出這種動畫??
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.123.72.221
※ 文章網址: http://www.ptt.cc/bbs/Mathematica/M.1415182098.A.D66.html
Mathematica 近期熱門文章
PTT數位生活區 即時熱門文章
