Bonsoir, je souhaiterais tracer la courbe de la fonction suivante sous Maple ou Maxima :



Sous Maxima, j'ai écrit :

f(t):=exp(-49)*(sum(49^n*cos(t*sqrt(n+1)) ^4/factorial(n), n = 0 .. infinity));
plot2d(f(t), [t,0,50];

Et ça ne fonctionne pas. Sous Maple, j'ai écrit :

plot(exp(-49)*(sum(49^n*cos(t*sqrt(n+1)) ^4/factorial(n), n = 0 .. infinity)), t = 0 .. 50);

Une courbe est tracée au bout de 5 minutes mais juste quelques traits, et pas du tout celle que j'attends. Pourriez-vous m'aider à la tracer à l'aide d'un des deux programmes ?

Merci !