Graphic | Animation | Artwork | Maple | Vrml
|Maple |
Ø
p1:=plot(subs(A=2,B=1,f=1,y),theta=0..2*Pi,color=blue,legend="f=1",thickness=4):p1;
p2:=plot(subs(A=0.5,B=2,f=1,y),theta=0..2*Pi,color=brown,legend="f=2",thickness=4):p2;
Ø
p3:=plot(subs(A=3,B=2,phase=2*Pi,f=1,y),theta=0..2*Pi,color=green,legend="f=3",thickness=4):p3;
p4:=plot(subs(A=3,B=.5,f=2,y),theta=0..2*Pi,color=red,legend="f=4",thickness=4):p4;
Ø
display({p1,p2,p3,p4});
Ø
animate(subs(A=3,B=2,y),theta=0..2*Pi,f=1..5,color=gold,style=
point,
symbol=box,thickness=4);
d:=A*cosh(f*theta);
> subs(A=4,f=4,d);
> 4*cosh(4*theta);
plot(subs(A=3,f=5,d),theta=0..2*Pi,colour=blue,style=point,legend="f=2.5");
| Artwork |
> a:=15*cos(4*d)*sin(5*d)+15*cos(5*d)*sin(4*d);
b:=12*sin(4*d)+12*cos(5*d)+sin(2*d)*cos(3*d); plot([a,b,d=-100..100],axes=NONE,color=gold);
> plot3d(sin(x*y),x=-50..50,y=-50..50,scaling=
unconstrained,style=patch,orientation=[-10,40],grid=[5,5]);
Profiles | Articles & Journals | Assignment | Classmates | Acknowledgement |
powered by :
annasr85