其他分享
首页 > 其他分享> > MATLAB实现0.618黄金分割法,牛顿法,最速下降法,共轭梯度法(运筹学)

MATLAB实现0.618黄金分割法,牛顿法,最速下降法,共轭梯度法(运筹学)

作者:互联网

0.618黄金分割法

a=0;b=4;
f=@(x) x^2-4*x+5;%匿名函数
e=0.001;n=0;
while((b-a)>=e)
    t1=a+0.382*(b-a);
    t2=a+0.618*(b-a);
    n=n+1;
    if(f(t1)<f(t2))
        b=t2;
    else
        a=t1;
    end
end
X=(a+b)/2;
fprintf('最优解:X=%f\n',X);
fprintf('此时最小f(x)=%f\n',f(X))
运行结果:

Newton牛顿法

​​​​​​​function [p,k] = Newton(f,p0,tol)
% f 目标函数
% p0 初值
% tol 计算终止误差
syms x
f1(x)=diff(f,x);
f2(x)=diff(f,x,2);
for k=1:200
    p1=p0-f1(p0)/f2(p0);
    err=abs(p1-p0);
    if err<tol
        break
    end
    p0=p1;
end     
p=vpa(p1);
end

运行结果:

最速下降法

function [x]=grad(f,x0,e,var)
syms x1 x2 t
d=-jacobian(f,var);%负梯度
p0=subs(d,var,x0);%负梯度值
v=p0*p0.';%求梯度模
v=v^0.5;
while (v>e)
    h=x0+t.*p0;%h=x+Ld
    fai=subs(f,var,h);%f(x+Ld)=fai(L)
    df=diff(fai);%求导
    t1=solve(df,t);%导函数为0时t的值
    x0=subs(h,t1);%新的点
    p0=subs(d,var,x0);%新的负梯度值
    v=p0*p0.';
    v=v^0.5;
end
x=vpa(x0);
end

运行结果:

共轭方向法

function [x]=gefx(f,x0,e,var)
syms x1 x2 t
d=-jacobian(f,var);%负梯度
p0=subs(d,var,x0);%负梯度值
v=p0*p0.';%求梯度模
v=v^0.5;
while(v>e)
    h=x0+t.*p0;%h=x+Ld
    fai=subs(f,var,h);%f(x+Ld)=fai(L)
    df=diff(fai);%求导
    t1=solve(df,t);%导函数为0时t的值
    x1=subs(h,t1);%新的点
    p0=subs(d,var,x1);%新的负梯度值
    v1=p0*p0.';
    v1=v1^0.5;
    if(v1>e)
        a=subs(d,var,x0);
        L=(v1^2)/(a*a.');%求λ的值
        p0=subs(d,var,x1)+L.*p0;
        x0=x1;v=v1;%进入下一个循环
    else
        break;
    end
        
end
x=vpa(x1);
end

运行结果:

标签:p0,subs,梯度,0.618,MATLAB,var,x0,x1,最速
来源: https://blog.csdn.net/mon_V/article/details/122273774