Question: Problem with PLOT(ANIMATE... and the use of seq

Hi everybody

 

> points := t -> evalf([(1+cos((1/180)*t*Pi))*cos((1/180)*t*Pi), (1+cos((1/180)*t*Pi))*sin((1/180)*t*Pi)]) ;

> points(0);

                                  [2., 0.]
> points(90);

                                  [0., 1.]
> PLOT(POINTS(seq(points(i), i = 0 .. 90)));# OK!

> PLOT(ANIMATE(POINTS([[0, 0], seq(points(i), i = 1 .. t)]), t = 1 .. 90));

Error, unable to execute seq

> L := n -> seq(points(i), i = 1 .. n);

                    L := n -> seq(points(i), i = 1 .. n)
> L(1);

                        [1.999543109, 0.03490215479]
> L(2);

         [1.999543109, 0.03490215479], [1.998172852, 0.06977773357]
> L(3);

        [1.999543109, 0.03490215479], [1.998172852, 0.06977773357], 

          [1.995890483, 0.1046001879]

Why Maple cannot execute the seq?

Mario

 

 

 

 

 

Please Wait...