牛顿插值法的matlab实现

shizhe-annibaby

function a=new(c,k) * D' ]# k1 R* U[x,y]=size(c); k$ _ H$ `; o; x9 `. p" P E b=zeros(x,2+k); 0 z8 J# P9 z6 o. U. y; F; d' Y for i=1:x for j=1:2 : R( N9 Z" Y* C6 E b(i,j)=c(i,j); 5 }% m( s4 G- i+ r/ r end % O5 Y' F# Z2 @4 r end Y% ~2 Q4 D3 p- b) i for j=3:2+k for i=j-1:x + S, y8 V$ r$ |1 s. C# h b(i,j)=(b(i,j-1)-b(i-1,j-1))/(b(i,1)-b(i-j+2,1)); . ^0 a" o$ Q. K q1 }; m# t end end . J+ x' K" s; r; q a=b

* g- z1 t, A6 W- m% y; J6 k9 U

function fx=newton(c,x,k) . u* j+ ^9 K8 f3 ]% v b=new(c,k); : } `6 u0 g- {7 B' I4 F& | [p,q]=size(b); ! d7 q/ H3 j$ \, q6 Q4 V! h8 ^0 V fx=0; " F/ `" \2 a( m/ j& ~ for i=1:p t=b(i,i+1) " N; S! M) X5 e" \+ z, |% H for j=1:i-1 $ R4 ?& }3 o5 E: h; {: t# c; z3 @ t=t*(x-b(i-1,1)); 0 C% c5 P5 z. [) O0 m end + [; Q5 {0 h% Q& k ~& q0 C fx=fx+t; 7 u4 [& M% W" j& _ end 5 [7 e7 i7 H% @* ^$ { p3 F fx

zysh666666

是什么程序呀?C语言吗?看不懂.[em06]

coolistone

顶顶顶顶顶顶顶顶顶顶顶顶得到！

540215460

什么东东呀

lyztt1234

看不太懂                        

lyztt1234

有没有手算的算法                  

lyztt1234

没有tilia              
% }  n5 e3 M# e: [

lyztt1234

看不太懂啊，怎么                 
! ~) {& o1 o. M) m* z  [