数模day04

关于插值原理,这篇文章里总结过。

插值,是在有限个数据点的情况下,模拟出更多的点来适应实际问题的需要。

拟合,是在已知数据点基础上,以已知点处最小误差为标准,模拟出近似函数。

二者有似,实则不同,matlab提供了基本完整的解决方案。

一、插值

1. 一维插值

(1)拉格朗日插值

经典的拉格朗日插值并没有现成的函数。自行编写如下:

input: 相同维度的已知点x0,y0

output:x点处的插值y

1 function y = lagrange(x0,y0,x) 2 % 函数:已知点组(x0,y0),求x出的插值y 3 n = length(x0); 4 m = length(x); 5 for i = 1:m 6 z=x(i); 7 s=0.0; 8 for k = 1:n 9 p = 1.0; 10 for j = 1:n 11 if j~=k 12 p = p * (z-x0(j))/(x0(k)-x0(j)); 13 end 14 end 15 s = p*y0(k)+s; 16 end 17 y(i) = s; 18 end

(2)MATLAB一维插值工具箱

通用: y = interp1(x0,y0,x,’method’)

param:

  x0、y0:已知数据点。要求x0必须单调,x0等距时,使用快速插值。

  x:要插值的点,内插。matlab外插产生不确定值。

  method:规定插值方法

               有:  'linear':线性插值,如需要分段线性插值

                        'spline':  三次样条插值

                        'cubic' :  三次插值,如分段三次插值,即埃尔米特插值

                        'nearest':最近项插值,如果插值遇到外推产生不确定值,使用这个产生值去代替那些不确定值。

 

针对三次样条插值(常用),用法有:

  • y = interp1(x0,y0,x,’spline’);
  • y = spline(x0,y0,x);
  • pp = csape(x0,y0,conds);
  • pp = csape(x0,y0,conds,valconds), y = fnval(pp,x);%产生值

其中,D方法最常用,说明:

pp = csape(x0,y0,conds,valconds), y = fnval(pp,x)

param:

conds:指定插值的边界条件(三次样条插值需要2个边界条件)

               'not-a-knot':非扭结条件,即强迫第1、2和倒数1、2个多项式三次导数亦相等

               'complete':边界为一阶导数,一阶导数的值由valconds给出

               'second':边界为二阶导数,二阶导数值由valconds给出

               'periodic' :周期条件

  valconds:见上,具体使用help csape

return:

返回pp对象,使用pp.coefs得到每个小区间上三次插值多项式的系数

   使用y = fnval(pp,x)得到x处的插值

 

 

 

例子:分段线性以及三次插值,插值点如下

                      

x

0

3

5

7

9

11

12

13

14

15

y

0

1.2

1.7

2.0

2.1

2.0

1.8

1.2

1.0

1.6

 

1 x0 = [0,3,5,7,9,11,12,13,14,15];
 2  y0 = [0,1.2,1.7,2.0,2.1,2.0,1.8,1.2,1.0,1.6];
 3  x = 0:0.1:15;
 4  y1 = interp1(x0,y0,x,'linear');%分段线性插值
 5 y2 = interp1(x0,y0,x,'spline');%三次插值
 6 pp1 = csape(x0,y0);
 7  y3 = fnval(pp1,x);
 8 pp2 = csape(x0,y0,'second');
 9  y4 = fnval(pp2,x);
10  subplot(1,3,1);
11 % subplot(2,3,1)是指
12 %一个2行3列的图中从左到右从上到下的第一个位置
13 plot(x0,y0,'+',x,y1);
14  title('线性插值');
15 subplot(1,3,2);
16  plot(x0,y0,'+',x,y2);
17  title('三次插值1');
18  subplot(1,3,3);
19  plot(x0,y0,'+',x,y3);
20  title('三次插值2');

 

插值拟合python 插值拟合算法_插值

 

 

:三次样条插值,并求出插值函数

  样本点:

 t 0.15 0.16 0.17 0.18 v 3.50 1.50 2.50 2.80

求解:

x0 = 0.15:0.01:0.18; y0 = [3.5,1.5,2.5,2.8]; pp = csape(x0,y0);%默认条件是拉格朗日边界条件 format long g xishu = pp.coefs

xishu =

         -616666.666666667                     33500         -473.333333333334                       3.5
         -616666.666666667                     15000          11.6666666666671                        1.5
         -616666.666666668         -3499.99999999999          126.666666666667              2.5

 

2. 二维插值

尤其是等高线绘制上,尤为重要。

二维插值特别注意维度问题。

matlab函数:

1、通用z = interp2(x0,y0,z0,x,y,’method’)

param:

  x0、y0:m维向量和n维向量,代表有m*n组数据点

  z0:矩阵,n*m维,注意n是y0的维度

  x、y:需要插值的点,注意x和y必须方向不同,表示有a*b组数据点

 ‘method’:同一维

return:

z矩阵,行数是y的维数,列数是x的维数,表示对应点处的插值

2、三次样条插值:pp = csape({x0,y0},z0,conds,valconds);

                        z = fnval(pp,{x,y});

param:

 {x0,y0}:x0是m维,y0是n维

  z0:m*n矩阵,注意这里m是x0的维度

  其他同一维

return:

fnval的参数{x,y}是m*n,返回z是插值,是m*n维矩阵。

3、函数:插值节点为散乱点

ZI = griddata(x,y,z,XI,YI)

 

 

 

 

 

 

例:二次插值

已知高程部分点为:

插值拟合python 插值拟合算法_多项式_02

每隔10m求插值点,并做曲面,求最高点

 

1 clear,clc
 2  x = 100:100:500;
 3  y = 100:100:400;
 4  z=[636    697    624    478   450
 5     698    712    630    478   420 
 6     680    674    598    412   400  
 7     662    626    552    334   310]; 
 8  pp = csape({x,y},z');
 9  xi = 100:10:500;
10  yi = 100:10:400;
11  cz = fnval(pp,{xi,yi});
12  [i,j] = find(cz == max(max(cz)));%最大点的位置坐标,注意用法
13 x = xi(i); %用位置坐标求对应的x值
14 y = yi(j);
15  zmax = cz(i,j);
16  [X,Y] = meshgrid(yi,xi);
17  surf(X,Y,cz);hold on;

 

求得最高点是:(170,180)处,z = 720.6252;

插值拟合python 插值拟合算法_拟合_03

 

二、曲线拟合

1. 曲线拟合的最小二乘法以及matlab求解

最常用。用f(x)拟合数据点(x,y)。使得平方误差[f(x)-y]^2之和最小。求偏导以求系数。问题规范为:

min ||RA-Y||22

插值拟合python 插值拟合算法_插值_04

R是线性无关函数组成的矩阵,A是系数,Y是x点处的y值向量。

 

那么,matlab的求解命令为:

A = R\Y.

理解:求这类问题就是,构造R矩阵,一般为r1(x)=1,r2(x)=x,r3(x)=x^2;代入拟合已知点x1,x2…xn求得这个矩阵,至于Y,就是拟合已知点处的y值。求得A就是需要的系数。

 

MATLAB对于m次多项式拟合的命令为:

a = polyfit(x0,y0,m);y = polyval(a,x);%求x处的值

理解:利用(x0,y0)数值对,拟合m次多项式,规则为最小二乘规则。

 

matlab拟合工具箱:cftool命令打开。

注意:poly与plot区分。

 

例子:拟合形如y = a + b*x^2的经验公式,数据如下:

插值拟合python 插值拟合算法_插值拟合python_05

1 x = [19,25,31,38,44]';
2  y = [19.0,32.3,49.0,73.3,97.8]';
3  %构造r矩阵
4 r = [ones(5,1),x.^2];
5  ab = r\y;
6  x0 = 19:0.1:44;
7  y0 = ab(1) + ab(2)*x0.^2;
8  plot(x,y,'o',x0,y0,'r');

插值拟合python 插值拟合算法_拟合_06

例子:利用matlab命令,拟合并画图。

插值拟合python 插值拟合算法_插值_07

分析:画散点图,分许趋势,选定多项式次数,求之。

 

x0 = 1990:1:1996;
 %x = x';
 y0 = [70,122,144,152,174,196,202];
 plot(x0,y0,'*');
 %直线拟合
a = polyfit(x0,y0,1);
 y97 = polyval(a,1997)
 y98 = polyval(a,1998)

 

插值拟合python 插值拟合算法_插值_08

y97 =

  233.4286

y98 =

  253.9286

2. 最小二乘优化

这类问题是无约束优化中,目标函数由若干个函数的平方构成。针对不同形式,有若干解决函数,比如:lsqlin、lsqcurvefit、lsqnonlin、lsqnonneg等。例子如下,用到查阅,不用记忆。

插值拟合python 插值拟合算法_插值_09

解决上面的例子:

拟合形如y = a + b*x^2的经验公式,数据如下:

插值拟合python 插值拟合算法_插值拟合python_10

插值拟合python 插值拟合算法_拟合_11

 

3. 函数逼近的问题

这类问题是给定函数复杂, 但需对其分析,则可以用一个多项式(一般来说是这样)去逼近原函数。如何求这样的多项式函数。

问题规范为:

插值拟合python 插值拟合算法_拟合_12

其中,y是被逼近函数的值,注意R矩阵的构造,(r1,r1)表示r1*r1。求系数向量a。

例:多项式函数H=span{1,x^2,x^4}逼近y =cos(x),x∈[-pi/2,pi/2];

 

syms x
 base = [1,x.^2,x.^4];
 y1 = base.'*base
 y2 = cos(x)*base.'
 r1 = int(y1,-pi/2,pi/2)
 r2 = int(y2,-pi/2,pi/2)
 a = r1\r2 %核心命令
xishu1 = double(a)
 xishu2 = vpa(a,6)



其中注意:

插值拟合python 插值拟合算法_拟合_13

插值拟合python 插值拟合算法_多项式_14

插值拟合python 插值拟合算法_插值_15

插值拟合python 插值拟合算法_拟合_16

插值拟合python 插值拟合算法_多项式_17

插值拟合python 插值拟合算法_拟合_18

插值拟合python 插值拟合算法_插值_19

以上,请批评指正。