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=

>>阅读原文<<