請用Mathematica製作橢球面的圖形

2021-03-03 21:38:47 字數 1337 閱讀 5423

1樓:

參照我在前面的回答,

下面專門給你寫了個函式,一次性畫出10個不同的隨機橢球形內。由於是隨機的,每次生成的容一組10個橢球都不一樣。

f[a_, b_, c_] :=

parametricplot3d[, , ];

table[ = ], random[real, ], random[real, ]}; f[a, b, c], ]

直接複製貼上執行。

怎樣用mathematica製作橢球面的圖形

2樓:紅色の新月

manipulate[

parametricplot3d[, , ], , 0,1}, , 0, 1}, , 0, 1}]還是用這個更直觀吧,呵呵。而且x1,x2沒有一目了然的含義,專我這裡換成屬

傳統的theta和phi了~~

3樓:

首先執行

f[a_, b_, c_] :=

parametricplot3d[, , ];

取不同的baia,b,c可以看到du不同形狀的橢zhi球。比如,執行f[1,1,1]

將看到一dao個版正球權體。

執行f[1, 1, 1/2]

將看到乙個

扁扁的球體。

將看到乙個

mathematica如何計算橢球面面積

4樓:匿名使用者

被你帶進去了,橢球體表面積計算原來是非常複雜,建議你參考:

三軸橢球表面積的計算

su***ce area of an ellipsoid這個人還真用mathematica 計算了: the su***ce area of an ellipsoid

這裡推出乙個簡單的公式,我不知道對不對,su***ce integral over ellipsoid,結果是:

j=4π(ab/c+bc/a+ca/b)/3 .

x^2 y^2 z^2-yz=1的圖形,我知道它是橢球面,怎麼化成標準式?有圖形最好

5樓:文倩倩

>> [phy,sita]=meshgrid([0:0.05*pi:

pi],[0:0.05*pi:

2*pi]);>> x = 7*sin(phy).*cos(sita);>> y = 7*sin(phy).*sin(sita);>> z = 7*cos(phy);>> mesh(x,y,z)>> axis equal。

Mathematica如何繪製引數方程命令和格式是什麼

在mathematica裡面輸入parameterplot按f1就可bai以獲得du它的幫助文件,裡面有詳zhi細介紹dao 或者?parameterplot然後執行內 即按shift和enter鍵 也可以。容 parameterplot是引數作圖,詳細介紹見幫助文件,畫上面的圓圈的話,可以參看其第...

mathematica計算真的好慢好慢,是電腦太挫嗎還是程式太糙?求高手解答

青衣瓦屋 我猜這是projecteular上面的第64題吧?我的 是 select continuedfraction sqrt range 10000,length 1 oddq length last length timing 用時25秒。既然用mathematica,儘量多用現成的內建函式吧...

Mathematica上次這個組合輸出不知是哪裡有點問題

因為數量多時不容易隨機到符合要求的列表就不斷重複計算。修改一下。f s k1 k2 module label begin lis select randomsample deleteduplicates deletecases flatten outer list,s,s 1 1 2 1 rever...