为什么这样不行？。。。帮我写个代码吧。。谢~~~~~~~~~~~~~~~
在mathematica中怎么画4x^2+y^2-z^2=4的图像？
答案:2 悬赏:60
解决时间 2021-03-14 20:06
- 提问者网友：醉归
- 2021-03-13 20:56
最佳答案
- 二级知识专家网友：嗷呜我不好爱
- 2021-03-13 21:30
ContourPlot3D[
4 x^2 + y^2 - z^2 == 4, {x, -10, 10}, {y, -10, 10}, {z, -10, 10},
Mesh -> None,
ContourStyle ->
Directive[FaceForm[Red, Green], Specularity[White, 10]],
Boxed -> False, PlotPoints -> 40]
我这个画的最漂亮
4 x^2 + y^2 - z^2 == 4, {x, -10, 10}, {y, -10, 10}, {z, -10, 10},
Mesh -> None,
ContourStyle ->
Directive[FaceForm[Red, Green], Specularity[White, 10]],
Boxed -> False, PlotPoints -> 40]
我这个画的最漂亮
全部回答
- 1楼网友：瘾与深巷
- 2021-03-13 22:20
这道题有两种方法，一种是用parametricplot3d化为球坐标系，这个比较麻烦
因为它是双曲函数y^2-z^2=1绕z轴旋转得到的。不太好化,还有就是合并两张图
pho1=plot3d[(x^2+y^2-1)^0.5,{x,-10,10},{y,-10,10},plotrange->automatic];
pho2=plot3d[-(x^2+y^2-1)^0.5,{x,-10,10},{y,-10,10},plotrange->automatic];
show[pho1,pho2]
你自已可以调试下，大概就是这样的，而且你又没有给悬赏分。
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯