怎样用mathematica 5.0 画双叶双去曲面和双曲抛物面(我要程序)

正确的必加分
2025-05-19 13:42:56
推荐回答(1个)
回答1:

我用的是7画的,所以下面给出的程序可能在5里不能正常使用
双叶双曲面用的参数方程画的:
a = 4; b = 3; c = 5;
x = a Tan[u] Cos[v]; y = b Tan[u] Sin[v]; z =
c Sec[u]; ParametricPlot3D[{x, y, z}, {u, 0, 2 Pi}, {v, 0, 2 Pi}]
上面的程序在5里面应该正常
下面的用的是隐函数作图:
ContourPlot3D[x^2/a^2 + y^2/b^2 == z, {x, -4, 4}, {y, -4, 4}, {z, 0, 3}]
这个可能在5里面不能用。你可以在5里面找有关隐函数作图的函数代替ContourPlot3D(这个函数是6里新加的)
当然你也可以把下面的程序也用参数画出来。两种方法是一样的,只是用的不同的方程形式。