如何用Mathematica作球体

ParametricPlot3D[{Sin[u]*Cos[v],Sin[u]*Sin[v],Cos[u]},{u,0,pi}，{v,0,2pi}]

你说的是做图吗？你可以用球坐标试试。用PLOT就可以画出来了!加上三个坐标的定义域，大小可以由R坐标控制！