Question: multiple animations

A student in my PDE class asked about having two functions in animation at the same time. Here is how I suggested doing this: > f:=(t,x)->sin(t)*x*(1-x); > g:=(t,x)->cos(t)*x*(1-x); > N:=50; > for n from 0 to N do J[n]:=plot([f(2*Pi*n/N,x),g(2*Pi*n/N,x)],x=0..1): od: n:='n': > plots[display]([seq(J[n],n=0..N)],insequence=true); Is there a simpler way? Jim Herod
Please Wait...