三次样条插值的MATLAB实现

合集下载

matlab实现三次样条插值法

matlab实现三次样条插值法

题目背景:对y=1/(1+x^2)在[-1,1]区间以Xn=-1+0.1*(n-1),n=1 (21)为插值点做三次样条插值求解思路简析:以插值为四段三次函数为例进行说明(题干为插值20段三次函数),可看出方程组为q*x=d,其中q为方程组系数矩阵,x为所求三次函数的系数矩阵,其中方程组系数矩阵和d均呈规律性变化(边界点除外,首位两个点特殊堪虑)function qiujieyangtiao %%定义求解函数q=zeros(80); %%方程组的系数矩阵,赋初值为0n=-1:0.1:1; %%插值点的横坐标nd=zeros(80,1); %%插值点q*x=d中的dy=zeros(21,1); %%插值点的纵坐标向量a=1;for i=-1:0.1:1y(a)=1/(1+i^2);a=a+1; %%给插值点的纵坐标y通过原函数赋值endq(1,3)=2;q(1,4)=6*n(1);q(2,1)=1;q(2,2)=n(1);q(2,3)=n(1)^2;q(2,4)=n(1)^3;d(2)=y(1); %%给左端边界点的两个方程组系数赋值j=2;for i=3:4:75q(i,i-1)=1;q(i,i)=2*n(j);q(i,i+1)=3*n(j)^2;q(i,i+3)=-1;q(i,i+4)=-2*n(j);q(i,i+5)=-3*n(j)^2;d(i)=0;q(i+1,i)=2;q(i+1,i+1)=6*n(j);q(i+1,i+4)=-2;q(i+1,i+5)=-6*n(j);d(i+1)=0;q(i+2,i-2)=1;q(i+2,i-1)=n(j);q(i+2,i)=n(j)^2;q(i+2,i+1)=n(j)^3;d(i+2)=y(j);q(i+3,i+2)=1;q(i+3,i+3)=n(j);q(i+3,i+4)=n(j)^2;q(i+3,i+5)=n(j)^3;d(i+3)=y(j);j=j+1;end %%给系数矩阵赋值q(79,79)=2;q(79,80)=6*n(21);d(79)=0;q(80,77)=1;q(80,78)=n(21);q(80,79)=n(21)^2;q(80,80)=n(21)^3;d(80)=y(21); %%给右端边界点的两个方程组系数赋值result=q\d; %%求解系数矩阵function A=fun(x)if x>=-1&&x<-0.9A=result(1)+result(2)*x+result(3)*x*x+result(4)*x*x*x;elseif x>=-0.9&x<-0.8A=result(5)+result(6)*x+result(7)*x*x+result(8)*x*x*x;elseif x>=-0.8&x<-0.7A=result(9)+result(10)*x+result(11)*x*x+result(12)*x*x*x; elseif x>=-0.7&x<-0.6A=result(13)+result(14)*x+result(15)*x*x+result(16)*x*x*x; elseif x>=-0.6&x<-0.5A=result(17)+result(18)*x+result(19)*x*x+result(20)*x*x*x; elseif x>=-0.5&x<-0.4A=result(21)+result(22)*x+result(23)*x*x+result(24)*x*x*x; elseif x>=-0.4&x<-0.3A=result(25)+result(26)*x+result(27)*x*x+result(28)*x*x*x; elseif x>=-0.3&x<-0.2A=result(29)+result(30)*x+result(31)*x*x+result(32)*x*x*x; elseif x>=-0.2&x<-0.1A=result(33)+result(34)*x+result(35)*x*x+result(36)*x*x*x; elseif x>=-0.1&x<0A=result(37)+result(38)*x+result(39)*x*x+result(40)*x*x*x; elseif x>=0&x<0.1A=result(41)+result(42)*x+result(43)*x*x+result(44)*x*x*x; elseif x>=0.1&x<0.2A=result(45)+result(46)*x+result(47)*x*x+result(48)*x*x*x; elseif x>=0.2&x<0.3A=result(49)+result(50)*x+result(51)*x*x+result(52)*x*x*x; elseif x>=0.3&x<0.4A=result(53)+result(54)*x+result(55)*x*x+result(56)*x*x*x; elseif x>=0.4&x<0.5A=result(57)+result(58)*x+result(59)*x*x+result(60)*x*x*x; elseif x>=0.5&x<0.6A=result(61)+result(62)*x+result(63)*x*x+result(64)*x*x*x; elseif x>=0.6&x<0.7A=result(65)+result(66)*x+result(67)*x*x+result(68)*x*x*x; elseif x>=0.7&x<0.8A=result(69)+result(70)*x+result(71)*x*x+result(72)*x*x*x; elseif x>=0.8&x<0.9A=result(73)+result(74)*x+result(75)*x*x+result(76)*x*x*x; elseA=result(77)+result(78)*x+result(79)*x*x+result(80)*x*x*x; endend %%插值函数用子函数表达,方便调用x=linspace(-1,1);for i=1:length(x)A(i)=fun(x(i));endY=1./(1+x.^2);plot(x,Y,'--',x,A,':')legend('primitive','fitting') %%将原函数与该插值函数画在同一图上进行比较grid ontitle('三次样条插值')for m=1:20fprintf("S%d=%.3f+%.3f*x+%.3f*x.^2+%.3f*x.^3\n",m,result(4*m-3,1),result(4*m-2,1),result(4*m-1,1),result(4*m,1)) %%输出结果endend输出结果:S1=2.049+3.619*x+3.104*x.^2+1.035*x.^3S2=1.010+0.156*x+-0.743*x.^2+-0.390*x.^3S3=1.137+0.632*x+-0.149*x.^2+-0.143*x.^3S4=1.054+0.273*x+-0.660*x.^2+-0.386*x.^3S5=1.023+0.120*x+-0.916*x.^2+-0.528*x.^3S6=1.003+-0.002*x+-1.160*x.^2+-0.691*x.^3S7=0.997+-0.044*x+-1.265*x.^2+-0.779*x.^3S8=0.998+-0.034*x+-1.233*x.^2+-0.743*x.^3S9=1.000+-0.010*x+-1.113*x.^2+-0.543*x.^3S10=1.000+-0.000*x+-1.010*x.^2+-0.200*x.^3S11=1.000+-0.000*x+-1.010*x.^2+0.200*x.^3S12=1.000+0.010*x+-1.113*x.^2+0.543*x.^3S13=0.998+0.034*x+-1.233*x.^2+0.743*x.^3S14=0.997+0.044*x+-1.265*x.^2+0.779*x.^3S15=1.003+0.002*x+-1.160*x.^2+0.691*x.^3S16=1.023+-0.120*x+-0.916*x.^2+0.528*x.^3S17=1.054+-0.273*x+-0.660*x.^2+0.386*x.^3S18=1.137+-0.632*x+-0.149*x.^2+0.143*x.^3S19=1.010+-0.156*x+-0.743*x.^2+0.390*x.^3S20=2.049+-3.619*x+3.104*x.^2+-1.035*x.^3对比图。

用Matlab实现了3次样条曲线插值的算法边界条件取为自然

用Matlab实现了3次样条曲线插值的算法边界条件取为自然

用Matlab实现了3次样条曲线插值的算法。

边界条件取为自然边界条件,即:两个端点处的2阶导数等于0;共包含3各个函数文件,主函数所在文件(即使用的时候直接调用的函数)为spline3.m,另外两个函数文件是在splin3函数文件中被调用的自定义函数。

一个是GetParam.m,一个是GetM.m。

%GetParam.m文件的内容:%根据给定的离散点的横坐标所构成的向量,计算各个区间段的h值;function GetParam(Vx,Vy)global gh;global gf;global gu;global gr;global gd;global gff;global gM;%global gn;%n=length(Vx);%length()为向量Vx所含元素的个数;%n=legth(Vx);%gn=n;%n=gn;n=length(Vx);gh(1)=Vx(2)-Vx(1);gf(1)=(Vy(2)-Vy(1))/gh(1);for i=2:1:n-1%从区间0到区间n-1; gh(i)=Vx(i+1)-Vx(i);gf(i)=(Vy(i+1)-Vy(i))/gh(i);gu(i)=gh(i-1)/(gh(i-1)+gh(i));gr(i)=1-gu(i);gff(i)=(gf(i-1)-gf(i))/(Vx(i-1)-Vx(i+1)); gd(i)=6*gff(i);end%设置与边界条件有关的参数;gM(1)=0;%起点的2阶导数;gM(n)=0;%终点的2阶导数;end%GetM.m文件的内容:function GetM(Vx)global gh;global gf;global gu;global gr;global gd;global gff;global gM;%global gn;nn=length(Vx);%nn=gn;n=nn-2;b=zeros(n,1);A=zeros(n,n);A(1,1)=2;A(1,2)=gr(2);b(1)=gd(2)-gu(2)*gM(1);for i=2:1:n-1A(i,i)=2;A(i,i-1)=gu(i+1);A(i,i+1)=gr(i+1);b(i)=gd(i+1);endA(n,n-1)=gu(n);A(n,n)=2;b(n)=gd(nn-1)-gr(nn-1)*gM(nn); X=(inv(A))*b;for i=2:1:nn-1gM(i)=X(i-1);end%主函数文件spline3.m的内容:function result=spline3(x,Vx,Vy) global gh;global gf;global gu;global gr;global gd;global gff;global gM;%global gn;GetParam(Vx,Vy);GetM(Vx);%n=length(Vx);%n=gn;n=length(Vx);nn=length(x);y=zeros(1,nn);for j=1:1:nni=1;while(x(j)>Vx(i+1))endsn=i;t1=(Vx(sn+1)-x(j))^3/(6*gh(sn));t1=t1*gM(sn);t2=(x(j)-Vx(sn))^3/(6*gh(sn));t2=t2*gM(sn+1);t3=Vy(sn)-gM(i)*((gh(i))^2)/6;t3=t3*(Vx(sn+1)-x(j))/gh(sn);t4=Vy(sn+1)-gM(sn+1)*((gh(sn))^2)/6;t4=t4*(x(j)-Vx(sn))/gh(sn);y(j)=t1+t2+t3+t4;endresult=y;end函数调用的时候,result=spline3(x,Vx,Vy),x为代求点的横坐标向量,(Vx,Vy)为已知的点的坐标。

matlab曲线插值方法

matlab曲线插值方法

matlab曲线插值方法摘要:一、引言1.MATLAB曲线插值方法背景介绍2.文章目的与意义二、MATLAB曲线插值方法分类1.线性插值2.二次多项式插值3.三次样条插值4.三次贝塞尔插值5.三次Hermite插值三、线性插值1.原理介绍2.示例代码及结果四、二次多项式插值1.原理介绍2.示例代码及结果五、三次样条插值1.原理介绍2.示例代码及结果六、三次贝塞尔插值1.原理介绍2.示例代码及结果七、三次Hermite插值1.原理介绍2.示例代码及结果八、比较与选择1.各种插值方法优缺点分析2.应用场景选择建议九、结论1.文章总结2.对未来研究的展望正文:matlab曲线插值方法在MATLAB中,曲线插值是一种常见的数据处理和可视化方法。

它可以将离散的数据点连接成平滑的曲线,以便于分析和理解数据。

本文将介绍MATLAB中几种常见的曲线插值方法,包括线性插值、二次多项式插值、三次样条插值、三次贝塞尔插值和三次Hermite插值。

同时,我们将通过示例代码和结果展示这些插值方法的实现过程,并对各种插值方法进行比较和选择,以提供实际应用中的指导。

一、引言MATLAB作为一种广泛应用于科学计算和工程领域的编程语言,其强大的绘图功能为研究人员提供了便利。

在许多应用场景中,需要将离散的数据点连接成平滑的曲线,以直观地表现数据的变化规律。

曲线插值方法正是为了解决这一问题而提出的。

接下来,我们将介绍MATLAB中几种常见的曲线插值方法。

二、MATLAB曲线插值方法分类1.线性插值线性插值是一种简单的插值方法,它通过连接数据点形成一条直线。

在MATLAB中,可以使用`polyfit`函数进行线性插值。

```matlabx = [1, 2, 3, 4];y = [2, 4, 6, 8];p = polyfit(x, y, 1);```2.二次多项式插值二次多项式插值使用一个二次方程来拟合数据点。

在MATLAB中,可以使用`polyfit`函数进行二次多项式插值。

Matlab实验报告六(三次样条与分段线性插值)范文

Matlab实验报告六(三次样条与分段线性插值)范文
1.分析问题
本题是给出粗略等分点让你插入更多点用双线性插值法来作出更清晰的山区地貌图。
2.问题求解
x=0:400:2800;
y=0:400:2400;
z=[1430 1450 1470 1320 1280 1200 1080 940;
1450 1480 1500 1550 1510 1430 1300 1200;
2.分段线性插值与计算量与n无关;n越大,误差越小.
3.三次样条插值比分段线性插值更光滑。
4.‘linear’:分段线性插值;‘spline’:三次样条值。
【实验环境】
MatlabR2010b
二、实验内容
问题1对函数 ,x[-5,5],分别用分段线性插值和三次样条插值作插值(其中插值节点不少于20),并分别作出每种插值方法的误差曲线.
本次实验因为是我们课本没有的内容,心理上给了我很大的压力,幸好我们还能根据老师的课件以及例题去掌握这次实验所需要的各种插值法,但结果还好,两道题都做出来了。
plot(x,y,'*',x1,yl,'r',x1,y2,'b')
y0=1./(1+x1.^2);
y3=yl-y0;
y4=ys-y0;
holdon
plot(x1,y3,'y',x1,y4,'g')
3.结果
4误。
问题2山区地貌图在某山区(平面区域(0,2800)(0,2400)内,单位:米)测得一些地点的高程(单位:米)如表1,试作出该山区的地貌图.
1.分析问题
本题先取出少量的插值节点并作出图形,再用分段线性插值法和三次样条插值法做出更精确的图形,最后在作出误差曲线。

matlab三次样条插值例题解析

matlab三次样条插值例题解析

文章标题:深度解析Matlab三次样条插值1. 前言在数学和工程领域中,插值是一种常见的数值分析技术,它可以用来估计不连续数据点之间的值。

而三次样条插值作为一种常用的插值方法,在Matlab中有着广泛的应用。

本文将从简单到复杂,由浅入深地解析Matlab中的三次样条插值方法,以便读者更深入地理解这一技术。

2. 三次样条插值概述三次样条插值是一种利用分段三次多项式对数据点进行插值的方法。

在Matlab中,可以使用spline函数来进行三次样条插值。

该函数需要输入数据点的x和y坐标,然后可以根据需要进行插值操作。

3. 三次样条插值的基本原理在进行三次样条插值时,首先需要对数据点进行分段处理,然后在每个分段上构造出一个三次多项式函数。

这些多项式函数需要满足一定的插值条件,如在数据点处函数值相等、一阶导数相等等。

通过这些条件,可以得到一个关于数据点的插值函数。

4. Matlab中的三次样条插值实现在Matlab中,可以使用spline函数来进行三次样条插值。

通过传入数据点的x和y坐标,可以得到一个关于x的插值函数。

spline函数也支持在已知插值函数上进行插值点的求值,这为用户提供了极大的灵活性。

5. 三次样条插值的适用范围和局限性虽然三次样条插值在许多情况下都能够得到较好的插值效果,但也存在一些局限性。

在数据点分布不均匀或有较大噪音的情况下,三次样条插值可能会出现较大的误差。

在实际应用中,需要根据具体情况选择合适的插值方法。

6. 个人观点和总结通过对Matlab中三次样条插值的深度解析,我深刻地理解了这一插值方法的原理和实现方式。

在实际工程应用中,我会根据数据点的情况选择合适的插值方法,以确保得到准确且可靠的结果。

我也意识到插值方法的局限性,这为我在实际工作中的决策提供了重要的参考。

通过以上深度解析,相信读者已经对Matlab中的三次样条插值有了更加全面、深刻和灵活的理解。

在实际应用中,希望读者能够根据具体情况选择合适的插值方法,以提高工作效率和准确性。

用MATLAB计算等距三次样条插值问题

用MATLAB计算等距三次样条插值问题

2 表达式中系数的求解
S 4( π ) 中的任意一个三次样条函数可以表示成
38
n1
四川工业学院学报 2003 年 x ), x ∑ k iB i( ∈ [ a , b] ( 2) 于是求满足条件( 3) 、 ( 4) 的 三次插值样条函数( 2)的 问题转换为求解线性方程组( 7) 的问题 。 只要从( 7)中 解出 k i( i =-1 , 0 , …, n -3) , 即可求得样条函数 。
T
k n -1 = y n 及中间系数满足的等式 k -1 B -1( x 1)+ k 0 B 0( x 1)= y 1 - y 0 + h y′ 0 Bx 1) 2( 3
ki 3 B i3( x i) +k i 2 B i2( xi ) +k i 1 B i1 ( xi )= y i i = 2 , 3 , … , n -2 k n -4 B n -4( xn -1)+k n -3 B n -3 = y n -1 h - y n - y ′ B ( x )= y i 3 n n -2 n -1 ( 6) 利用基函数( 1) , 及已知数据( 3) , 可将( 6) 式写成矩阵 形式 : 7 2 1 4 0 1 1 4 1 1 4 2 1 7 · k -1 k0 k1 ┇ k n -4 k n -3
用matlab计算等距三次样条插值问题matlab等距节点插值三次样条插值matlabmatlab样条插值matlab样条插值函数matlab样条插值求曲率matlabb样条插值拟合matlab中三次样条插值matlabb样条插值双三次样条插值matlab
四川工业学院学报
Journa l of Sichua n University o f Science and Technolog y

三次样条插值函数MATLAB编程实现

三次样条插值函数MATLAB编程实现

三次样条插值函数为()()[)()[]1011,,,,n n n S x x x x S x S x x x x-⎧∈⎪=⎨⎪∈⎩ 利用三次埃尔米特插值函数表示三次样条插值函数,即()()()()())111111,,j j j j j j j j j j j S x y x y x m x m x x x x ααββ++++++⎡=+++∈⎣(0,1,,1j n =-)基函数满足()()()()()()21112111121121111212jj j j j j j j j j j j j j j j j j j jj j j j x x x x x x x x xx xx x x x x x xx xx x x x xx x x x x x xααββ++++++++++++⎛⎫⎛⎫--=+ ⎪⎪ ⎪⎪--⎝⎭⎝⎭⎛⎫⎛⎫--=+ ⎪⎪ ⎪⎪--⎝⎭⎝⎭⎛⎫-=-⎪ ⎪-⎝⎭⎛⎫-=-⎪ ⎪-⎝⎭由上式易得()()()()()()()()()()()()()()1331111331112211112211612612246246j j j j j j j j j j j j j j j j j j j j j j jj j j j j x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x xx ααββ+++++++++++++++''=---+''=-+--+''=---+''=---则有()()()()()()()()()()()111111113333111111122221111661212242466j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j S x y x y x m x m x x x x x y x y x x x x x x x x x x x x x m x m x x x x x x x x x ααββ+++++++++++++++++++''''''''''=+++⎡⎤⎡⎤++⎢⎥⎢⎥=-+-+⎢⎥⎢⎥----⎣⎦⎣⎦⎡⎤++⎢⎥+-+-⎢⎥----⎣⎦)1,j j x x x +⎡⎤⎢⎥⎡∈⎣⎢⎥⎣⎦(0,1,,1j n =-)同理有()()()()()()()()()()()()()()()11111113333111111122221111661212242466j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j j S x y x y x m x m x x x x x y x y x x x x x x x x x x x x x m x m x x x x x x x x x ααββ------------------''''''''''=+++⎡⎤⎡⎤++⎢⎥⎢⎥=-+-+⎢⎥⎢⎥----⎣⎦⎣⎦⎡⎤⎡++⎢⎥+-+-⎢⎥----⎣⎦⎣)1,j j x x x -⎤⎢⎥⎡∈⎣⎢⎥⎦(1,,j n =)根据样条函数二阶导数连续性,即()()100j j j j S x S x +''''+=-(1,,1j n =-)即()()()()()()()()()()()()()()()()111111332211111111113322111166426624j j jj j j j j j j jj j jj j j j j j jj j j j jj j j j j jjj jj jj jj x x y x x y x x x x m m x x xx xx xx x x y x x y x x x x m m x x xx xx xx ++++++++++--------------+++--------=+++----(1,,1j n =-)化简得()()()()()111111111111233j j j j j j j j j j j j j j j j j j jj j xx m x x m x x m x x x x y y y y x x x x +-+--+-++-+--+-+---=-+---(1,,1j n =-)可得线性方程组()()()()()()()()()()0121201023231213121221111110212110211032213221322122233333n n n n n n n n n n n n m m x x x x x x m x x x x x x m x x x x x x m m m x x x x y y y y x x x x x x x x y y y y x x x x y ------⨯+-+⨯⎛⎫ ⎪ ⎪ ⎪---⎛⎫⎪ ⎪--- ⎪ ⎪⎪ ⎪⎪ ⎪ ⎪--- ⎪⎝⎭ ⎪ ⎪ ⎪⎝⎭---+------+---=()()()121112112113n n n n n n n n n n n n n x x x x y y y x x x x ----------⨯⎛⎫⎪ ⎪ ⎪ ⎪⎪⎪ ⎪-- ⎪-+- ⎪--⎝⎭为了使样条插值问题有惟一解,我们在原有方程基础上增加两个边界条件。

MATLAB三次样条插值之三弯矩法

MATLAB三次样条插值之三弯矩法

MATLAB三次样条插值之三弯矩法首先说这个程序并不完善,为了实现通用(1,2,…,n)格式解题,以及为调用追赶法程序,没有针对节点数在三个以下的情况进行分类讨论。

希望能有朋友给出更好的方法。

首先,通过函数sanwanj得到方程的系数矩阵,即追赶法方程的四个向量参数,接下来调用追赶法(在intersanwj函数中),得到三次样条分段函数系数因子,然后进行多项式合并得到分段函数的解析式,程序最后部分通过判断输入值的区间自动选择对应的分段函数并计算改点的值。

附:追赶法程序chase%%%%%%%%%%%%%%function [newv,w,newu,newd]=sanwj(x,y,x0,y0,y1a,y1b)ﻫ%三弯矩样条插值ﻫ%将插值点分两次输入,x0y0单独输入ﻫ% 边值条件a的二阶导数 y1a 和b的二阶导数y1b,这里建议将y1a和y1b换成y2a和y2b,以便于和三转角代码相区别ﻫn=length(x);m=length(y);if m~=nﻫerror('x or y 输入有误,再来');endﻫv=ones(n-1,1);u=ones(n-1,1);d=zeros(n-1,1);ﻫw=2*ones(n+1);ﻫh0=x(1)-x0;ﻫh=zeros(n-1,1);for k=1:n-1ﻫh(k)=x(k+1)-x(k);ﻫendv(1)=h0/(h0+h(1));u(1)=1-v(1);d(1)=6*((y(2)-y(1))/h(1)-(y(1)-y0)/h0)/(h0+h(1));ﻫ%for k=2:n-1ﻫv(k)=h(k-1)/(h(k-1)+h(k));ﻫu(k)=1-v(k);ﻫd(k)=6*((y(k+1)-y(k))/h(k)-(y(k)-y(k-1))/h(k-1))/(h(k-1)+h(k));endnewv=[v;1];ﻫnewu=[1;u];d0=6*((y(1)-y0)/h0-y1a)/h0;d(n)=6*(y1b-(y(n)-y(n-1))/h(n-1))/h(n-1);newd=[d0;d];%%%%%%%%%%%%function intersanwj(x,y,x0,y0,y1a,y1b)%三弯矩样条插值ﻫ%第一部分ﻫn=length(x);m=length(y);if m~=nﻫerror('xory 输入有误,再来');endﻫ%重新定义hﻫh=zeros(n,1);h(1)=x(1)-x0;for k=2:nh(k)=x(k)-x(k-1);ﻫend%sptep1调用三弯矩函数ﻫ[a,b,c,d]=sanwj(x,y,x0,y0,y1a,y1b);% 三对角方程ﻫM=chase(a,b,c,d);% 求插值函数ﻫfprintf('三次样条(三弯矩)插值的函数表达式\n');syms X ;ﻫfprintf('S0--1:\n');S(1)=collect(((1/6)*M(2)*(X-x0).^3-(1/6)*M(1)*(X-x(1)).^3+(y(1)-(M(2)*h(1).^2)/6)*(X-x0)-(y0-(M(1)*h(1).^2)/6)*(X-x(1)))/h(1));ﻫfor k=2:nfprintf('S%d--%d:\n',k-1,k);S(k)=collect(((1/6)*M(k+1)*(X-x(k-1)).^3-(1/6)*M(k)*(X-x(k)).^3+(y(k)-(M(k+1)*h(k).^2)/6)*(X-x(k-1))-(y(k-1)-(M(k)*h(k).^2)/6)*(X-x(k)))/h(k));endﻫS=S.';ﻫdisp(S);ﻫfprintf('以上为样条函数(三弯矩)解析式,显示为手写如下:\n');ﻫpretty(S);%第二部分%是否继续运行程序ﻫmyloop=input('继续运行程序输入“1”,否则输入“0”\n');ﻫifmyloopwhile myloopxi=input('输入需要计算的点的值,并按回车键\n');if xi>x0|xi<x(n)ﻫfprintf('现在开始计算输入点的插值函数值……\n');elseﻫfprintf('输入数值不在插值范围内,请重新输入\n');ﻫxi=input('输入需要计算的点的值,并按回车键……\n');end%确定输入的数值应该使用哪个解析式newx=[x0;x];[r,suoy]=min(abs(newx-xi));ﻫfprintf('输入点的插值函数值为:\n\n');fpr intf('\t');if xi<=newx(suoy)ﻫf=subs(S(suoy-1),X,xi);ﻫelsef=subs(S(suoy),X,xi);enddisp(f);ﻫmyloop=input('继续计算输入“1”,终止计算输入“0”\n');endelsereturn;end%%%%%%%%%%%%function[x]=chase(a,b,c,d)%追赶法解性方程组 a是下三角b是对角线c是上三角 d是常数项%输入的a bc d 均为列向量ﻫn=length(b);ﻫu=zeros(n,1);ﻫv=zeros(n,1);ﻫx=zeros(n,1);%追v(1)=c(1)/b(1);u(1)=d(1)/b(1);for i=2:n-1v(i)=c(i)/(b(i)-v(i-1)*a(i-1));u(i)=(d(i)-u(i-1)*a(i-1))/(b(i)-v(i-1)*a(i-1));endﻫu(n)=(d(n)-u(n-1)*a(n-1))/(b(n)-v(n-1)*a(n-1));ﻫ%赶ﻫx (n)=u(n);ﻫfori=n-1:-1:1x(i)=u(i)-v(i)*x(i+1);ﻫend。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

MATLAB 程序设计期中考查在许多问题中,通常根据实验、观测或经验得到的函数表或离散点上的信息,去研究分析函数的有关特性。

其中插值法是一种最基本的方法,以下给出最基本的插值问题——三次样条插值的基本提法:对插值区间[]b a ,进行划分:b x x x a n ≤<⋯⋯<<≤10,函数()x f y =在节点i x 上的值()()n i x f y i i ⋯⋯==,2,1,0,并且如果函数()x S 在每个小区间[]1,+i i x x 上是三次多项式,于[]b a ,上有二阶连续导数,则称()x S 是[]b a ,上的三次样条函数,如果()x S 在节点i x 上还满足条件()()n i y x S i i ⋯⋯==,1,0则称()x S 为三次样条插值函数。

三次样条插值问题提法:对[]b a ,上给定的数表如下.求一个分段三次多项式函数()x S 满足插值条件()()n i y x S i i ⋯⋯==,1,0 式,并在插值区间[]b a ,上有二阶连续导数。

这就需要推导三次样条插值公式:记()x f '在节点i x 处的值为()i i m x f ='(n i ⋯⋯=,1,0)(这不是给定插值问题数表中的已知值)。

在每个小区间[]1,+i i x x 利用三次Hermite 插值公式,得三次插值公式:()()()()1111+++++++=i i i i i i i i i m m x y x y x x S ββαα,[]1,+∈i i x x x 。

为了得到这个公式需要n 4个条件:(1).非端点处的界点有n 2个;(2).一阶导数连续有1-n 个条件;(3).二阶导数连续有1-n 个条件,其中边界条件:○1()()nn m x S m x S ='=' 00○2()()αα=''=''nx S x S 00 ○3()()()()16500403βααβαα=''+'=''+'n n x S x S x S x S ○4n y y =0 ()()()()000000-''=+''-'=+'nn x S x S x S x S 其中:()⎩⎨⎧=≠=j i j i x j i,1,0α ()0='j i x α ()0=j i x β 且(1,0,=j i )。

()⎩⎨⎧=≠='j i j i x j i,1,0β ,i m 为对应变量的一阶导数。

其推导过程如下:为了确定i m 的值,把()x S 展开为:()()()[]()()[]131232122+++-+-+-+-=i ii i i i ii i i y h x x h x x y h x x h x x x S+()()()(),1212221+++--+--i ii i i ii i m h x x x x m h x x x x这里i i i x x h -=+1,对()x S 连续求两次导,得:()()()i i ii i i ii i i ii i y y h x x x m h x x x m h x x x x S --++--+--=''+++++1311212126246426。

于是考虑()x S ''在节点i x 处的右极限值,得: ()()i i ii i i i i y y h m h m h x S -+--=+''++1216240。

同理,在相邻小区间[]i i x x ,1-上可得()x S ''的表达式为:()()()1211211121126246426----------++--+--=''i i i i i i i ii i i ii y y h x x x m h x x x m h x x x x S及()x S ''在节点i x 处的左极限值为:()()1211116420-------+=-''i i i i i i i i y y h m h m h x S 。

利用()x S 二阶导数于节点i x 处的连续性条件()()00-''=+''i i x S x S ,这里1,2,1-⋯⋯=n i ,有下式成立:⎪⎪⎭⎫ ⎝⎛-+-=+⎪⎪⎭⎫ ⎝⎛++--++---211211111311121i i i i i i i i i i i i i h y y h y y m h m h h m h ,用i i h h 111+-除等式两边,并注意[]11,,++=-=i i iii i i x x f h y y f y,上式可简记为: (),1,2,1211-⋯⋯==+++-n i g m m m i i i i i i μλ 且[][]()11111,,31+----+=+=-=+=i i i i i i i ii i i i i i i i x x f x x f g h h h h h h μλλμλ最后求得n m m ⋯⋯1的线性方程组为:⎥⎥⎥⎥⎥⎥⎦⎤⎢⎢⎢⎢⎢⎢⎣⎡⋯=⎥⎥⎥⎥⎥⎥⎦⎤⎢⎢⎢⎢⎢⎢⎣⎡⋯⎥⎥⎥⎥⎥⎥⎦⎤⎢⎢⎢⎢⎢⎢⎣⎡⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯----n n n n n n n n g g g g m m m m 1211211122112000200000020002 λμμλμλλμ (**) 通过以上复杂的求解和迭代,就可以求解出插值函数的近似表达式。

得出来的表达式就可以用MATLAB 软件来求解。

具体求解过程如下:已知n 对数据点()()()(),,,,,,,,332211n n y x y x y x y x ⋯⋯,假设函数关系为()x f y =,但解析式不确定,数据插值就是构造函数关系式()x g y =,使()n i x i ,,3,2,1⋯⋯=,满足关系()()i i x f x g =。

例题:求满足下面函数表所给出的插值条件的三次自然样条函数。

分析:表中所列出的是函数对点,首先要把对应的插值函数求出来,再用MATLAB 软件来求区间[]5,1上间隔为0.5的各点的值。

求解过程如下:因自然样条插值函数的边界条件为 ()(),00=''=''n x S x S这里3=n ,故确定3210,,,m m m m 的方程组形式形如上面的(**)式,其中系数i i μλ,和i g 可按如下步骤进行:;14524,112:210=-=-==-=h h h h i;31,32:21221011=+==+=h h h h h h i λλλ[][]()[][]()[][].62,3;62,3;27,,3;29,,3:;321,311:3232300100212322210121112211-=''+==''-=-=+==+==-==-=y hx x f g y hx x f g x x f x x f g x x f x x f g g i i λμλμλμλμμ将上述参数带入(**)式,得到以下方程组:⎥⎥⎥⎥⎥⎥⎥⎦⎤⎢⎢⎢⎢⎢⎢⎢⎣⎡--=⎥⎥⎥⎥⎦⎤⎢⎢⎢⎢⎣⎡⎥⎥⎥⎥⎥⎥⎥⎦⎤⎢⎢⎢⎢⎢⎢⎢⎣⎡627296210032231003123200123210m m m m 解得:.89,45,47,8173210-=-===m m m m由公式()()()[]()()[]131232122+++-+-+-+-=i ii i i i i i i i y h x x h x x y h x x h x x x S+()()()(),1212221+++--+--i ii i i ii i m h x x x x m h x x x x可知,()[][]⎪⎪⎩⎪⎪⎨⎧∈-+-∈-++-=5,4,334103845834,1,14782812323x x x x x x x x x S由所求出的表达式可知区间[]5,1可分为[][]5,44,1⋃,对两个区间分别用MATLAB 命令即可: 针对第一个区间:147828123-++-=x x x y ; 其图像如下0.511.522.533.5xy命令如下:x=1:4;y=(-1/8)*x.^3+(2/8)*x.^2+(7/4)*x-1;xi=1:0.5:4; y1=interp1(x,y,xi,'spline') 其运行结果如下: y1 =Columns 1 through 60.8750 1.7656 2.5000 2.9844 3.1250 2.8281Column 72.0000 针对第二个区间: 33410384583223-+-=x x x y。

相关文档
最新文档