数值分析实验(四)插值法实验.docVIP

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
数值分析实验(四)插值法实验.doc

插值法实验 班别: 学生姓名: 学号: 实验目的 1.通过进行不同类型的插值,比较各种插值的效果,明确各种插值的优越性; 2.通过比较不同次数的多项式拟合效果,了解多项式拟合的原理; 3.利用matlab编程,学会matlab命令; 4.掌握拉格朗日插值法和牛顿插值法; 实验题目 (1) 调用拉格朗日插值程序求拉格朗日插值4次多项式在0.45 0.5 0.6 0.8上的值,并画出原函数与拉格朗日插值4次多项式的图像进行比较。 (2) 调用牛顿插值程序求牛顿插值4次多项式, 并求其在0.45 0.5 0.6 0.8上的值。 (3)选做:调用分段线性插值程序求其在0.45 0.5 0.6 0.8上的值,并画出原函数与分段线性插值多项式的图像进行比较。 实验原理 1. 拉格朗日插值 2. 牛顿插值的原理 实验内容与结果 1. 拉格朗日插值法 (1)相关程序 function yy=mlagr(x,y,xx) %用途:拉格朗日插值法求解 %格式:yy=mlagr(x,y,xx), x是节点向量, y是节点对应的函 %数值向量, xx是插值点(可以是多个), yp返回插值结果 n=length(x); m=length(xx); yy=zeros(1,m); c1=ones(n-1,1); c2=ones(1,m); for i=1:n xp=x([1:i-1,i+1:n]); yy=yy+y(i)*prod((c1*xx-xp*c2)./(x(i)-xp*c2)); End (原函数与拉格朗日插值4次多项式的图像进行比较的程序) x=[0.4 0.55 0.65 0.8 0.9];y=[0.41075 0.57815 0.69675 0.88811 1.02652];plot(x,y,+); x=0.4:0.01:0.6;y0=sin(x); plot(x,y0,*) 实验结果 x=[0.4 0.55 0.65 0.8 0.9];y=[0.41075 0.57815 0.69675 0.88811 1.02652];xx=[0.45 0.5 0.6 0.8]; yy=mlagr(x,y,xx) yy = 0.4653 0.5211 0.6367 0.8881 (原函数与拉格朗日插值4次多项式的图像进行比较) x=[0.4 0.55 0.65 0.8 0.9];y=[0.41075 0.57815 0.69675 0.88811 1.02652];plot(x,y,+); x=0.4:0.01:0.6;y0=sin(x); plot(x,y0,*) (3)实验结果分析 2. 牛顿插值法相关程序 (1)相关程序 %程序5.2--mnewp.m function yy=mnewp(x,y,xx) %用途:牛顿差值 %格式:yy=mnewp(x,y,xx), x是节点向量, y是节点对应的函 %数值向量, xx是插值点(可以是多个), yy返回插值结果 n=length(x); syms t; yy=y(1); y1=0; lx=1; for i=1:n-1 for j=i+1:n y1(j)=(y(j-1)-y(j))/(x(j-i)-x(j)); %计算差商 end c(i)=y1(i+1); lx=lx*(t-x(i)); yy=yy+c(i)*lx; %计算牛顿插值多项式的值 y=y1; end if nargin==3 yy=subs(yy,t,xx); else yy=collect(yy); yy=vpa(yy,6); end (2)实验结果 x=[0.4 0.55 0.65 0.8 0.9];y=[0.41075 0.57815 0.69675 0.88811 1.02652];xx=[0.45 0.5 0.6 0.8]; yy=mnewp(x,y,xx) yy = 0.4653 0.5211 0.6367 0.8881 (3)实验结果分析

文档评论(0)

youyang99 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档