1.During your laboratory class, you have created multiplots( one figure containing several plots)and animations using these multiplots.
   Using your own function, create at least one set of multiplot(static) and animations.
   Use as many options as possible to make your plot look like textbooks quality plots.

>

restart;

>	with(plots):

Warning, the name changecoords has been redefined

>	y:=A^2*cos(f*theta);

>	subs(A=1,f=1,y);

>	p1:=plot(subs(A=1,f=1,y),theta=0..2*Pi,colour='blue',legend="f=1"):p1;

>	p2:=plot(subs(A=1,f=2,y),theta=0..2*Pi,colour='gold',legend="f=2"):p2;

>	p3:=plot(subs(A=1,f=3,y),theta=0..2*Pi,colour='green',legend="f=3"):p3;

>	p4:=plot(subs(A=1,f=4,y),theta=0..2*Pi,colour='maroon',legend="f=4"):p4;

>	display({p1,p2,p3,p4});

>	animate(subs(A=1,y),theta=0..2*Pi,f=1..4,title="A^2*cos(f*theta)", font=[TIMES,BOLD,15],thickness=4,color=maroon);

2.  Your artistic skills :Draw a unique picture using Maple.

restart;

>	with(plots):

>	plot([cos(1*t)*cos(2*t)*sin(3*t),cos(3*t)*cos(2*t)*sin(1*t),t=0..100], title="cos(1*t)*cos(2*t)*sin(3*t),cos(3*t)*cos(2*t)*sin(1*t)function",color=blue,thickness=4);

3.Make two unique animations in 2D and 3D.

>

restart;

>	with(plots):

Warning, the name changecoords has been redefined

a)Animation in 2D.

>

y=u*t,t;

>	animate( [u*t,t,t=1..8*Pi], u=1..4,coords=polar,frames=60,numpoints=100,color=gold,thickness=5 ,title="u*t,t function",font=[TIMES,BOLD,12]);

>

b)Animation in 3D.

>

>	a:=x,y,(1.3)^x * sin(u*y);

>	animate3d([x,y,(1.3)^x * sin(u*y)],x=1..3,y=1..4,u=1..2,coords=spherical);

>

>