数值分析实验报告-插值、三次样条.doc

数值分析实验报告-插值、三次样条.doc

ID:56759361

大小:355.50 KB

页数:6页

时间:2020-07-07

数值分析实验报告-插值、三次样条.doc_第1页
数值分析实验报告-插值、三次样条.doc_第2页
数值分析实验报告-插值、三次样条.doc_第3页
数值分析实验报告-插值、三次样条.doc_第4页
数值分析实验报告-插值、三次样条.doc_第5页
资源描述:

《数值分析实验报告-插值、三次样条.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、实验报告:牛顿差值多项式&三次样条问题:在区间[-1,1]上分别取n=10、20用两组等距节点对龙格函数作多项式插值及三次样条插值,对每个n值,分别画出插值函数及的图形。实验目的:通过编程实现牛顿插值方法和三次样条方法,加深对多项式插值的理解。应用所编程序解决实际算例。实验要求:1.认真分析问题,深刻理解相关理论知识并能熟练应用;2.编写相关程序并进行实验;3.调试程序,得到最终结果;4.分析解释实验结果;5.按照要求完成实验报告。实验原理:详见《数值分析第5版》第二章相关内容。实验内容:(1)牛顿插值多项式1.1当n=10时:在Matlab下编写代码完成计算和画图。结果如下:

2、代码:clearallclcx1=-1:0.2:1;y1=1./(1+25.*x1.^2);n=length(x1);f=y1(:);forj=2:nfori=n:-1:jf(i)=(f(i)-f(i-1))/(x1(i)-x1(i-j+1));endendsymsFxp;F(1)=1;p(1)=y1(1);fori=2:nF(i)=F(i-1)*(x-x1(i-1));p(i)=f(i)*F(i);endsymsPP=sum(p);P10=vpa(expand(P),5);x0=-1:0.001:1;y0=subs(P,x,x0);y2=subs(1/(1+25*x^2),x

3、,x0);plot(x0,y0,x0,y2)gridonxlabel('x')ylabel('y')P10即我们所求的牛顿插值多项式,其结果为:P10(x)=-220.94*x^10+494.91*x^8-9.5065e-14*x^7-381.43*x^6-8.504e-14*x^5+123.36*x^4+2.0202e-14*x^3-16.855*x^2-6.6594e-16*x+1.0并且这里也能得到该牛顿插值多项式的在[-1,1]上的图形,并和原函数进行对比(见Fig.1)。Fig.1牛顿插值多项式(n=10)函数和原函数图形从图形中我们可以明显的观察出插值函数在两端点处

4、发生了剧烈的波动,产生了极大的误差,即龙格现象,当n=20时,这一现象将更加明显。1.2当n=20时:对n=10的代码进行修改就可以得到n=20时的代码。将“x1=-1:0.2:1;”改为“x1=-1:0.1:1;”即可。运行程序,我们得到n=20时的牛顿插值多项式,结果为:P20(x)=260188.0*x^20-1.0121e6*x^18+2.6193e-12*x^17+1.6392e6*x^16+2.248e-11*x^15-1.4429e6*x^14-4.6331e-11*x^13+757299.0*x^12+1.7687e-11*x^11-245255.0*x^10+

5、2.1019e-11*x^9+49318.0*x^8+3.5903e-12*x^7-6119.2*x^6-1.5935e-12*x^5+470.85*x^4+1.3597e-14*x^3-24.143*x^2-1.738e-14*x+1.0同样的,这里得到了该牛顿插值多项式的在[-1,1]上的图形,并和原函数进行对比(见Fig.2)。Fig.2牛顿插值多项式(n=20)函数和原函数图形当n=20时,端点处发生了更加剧烈的震荡。表明随着分段不断增加,牛顿插值多项式与原函数的误差不但没有减少,反而变得更大了。(2)三次样条2.1当n=10时:在Matlab下编写代码完成计算和画图。

6、结果如下:代码:clearallclcx1=-1:0.2:1;y1=1./(1+25.*x1.^2);symsxm1=subs(diff(1/(1+25*x^2)),-1);m2=subs(diff(1/(1+25*x^2)),1);n=length(x1);symsabhfdfori=1:n-1h(i)=x1(i+1)-x1(i);f(i)=(y1(i+1)-y1(i))/(x1(i+1)-x1(i));enda(n)=1;b(1)=1;fori=2:n-1a(i)=h(i-1)/(h(i-1)+h(i));b(i)=h(i)/(h(i-1)+h(i));endd(1)=6/

7、h(1)*(f(1)-m1);d(n)=6/h(n-1)*(m2-f(n-1));fori=2:n-1d(i)=6*(f(i)-f(i-1))/(h(i-1)+h(i));endD=d';A=2.*eye(n);fori=1:n-1A(i,i+1)=b(i);A(i+1,i)=a(i+1);endM=A^-1*D;fori=1:n-1s(i)=M(i)*(x1(i+1)-x)^3/h(i)/6+M(i+1)*(x-x1(i))^3/h(i)/6+(y1(i)-M(i)*h(i)^2/6)*(

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。