Create each animation below using only Maple commands and packages we have discussed. Make sure each animation is slow enough to discern each frame comfortably.

• Create an animation for the function sinx, x=0..2Pi. Move the sine wave over 8Pi. Use the plots[animate]() function.

> plots[animate](sin(x+t), x=0..2*Pi, t=0..8*Pi, frames=100, color=blue);

• Create a animation to illustrate the differences between line thicknesses in Maple. After the thicknesses, illustrate line styles. Note: you will have to create multiple animations and string them together. (Bonus: Add the line thickness and style to the animations. You will have to use plottools[textplot]().)

> lt:=display(seq(plot(x^2, x=-3..3, 0..5, thickness=t)$10, t=0..3), insequence=true):

> ls:=display(seq(plot(x^2, x=-3..3, 0..5, linestyle=t)$10, t=0..4), insequence=true):

> display(lt,ls,insequence=true); #This satisfies the question. The rest is for the bonus. We will go over this in more detail in the next lesson.

> tlt:=display(seq(textplot([2, 1, convert(t, string)])$10, t=0..3), insequence=true): #Generate text animation for line thickness. (2,1) is a random point I picked. t is the line thickness, but textplot wants a string, not an integer, so we have to convert t to a string. (If you're using Maple 6, it will automatically convert so you won't have to use the convert() command.)

> tls:=display(seq(textplot([2,1,convert(t,string)])$10,t=0..3),insequence=true): #Ditto for linestyle

> display(display(lt, ls, insequence=true), display(tlt, tls, insequence=true)); #We are displaying the animation display (which is animating) and the text display (which is also animating). Since we didn't use insequence=true at the end, they both play at the same time.

Close Window