Matlab 线性拟合、一维、多维度非线性拟合、多项式拟合
Σίσυφος1900 2024-08-14 14:31:01 阅读 60
一、线性拟合
线性拟合
我随便设定一个函数然后通过解方程计算出对应的系数
假设我的函数原型是
y=a*sin(0.1*x.^2+x)+b* squre(x+1)+c*x+d
<code>clc;
clear;
x=0:0.2:10;
% 我们这里假设 a=3.2 b=0.7 c=5.0 d是一个随机
y=3.2*sin(0.1*x.^2+x)+0.7*sqrt(x+1)+5*x +rand(size(x));
plot(x,y,'*');
hold on ;
y1=sin(0.1*x.^2+x);
y2=sqrt(x+1);
y3=x;
y4=rand(size(x));
X=[y1;y2;y3;y4];%将各自的俩带入
P=X'\y' % 通过解方程计算出4个系数
yn=P(1)*y1+P(2)*y2+P(3)*y3+P(4)*y4; % 得到一个新的函数 计算得出的拟合Y的值
plot(x,yn,'r');
legend('原始数据点','红色曲线拟合值','Location','southoutside','Orientation','horizontal')
拟合系数:
<code>clear;
clc;
close all
t=0:0.001:2*pi;%原函数
YS=sin(t);%基函数
N=21;
Yo=[];
for k=1:N
Yn=sawtooth(k*(t+pi/2),0.5);
Yo=[Yo,Yn'];
end
YS=YS';%拟合
a = Yo\YS;
%绘图
figure()
for k=1:N
clf
plot(t,Yo(:,1:k)*a(1:k,:),t,YS,'LineWidth',1)
ylim([-1.3,1.3])
xlim([0,6.3])
pause(0.1)
end
二、非线性拟合
利用matlab实现非线性拟合(三维、高维、参数方程)_matlab多元非线性拟合_hyhhyh21的博客-CSDN博客
上面的这位是真正的大佬,我们都是照猫画虎的学习。
1、一维
简单的一维的拟合:
思路: 将非线性-》线性:
eg:
将其两边都取对数
用线性的方式计算出a b
逆变换 ,画出曲线:
<code>clear
clc
close all
% 假设函数 为 y=a* exp(-bx)
x=0:0.1:5;
% 我们这里假设 a=2.4 b=1.2
a=2.4;
b=1.2;
y=a*exp(-b*x);%
y=y+1.3*y.*rand(size(y)); % 增加噪声
plot(x,y,'.');
hold on;
%Lg_y=Lg_a+b*(-x) 变成了ax+b 的形式 ,然而我们的最终的目的是通过x 来计算出a 和 b
% 对等式的两边取对数
lg_y=log(y);
y1=ones(size(x));
y2=-x;
% 同理和上面计算线性的一杨
X=[y1;y2];
P =X'\lg_y'
% 画出拟合后的曲线
a_fit=exp(P(1));
b_fit=P(2);
x2=0:0.01:10;
plot(x2,a_fit*exp(-b_fit*x2),'-','linewidth',1.5,'color','r')
Matlab 中的非线性拟合方法
1、fit 方法
fit是最常用,最经典的方法
<code>ft = fittype( 'a*x+b*sin(c*x).*exp(d*x)+e', 'independent', 'x', 'dependent', 'y' );; %函数的表达式,
OP1 = fitoptions( 'Method', 'NonlinearLeastSquares' );% 非线性拟合方法
OP1.StartPoint = 5*rand(1,5);%初始值,越靠近真实值越好
OP1.Lower = [-2, 0, 2, 0, 0];%参数的最小边界
OP1.Upper = [1, 3, 5, 2, 3];%参数的最大边界
% 开始拟合
fitobject = fit(x',y',ft,OP1);
Fit_P=ones(size(P));
Fit_P(1)=fitobject.a;
Fit_P(2)=fitobject.b;
Fit_P(3)=fitobject.c;
Fit_P(4)=fitobject.d;
Fit_P(5)=fitobject.e;
2、nlinfit()函数 Levenberg-Marquard
L-M 非线性迭代
% 2 用nlinfit()函数 Levenberg-Marquardt
% 定义一个函数
Func=@(P,x)( P(1)*x+P(2)*sin(P(3)*x).*exp(P(4)*x)+P(5));% 也就是说定义一个函数模型
OP2 = statset('nlinfit');%
% x,y modelfun是函数模型 beta表示的是初始值 ,我这里写成最进行的那个参数 OP2 拟合的方法
beta=[-0.17 2.1 3.0 0.25 2.0];% 初始值
Fit_P2 = nlinfit(x,y,Func,beta,OP2);
%拟合
fit_y2 = Fit_P2(1)*x1+Fit_P2(2)*sin(Fit_P2(3)*x1).*exp(Fit_P2(4)*x1)+Fit_P2(5);;
subplot(3,2,2)
hold on;
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y2,'-','linewidth',1.5,'color','r');
box on
%ylim(y_lim)
title('nlinfit函数')
3、信赖域法(trust region reflective)
信赖域法(trust region reflective)是通过Hessian 矩阵,逐步试探邻域内的最小化,来求解问题的。相比较之前的那些雅克比相关的方法,信赖域法会占用更多内存和速度,所以适用于中小规模的矩阵。
<code>
% 3 信赖区间 IsqNonLin()
func2=@(P)(P(1)*x+P(2)*sin(P(3)*x).*exp(P(4)*x)+P(5) -y);
% lsqnonlin方法
% 'Algorithm','trust-region-reflective' 算法是trust-region-reflective
% MaxFunctionEvaluations MaxFunctionEvaluations可以理解为试探的次数,
% 比如算法在一个点的四周试探了三个邻近点的值,然后确定下一步要往其中的某个点走,
% 这个时候FunctionEvaluations对应3次,即试探了3次,而Iteration是一次,即走了一步,完成了一步迭代
% MaxIterations 最大迭代次数
OP3=optimoptions(@lsqnonlin,'Algorithm','trust-region-reflective','MaxFunctionEvaluations',1e4,'MaxIterations',1e3);
%[-2, 0, 2, 0, 0];%参数的最小边界
%[1, 3, 5, 2, 3];%参数的最大边界
lower=[-2, 0, 2, 0, 0];
up=[1, 3, 5, 2, 3];
% 计算出系数
[Fit_P3,~]=lsqnonlin(func2,beta,lower,up,OP3);
fit_y3=Fit_P3(1)*x1+Fit_P3(2)*sin(Fit_P3(3)*x1).*exp(Fit_P3(4)*x1)+Fit_P3(5);
subplot(3,2,3);
hold on
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y3,'-','linewidth',1.5,'color','r')
hold off
box on
%ylim(y_lim)
title('lsqnonlin函数');
%4 lsqcurvefit()函数 trust-region-reflective
modelfun2 = @(p,x)(p(1)*x+p(2)*sin(p(3)*x).*exp(p(4)*x)+p(5)) ;
OP4=optimoptions('lsqcurvefit','Algorithm','trust-region-reflective','MaxFunctionEvaluations',1e4,'MaxIterations',1e3);
%[-2, 0, 2, 0, 0];%参数的最小边界
%[1, 3, 5, 2, 3];%参数的最大边界
lower=[-2, 0, 2, 0, 0];
up=[1, 3, 5, 2, 3];
% 计算出系数
%[p,~] = lsqcurvefit(modelfun,p0,x,y,[-2,0,2,0,0],[1,3,5,3,3],OP4);
[Fit_P4,~]=lsqcurvefit(modelfun2,beta,x,y,lower,up,OP4);
fit_y4=Fit_P4(1)*x1+Fit_P4(2)*sin(Fit_P4(3)*x1).*exp(Fit_P4(4)*x1)+Fit_P4(5);
subplot(3,2,4);
hold on
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y4,'-','linewidth',1.5,'color','r')
hold off
box on
%ylim(y_lim)
title('lsqcurvefit函数');
4、fsolve()函数
默认的算法为trust-region-dogleg,属于信赖域法。
5、粒子群法
所有代码:
<code>clear;
close all;
clc;
% 自定义一个非线性的函数 y=a*x+b*sin(c*x).*exp(d*x)+e 那将函数
x = 0:0.05:10;
P=[-0.2 2.4 3.4 0.3 1.7];
y = P(1)*x+P(2)*sin(P(3)*x).*exp(P(4)*x)+P(5);
y=y+0.5*randn(size(x)); % 添加噪声
figure();
% 1 .fit 函数开始拟合
ft = fittype( 'a*x+b*sin(c*x).*exp(d*x)+e', 'independent', 'x', 'dependent', 'y' );; %函数的表达式,
OP1 = fitoptions( 'Method', 'NonlinearLeastSquares' );% 非线性拟合方法
%OP1.StartPoint = 5*rand(1,5);%初始值,越靠近真实值越好
OP1.StartPoint = [-0.17 2.1 3.0 0.25 2.0];
OP1.Lower = [-2, 0, 2, 0, 0];%参数的最小边界
OP1.Upper = [1, 3, 5, 2, 3];%参数的最大边界
% 开始拟合
fitobject = fit(x',y',ft,OP1);
Fit_P=ones(size(P));
Fit_P(1)=fitobject.a;
Fit_P(2)=fitobject.b;
Fit_P(3)=fitobject.c;
Fit_P(4)=fitobject.d;
Fit_P(5)=fitobject.e;
%plot(x,y,'.');
% 开始计算拟合后的y
x1 = 0:0.01:10;
fit_y1 = Fit_P(1)*x1+Fit_P(2)*sin(Fit_P(3)*x1).*exp(Fit_P(4)*x1)+Fit_P(5);
subplot(3,2,1)
hold on
plot(x,y,'LineStyle','none','MarkerSize',10,'Marker','.','color','k');
plot(x1,fit_y1,'-','linewidth',1.5,'color','r');
% 开始计算拟合后的y
fit_y1 = Fit_P(1)*x+Fit_P(2)*sin(Fit_P(3)*x).*exp(Fit_P(4)*x)+Fit_P(5);
subplot(3,2,1)
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x,fit_y1,'-','linewidth',1.5,'color','r');
hold on;
title('经典fit函数');
box on;
% 2 用nlinfit()函数 Levenberg-Marquardt
% 定义一个函数
Func=@(P,x)( P(1)*x+P(2)*sin(P(3)*x).*exp(P(4)*x)+P(5));% 也就是说定义一个函数模型
OP2 = statset('nlinfit');%
% x,y modelfun是函数模型 beta表示的是初始值 ,我这里写成最进行的那个参数 OP2 拟合的方法
beta=[-0.17 2.1 3.0 0.25 2.0];% 初始值
Fit_P2 = nlinfit(x,y,Func,beta,OP2);
%拟合
fit_y2 = Fit_P2(1)*x1+Fit_P2(2)*sin(Fit_P2(3)*x1).*exp(Fit_P2(4)*x1)+Fit_P2(5);
subplot(3,2,2)
hold on;
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y2,'-','linewidth',1.5,'color','r');
box on
%ylim(y_lim)
title('nlinfit函数')
% 3 信赖区间 IsqNonLin()
func2=@(P)(P(1)*x+P(2)*sin(P(3)*x).*exp(P(4)*x)+P(5) -y);
% lsqnonlin方法
% 'Algorithm','trust-region-reflective' 算法是trust-region-reflective
% MaxFunctionEvaluations MaxFunctionEvaluations可以理解为试探的次数,
% 比如算法在一个点的四周试探了三个邻近点的值,然后确定下一步要往其中的某个点走,
% 这个时候FunctionEvaluations对应3次,即试探了3次,而Iteration是一次,即走了一步,完成了一步迭代
% MaxIterations 最大迭代次数
OP3=optimoptions(@lsqnonlin,'Algorithm','trust-region-reflective','MaxFunctionEvaluations',1e4,'MaxIterations',1e3);
%[-2, 0, 2, 0, 0];%参数的最小边界
%[1, 3, 5, 2, 3];%参数的最大边界
lower=[-2, 0, 2, 0, 0];
up=[1, 3, 5, 2, 3];
% 计算出系数
[Fit_P3,~]=lsqnonlin(func2,beta,lower,up,OP3);
fit_y3=Fit_P3(1)*x1+Fit_P3(2)*sin(Fit_P3(3)*x1).*exp(Fit_P3(4)*x1)+Fit_P3(5);
subplot(3,2,3);
hold on
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y3,'-','linewidth',1.5,'color','r')
hold off
box on
%ylim(y_lim)
title('lsqnonlin函数');
%4 lsqcurvefit()函数 trust-region-reflective
modelfun2 = @(p,x)(p(1)*x+p(2)*sin(p(3)*x).*exp(p(4)*x)+p(5)) ;
OP4=optimoptions('lsqcurvefit','Algorithm','trust-region-reflective','MaxFunctionEvaluations',1e4,'MaxIterations',1e3);
%[-2, 0, 2, 0, 0];%参数的最小边界
%[1, 3, 5, 2, 3];%参数的最大边界
lower=[-2, 0, 2, 0, 0];
up=[1, 3, 5, 2, 3];
% 计算出系数
%[p,~] = lsqcurvefit(modelfun,p0,x,y,[-2,0,2,0,0],[1,3,5,3,3],OP4);
[Fit_P4,~]=lsqcurvefit(modelfun2,beta,x,y,lower,up,OP4);
fit_y4=Fit_P4(1)*x1+Fit_P4(2)*sin(Fit_P4(3)*x1).*exp(Fit_P4(4)*x1)+Fit_P4(5);
subplot(3,2,4);
hold on
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y4,'-','linewidth',1.5,'color','r')
hold off
box on
%ylim(y_lim)
title('lsqcurvefit函数');
%% 5 fsolve()函数 %默认算法trust-region-dogleg
modelfun3 = @(p)(p(1)*x+p(2)*sin(p(3)*x).*exp(p(4)*x)+p(5) -y);
p0 = 5*rand(1,5);
OP5 = optimoptions('fsolve','Display','off');
Fit_P = fsolve(modelfun3,beta,OP5);
fit_y5 = Fit_P(1)*x1+Fit_P(2)*sin(Fit_P(3)*x1).*exp(Fit_P(4)*x1)+Fit_P(5);
subplot(3,2,5)
hold on
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x1,fit_y5,'-','linewidth',1.5,'color','r')
hold off
box on
title('fsolve函数')
%% 6 粒子群PSO算法
fun6 = @(p) ( norm(p(1)*x+p(2)*sin(p(3)*x).*exp(p(4)*x)+p(5) -y) );%这里需要计算误差的平方和
OP6 = optimoptions('particleswarm','InertiaRange',[0.4,1.2],'SwarmSize',100);
[p,~,~,~] = particleswarm(fun6,5,[-5,-5,-5,-5],[5,5,5,5],OP6);%区间可以稍微放大一些,不怕
y6 = p(1)*x+p(2)*sin(p(3)*x).*exp(p(4)*x)+p(5);
subplot(3,2,6)
hold on
plot(x,y,'LineStyle','none','MarkerSize',15,'Marker','.','color','k')
plot(x,y6,'-','linewidth',1.5,'color','r')
hold off
box on
ylim(y_lim)
title('PSO算法')
三、多项式曲线
Matlab:
<code>>> x=linspace(0,4*pi,150);
y=cos(x)+10*rand(1);
plot(x,y,'.');
hold on;
[p,s]=polyfit(x,y,9);% 拟合为7阶的函数
x1=linspace(0,4*pi,150);
y1=polyval(p,x1);
plot(x1,y1,'color','r');
p
p =
0.0000 0.0000 -0.0004 0.0081 -0.0783 0.3753 -0.7660 0.3815 -0.4104 10.6154
% 方程变换
>> x=linspace(0,4*pi,150);
y=2*exp(-(x-1).^2/1.^2)+0.1*rand(1);
plot(x,y,'.')
>> x=linspace(0,4*pi,50);
y=2*exp(-(x-1).^2/1.^2)+0.1*rand(1);
plot(x,y,'.')
>> x=linspace(0,4*pi,50);
y=2*exp(-(x-1).^2/1.^2)+0.1*rand(1);
plot(x,y,'.');
hold on;
[p,s]=polyfit(x,y,9);% 拟合为7阶的函数
x1=linspace(0,4*pi,50);
y1=polyval(p,x1);
plot(x1,y1,'color','r')
从上图我们可以看出9阶的拟合效果要比7阶的好很多,那么我们用c++实现的时候也就按照9阶的来。
声明
本文内容仅代表作者观点,或转载于其他网站,本站不以此文作为商业用途
如有涉及侵权,请联系本站进行删除
转载本站原创文章,请注明来源及作者。