懸垂傭
ParametricPlot3D[{1/2(Exp[u]+Exp[-u])Cos[v],1/2(Exp[u]+Exp[-u])Sin[v],u},{u,-1.5,1.5},{v,0,2Pi}]
3
ここをクリックすると動く3D画像が見られます。(Netscape 4.0 以上)