Přívěšky
> | with(plots): |
Warning, the name changecoords has been redefined
> |
> | r1:=4-4*sin(t); |
> | r2:=3-4*sin(t); |
> | r3:=2-4*sin(t); |
> | p1:=plot([r1,t,t=0..2*Pi],coords=polar,color=blue): |
> | p2:=plot([r2,t,t=0..2*Pi],coords=polar): |
> | p3:=plot([r3,t,t=0..2*Pi],coords=polar,color=green): |
> | display([p1,p2,p3]); |
> | animate( [(4-a)-4*sin(t),t,t=0..2*Pi], a=0..8,coords=polar,frames=60,numpoints=100); |
> | animate( [(5-a)-4*sin(t),t,t=0..2*Pi], a=0..10,coords=polar,frames=60,numpoints=100); |
> |
> |