您现在的位置是:源码地带 > 资源下载

lagr.m

  • 上传时间: 2020-06-09
  • 上传用户:shiyc2020
  • 资源积分:2 下载积分
  • 标      签: lagr

资 源 简 介

function y=lagr(x0,y0,x)

%x0,y0为节点

%x是插值点

n=length(x0);
m=length(x);

for i=1:m

z=x(i);

s=0.0;

for k=1:n

p=1.0;

for j=1:n

if j~=k

p=p*(z-x0(j))/(x0(k)-x0(j));

end

end

s=p*y0(k)+s;

end

y(i)=s;

end

相 关 资 源