怎么用mathematica画x^2+y^2-z^2=1的图形？

这道题有两种方法，一种是用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]
你自已可以调试下，大概就是这样的，而且你又没有给悬赏分。