如何用mathematica繪製三維空間連續200步沿網格點的隨機遊走圖

1樓：

隨手貼一個自己的演算法

randomwalk3d[n_] :=

module[,

xrand = 0;

yrand = 0;

zrand = 0;

randompointlist = };

for[k = 1, k <= n,

k++, \[phi] = randomreal; \[theta] =

randomreal; xrand = xrand + sin[\[theta]] cos[\[phi]];

yrand = yrand + sin[\[theta]] sin[\[phi]];

zrand = zrand + cos[\[theta]];

graphics3d

然後執行randomwalk3d[200]就行了

2樓：匿名使用者

你這個問題畫圖是次要的，你先想想怎麼產生隨機遊走的三維座標。如果你隨機遊走的座標已經已經產生出來了，畫圖只要兩個函式就可以了，假設你的遊走座標是一個list，只要用plot3d函式配合畫折線的函式就可以了。你更大的問題應該是怎麼產生這樣的三維座標列表才對吧。

3樓：匿名使用者

gedian=tuples[, 3];

steps=accumulate[table[gedian[[randominteger]], ]];

graphics3d[line[steps]]

mathematica畫三維曲面 30

4樓：匿名使用者

matlab很容易,我以前用mathematica,現在完全轉到matlab了,建議用matlab,隨便一個網上教程上都有

5樓：匿名使用者

我經常用的是以bai下函式：

plot3d:用於du顯zhi式曲線：z=f（x，y）countorplot3d:用於隱函式的繪dao制

parametricplot3d：用於繪製引數曲線具體內用法容的話參照mathematica的幫助文件，其實他本身的文件就介紹得很詳細了，不需要看其他書籍，不過這東西主要還是自己折騰，說不了太多，哈哈