三次样条插值实验报告.docx_第1页
三次样条插值实验报告.docx_第2页
三次样条插值实验报告.docx_第3页
三次样条插值实验报告.docx_第4页
三次样条插值实验报告.docx_第5页
已阅读5页,还剩4页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

三次样条插值实验报告专业 班级 学号 姓名 一、 实验内容和要求1、阅读上面的文字和程序,试运行,检验程序和上面叙述的正确性。2、阅读上面的 MATLAB 程序;查资料,了解各 MATLAB 语句及命令。3、画程序流程图,理解并描述算法。4、修改上面的程序,能根据给定数据点,求(1)自然样条插值,边界 Sa=0, Sb=0= =(2)第二类边界条件,Sa和Sb是确定的。5、使用上面的程序,根据数据点(0,1),(1,0),(2,0),(3,1),(4,2),(5,2),和(6,1),求三种不同的三次样条插值,其中S0=-0.6,S6=-1.8,S0=1,S6=-1;S0,S6=0.在同一坐标系中,画出这 3 个三次样条插值和这些数据点。6、写实验报告(实验内容+算法描述+程序+写成分段函数的结果描述+截图)。二、 算法说明定义:设有N+1个点 ,其中 。如果存在N个三次多项式 ,系数为 ,满足如下性质: (1) (2) (3) 则称函数 为三次样条函数。 因为 是分段三次多项式,所以 在区间 上是分段线性的。 (1) 用 代入上式,可得 (2)将(2)式积分两次,会引入两个积分常数,并得到 (3) 将 代入上(3),并使用 ,可分别得到包含 的方程: (4)求解这两个方程,求出 ,而且将这些值代入方程(3)中,可得到三次多项式方程: (5) 表达式5可以简化成只包含未知系数 的形式。为求这些值,必须使用(5)式的导数,即 (6)在 处计算(6),并简化结果可得到 ,其中 (7) 同理,在式(6)中用 并计算在 处的解,可得 (8)利用节点处一阶导函数连续及方程(6)、(7),可得到包含 的重要关系式 (9) 其中方程组(9)中的未知数是要求的值 ,其他的项可通过数据点集 进行简单的计算得到的常量。因此方程(9)是包含N+1个未知数,具有N-1个线性方程的不定方程组。所以需要另外两个方程组才能求解,即边界条件。如果已知 ,则(10) (11)根据(9)(10)求出 后,可利用下面的公式计算 的样条系数 。 ,三、 源程序csfit1:第一类边界条件function S=csfit1(X,Y,dx0,dxn)N=length(X)-1;H=diff(X);D=diff(Y)./H;A=H(2:N-1);B=2*(H(1:N-1)+H(2:N);C=H(2:N);C=H(2:N);U=6*diff(D);B(1)=B(1)-H(1)/2;U(1)=U(1)-3*(D(1)-dx0);B(N-1)=B(N-1)-H(N)/2;U(N-1)=U(N-1)-3*(dxn-D(N);for k=2:N-1temp=A(k-1)/B(k-1);B(k)=B(k)-temp*C(k-1);U(k)=U(k)-temp*U(k-1);EndM(N)=U(N-1)/B(N-1);for k=N-2:-1:1M(k+1)=(U(k)-C(k)*M(k+2)/B(k);EndM(1)=3*(D(1)-dx0)/H(1)-M(2)/2;M(N+1)=3*(dxn-D(N)/H(N)-M(N)/2;for k=0:N-1S(k+1,1)=(M(k+2)-M(k+1)/(6*H(k+1);S(k+1,2)=M(k+1)/2;S(k+1,3)=D(k+1)-H(k+1)*(2*M(k+1)+M(k+2)/6;S(k+1,4)=Y(k+1);endcsfit2:第二类边界条件function S=csfit2(X,Y,dx0,dxn)N=length(X)-1;H=diff(X);D=diff(Y)./H;A=H(2:N-1);B=2*(H(1:N-1)+H(2:N);C=H(2:N);C=H(2:N);U=6*diff(D);U(1)=U(1)-dx0;U(N-1)=U(N-1)-dxn;for k=2:N-1temp=A(k-1)/B(k-1);B(k)=B(k)-temp*C(k-1);U(k)=U(k)-temp*U(k-1);EndM(N)=U(N-1)/B(N-1);for k=N-2:-1:1M(k+1)=(U(k)-C(k)*M(k+2)/B(k);EndM(1)=dx0;M(N+1)=dxn;for k=0:N-1S(k+1,1)=(M(k+2)-M(k+1)/(6*H(k+1);S(k+1,2)=M(k+1)/2;S(k+1,3)=D(k+1)-H(k+1)*(2*M(k+1)+M(k+2)/6;S(k+1,4)=Y(k+1);end画图:x1=0:.01:1;y1=polyval(S1(1,:),x1-X(1);x2=1:.01:2;y2=polyval(S1(2,:),x2-X(2);x3=2:.01:3;y3=polyval(S1(3,:),x3-X(3);x4=3:.01:4;y4=polyval(S1(4,:),x4-X(4);x5=4:.01:5;y5=polyval(S1(5,:),x5-X(5);x6=5:.01:6;y6=polyval(S1(6,:),x6-X(6); plot(x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6,X,Y,.) hold on x1=0:.01:1;y1=polyval(S2(1,:),x1-X(1);x2=1:.01:2;y2=polyval(S2(2,:),x2-X(2);x3=2:.01:3;y3=polyval(S2(3,:),x3-X(3);x4=3:.01:4;y4=polyval(S2(4,:),x4-X(4);x5=4:.01:5;y5=polyval(S2(5,:),x5-X(5);x6=5:.01:6;y6=polyval(S2(6,:),x6-X(6); plot(x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6,X,Y,.) hold on x1=0:.01:1;y1=polyval(S3(1,:),x1-X(1);x2=1:.01:2;y2=polyval(S3(2,:),x2-X(2);x3=2:.01:3;y3=polyval(S3(3,:),x3-X(3);x4=3:.01:4;y4=polyval(S3(4,:),x4-X(4);x5=4:.01:5;y5=polyval(S3(5,:),x5-X(5);x6=5:.01:6;y6=polyval(S3(6,

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论