Polynôme d'interpolation de Lagrange MATLAB
Résolu/Fermé
gumuslive
Messages postés
48
Date d'inscription
jeudi 14 août 2008
Statut
Membre
Dernière intervention
21 mars 2014
-
23 déc. 2008 à 10:52
Mourad. H - 22 mars 2016 à 21:18
Mourad. H - 22 mars 2016 à 21:18
4 réponses
normalement voici le programme
function []=fonc_lagrange(a,x,y)
dif= fopen('lagrange.res','w');
n=length(x)
p=0;
l=1;
for i=1:n;
for j=1:n;
if j~=i
l=((a-x(j))/(x(i)-x(j))*l);
end
end
fprintf(dif,'%d\n',l);
fprintf(dif,'%d\n',a);
disp(['lag(',num2str(i),')=',num2str(l)])
t=(y(i)*l);
end
p=p+t;
disp(['Pn(',num2str(a),')=',num2str(p)])
fprintf(dif,'%d\n',p);
fclose(dif);
function []=fonc_lagrange(a,x,y)
dif= fopen('lagrange.res','w');
n=length(x)
p=0;
l=1;
for i=1:n;
for j=1:n;
if j~=i
l=((a-x(j))/(x(i)-x(j))*l);
end
end
fprintf(dif,'%d\n',l);
fprintf(dif,'%d\n',a);
disp(['lag(',num2str(i),')=',num2str(l)])
t=(y(i)*l);
end
p=p+t;
disp(['Pn(',num2str(a),')=',num2str(p)])
fprintf(dif,'%d\n',p);
fclose(dif);
23 janv. 2010 à 19:01
19 mai 2015 à 22:50
27 déc. 2011 à 14:03
22 oct. 2014 à 12:14