function Ys=langr(X,Y,Xs)%拉格朗日插值n=length(X);nl=length(Xs);
for i=1:nl x=Xs(i); s=0; for j=1:n p=1; for k=1:n if k~=j p=p*(x-X(k))/(X(j)-X(k)); end end s=s+p*Y(j); end Ys(i)=s;end
这个应该行吧,对给定的一组数据,求插值点的值