| 查看: 472 | 回复: 1 | ||
onexf金虫 (小有名气)
|
[求助]
求助Plot3D图
|
|
我想做一个关于y=l^2*m^2 + m^2*n^2 + n^2*l^2的三维图，其中l,m,n为三个基矢，用mathematica作图出现了一不对称的现象，存在奇点，请高手给看看： l = Cos[a] Sin [ b ]; m = Sin[a] Sin [ b ]; n = Cos [ b ]; y = l^2*m^2 + m^2*n^2 + n^2*l^2; SphericalPlot3D[y, {a, 0, 2 Pi}, {b, 0, Pi}] 图如下：   他人的结果如下：  |
回复此楼» 猜你喜欢
投稿精细化工
已经有6人回复
-
博士读完未来一定会好吗
已经有36人回复
-
之前让一硕士生水了7个发明专利，现在这7个获批发明专利的维护费可从哪儿支出哈？
已经有10人回复
-
博士申请都是内定的吗？
已经有9人回复
-
心脉受损
已经有8人回复
-
读博
已经有5人回复
» 本主题相关价值贴推荐，对您同样有帮助:
软件作3D图求助~~~
已经有6人回复- 【求助】帮忙作一个图~
已经有16人回复
- 【求助】请教一个matlab程序，谢谢帮忙！！
已经有15人回复
- 【求助】请问如何在origin中做出三维曲线图
已经有9人回复
- 【求助】关于3D模型，plot-xy问题
已经有8人回复
- 【求助】怎样将图中毛糙的边改成光滑的边呢？
已经有4人回复
- 【求助】如何画三维图
已经有13人回复
- 【求助】origin几个三维图如何叠在一起
已经有6人回复
- 【求助】Siesta中如何画电荷密度图
已经有9人回复
- [求助]什么软件可以做带误差棒的3D bar 图 ?
已经有10人回复
【答案】应助回帖
★ ★
微尘、梦想(金币+2): 谢谢回复！ 2011-05-01 18:22:29
onexf(金币+10): xx! 2011-05-01 21:18:23
微尘、梦想(金币+2): 谢谢回复！ 2011-05-01 18:22:29
onexf(金币+10): xx! 2011-05-01 21:18:23
|
your Mathematica code is (almost) correct. All you need to change in your code is the last line: simply switch a and b! Your code: SphericalPlot3D[young,{a,0,2Pi},{b,0,Pi}] Corrected version: SphericalPlot3D[young,{b,0,2Pi},{a,0,Pi}] |
2楼2011-05-01 13:19:33