> |
> | with(plots): |
Warning, the name changecoords has been redefined
> | sinewave := plot( sin(x)*exp(-x/5), x=0..20 ): animate( pointplot, [ [[t, sin(t)*exp(-t/5)]], symbol=circle, symbolsize=20], t=0..20, frames=60, background=sinewave ); |