坐标面上的平面曲线绕坐标轴旋转形成的旋转曲面的动画。
例 4.4.1 作出yOz坐标面上的抛物线
绕 z 轴旋转一周得到的旋转曲面的动画。
解 旋转曲面的方程是
旋转曲面的参数方程是:
下面用参数方程作动画。
输入以下命令:
with(plots):f:=u^2:K:=20:
for i from 1 to K do ti:=i* 3* Pi/K:
qumian[i]:=plot3d([u* sin(t),u* cos(t),f(u)],u=0…2,t=0…ti) od:
L:=display(seq(qumian[i],i=1…K), insequence=true):
display(L, L, scaling=constrained, axes=normal,
lightmodel=light2, orientation=[40,70], tickmarks=[2,2,4]);
输出动画(旋转抛物面):
输入以下命令:
with(plots): f:=u^2:K:=20:
for i from 1 to K do ti:=i* 3* Pi/K: