Bonjour je vous contacte car je suis bloqué sur un problem de function recursive, je code tout correctement mais maple me met un message d'erreur que je ne comprends pas :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
restart;
a := proc (n::nonnegint, r) 
option remember; 
if n = 0 then 
1;
elif n = 1 then
0;
else
-(r+n-1)*(r-n+2)*a(n-2)/(n*(n-1)) 
end if;
end proc;

Y1 := proc (x, N) 
local s, n, r; 
s := 0.;
r:=4.5;
for n from 0 to N do 
s := s+a(n,r)*x^n 
end do 
end proc;

with(plots);
p1 := plot(Y1(x, 0), x = -2 .. 2, y = -3 .. 3, color = red);
%;
p2 := plot(Y1(x, 2), x = -2 .. 2, y = -3 .. 3, color = green);
%;
p3 := plot(Y1(x, 4), x = -2 .. 2, y = -3 .. 3, color = blue);
%;
Error, (in a) invalid input: a uses a 2nd argument, r, which is missing

p4 := plot(Y1(x, 6), x = -2 .. 2, y = -3 .. 3, color = magenta);
%;
Error, (in a) invalid input: a uses a 2nd argument, r, which is missing
display(p1, p2, p3, p4);
%;
Error, (in plots:-display) expecting plot structure but received: p3
a(0, 4.5);
print(`output redirected...`); # input placeholder
                               1
a(2, 4.5);
print(`output redirected...`); # input placeholder
                          -12.37500000
a(4, 4.5);
%;
Error, (in a) invalid input: a uses a 2nd argument, r, which is missing
Comme vous pouvez le voir j'ai pris ma fonction récursive a(n,r) a part et j'ai essayé de voir ce qui n'allait pas mais je comprends pas pourquoi il me met r est manquant. Je lui mets sous le nez !

Voici l'énoncé du probleme :