- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
《数值分析》课程实验报告
PAGE
《数值分析》课程实验报告
用拉格朗日和牛顿插值法求解函数值
算法名称 用拉格朗日和牛顿插值法求函数值
学科专业 xxxxx
作者姓名 xxxx
作者学号 xxxxx
作者班级 xxxxxx
xxx大学
二〇一五年十二月
《数值分析》课程实验报告
实验名称
用拉格朗日和牛顿插值法求解函数值
成绩
一、问题背景
在工程技术与科学研究中,常遇到考察两个变量间的相互关系问题。两个变量间的关系可以通过函数表示,若x为自变量,y为因变量,则函数关系可描述为y=f(x)。大多数问题中,函数表达式y=f(x)未知,人们通常采用逼近的方法处理:取得一组数据点(xi,yi)(i=0,1,2,…,n),数据点可由不同方式取得(例如,可根据工程设计要求得到,也可通过采样或实验取得),然后构造一个简单函数P(x)作为y=f(x)的近似表达式,即y=f(x)≈P(x),对于y=f(x)≈P(x),若满足P(xi)=f(xi)=yi,i=0,1,2…,n,这类问题成为插值问题。
二、数学模型
1.函数f(x)=lnx的一些数值如表:
x
1.4
1.5
1.6
1.7
1.8
lnx
0.3365
0.4055
0.4700
0.5306
0.5878
用拉格朗日插值法计算ln1.54的近似值。
函数f(x)=的一些数值如表:
x
0.4
0.5
0.6
0.7
0.8
0.6325
0.7071
0.7746
0.8367
0.8944
用牛顿插值法计算√0.54的近似值,画出插值函数与原函数的图形做比较。
三、算法描述
1.拉格朗日插值法:设已知,,,...,及=f()(i=0,1,,n),为不超过n次多项式且满足(i=0,1,...n).易知=(x)++.
其中,均为n次多项式且满足式(3)(i,j=0,1,...,n),再由(ji)为n次多项式的n个根知=c.最后,由
c=,i=0,1,...,n.
总之,=,=式为n阶Lagrange插值公式,其中,(i=0,1,...n)称为n阶Lagrange插值的基函数。
2.牛顿插值法: 插值法是利用函数f(x)在某区间中若干点的函数值,作出适当的特定函数,在这些点上取已知值,在区间的其他点上用这特定函数的值作为函数f(x)的近似值。如果这特定函数是多项式,就称它为插值多项式。当插值节点增减时全部插值基函数均要随之变化,这在实际计算中很不方便。为了克服这一缺点,提出了牛顿插值。牛顿插值通过求各阶差商,递推得到的一个公式:
f(x)=f[x0]+f[x0,x1](x-x0)+f[x0,x1,x2](x-x0)(x-x1)+...f[x0,...xn](x-x0)...(x-xn-1)+Rn(x)。
四、主要代码
1.拉格朗日插值
建立函数文件:
function [yt,L]=LagInterpl(x,y,xt)
syms t;
n=length(x);
ny=length(y);
if n~=ny
error
end
L=0.0;
for k=1:n
lk=1;
for j=1:n
if j~=k
lk=lk*(t-x(j))/(x(k)-x(j));
end
end;
L=L+y(k)*lk;
end
simplify(L);
L=collect(L);
yt=subs(L,t,xt);
牛顿插值
建立函数文件:
function [yt,N]=NewtInterp(x,y,xt)
syms t;
n=length(x);
ny=length(y);
if n~=ny
error
end
a=zeros(1,n);
N=y(1);
w=1;
for k=1:n-1
yy=zeros(1,n);
for j=k+1:n
yy(j)=(y(j)-y(k))/(x(j)-x(k));
end
a(k)=yy(k+1);
w=w*(t-x(k));
N=N+a(k)*w;
y=yy;
end
yt=subs(N,t,xt);
simplify(N);
N=collect(N);
N=vpa(N,6);
实验结果及分析
拉格朗日插值法
在命令窗口输入:
x=[1.4,1.5,1.6,1.7,1.8];
y=[0.3365,
文档评论(0)