Dear Maple users
I like to use animations in Maple for different educational purposes. The other day I tried making an animation simulating a simplified Epicycle, which is a small circle with its centre running on a larger circle. The smaller one has a ball running on it with a constant velocity. I used the following code:
> with(plots);
> with(plottools);
> omega := 1; k := 5; R := 5; r := 2;
>
> plot1 := plot([R*cos(omega*t), R*sin(omega*t), t = 0 .. 2*Pi]);