func1p4.cpp
上传用户:zhdd911129
上传日期:2007-05-11
资源大小:722k
文件大小:1k
源码类别:

matlab例程

开发平台:

Matlab

  1. //Interpolate,using Langrang Methom
  2. #include <iostream.h>
  3. //Langrange polynomial
  4. double LP(double x,double *ax,double *ay,int n)
  5. {
  6. double sum=0,Tsum=1;
  7. int i,j;
  8. for (i=0;i<n;i++)
  9. {
  10. for (j=0;j<n;j++)
  11. {
  12. if (j!=i)
  13. Tsum=Tsum*(x-ax[j])/(ax[i]-ax[j]);
  14. }
  15. sum=sum+Tsum*ay[i];
  16. Tsum=1;
  17. }
  18. return sum;
  19. }
  20. void main()
  21. {
  22. double ax[]={1,2,3,4,5,6,7,8,9,10,11,12},ay[]={12,234,34,-1,34,2,5,23,34,9,45,23},x1=6.5,x2=11.2;
  23. int n=12;
  24. cout<<"The value at 1st point is: "<<LP(x1,ax,ay,n)<<endl;
  25. cout<<"The value at 2nd point is: "<<LP(x2,ax,ay,n)<<endl;
  26. cin>>n;
  27. }
  28. //运行结果:p(6.5)=-2.5738,p(11.2)=112.379
  29. //与表中原有数据比较,发现其偏离极其之大,Runge现象非常显著
  30. //即使在离插值点靠近的点,p(6.01)=1.7629,p(11.01)=47.7551,变化幅度非常的大
  31. //可见对于该函数,并不适用多项式高次插值