4.3 极坐标曲线动画

例 4.3.1 作出以下极坐标曲线的动画。 解 输入以下命令： with(plots): a:=1: b:=3: r:=a* sin(b* t): K:=30: for i from 1 to K do ti:=i* 2*Pi/K: quxian[i]:=polarplot(r(t), t=0…ti) od: L:=display(seq(quxian[i],i=1…K), insequence=

>>阅读原文<<