Matlab学习手记——线搜索Wolfe准则

测试:

>> [alpha, newxk, fk, newfk] = Opt_Wolfe([0 0]', [1 0]')
alpha =
    0.1250
newxk =
    0.1250
         0
fk =
     1
newfk =
    0.7900
  •  代码如下:
function [alpha, newxk, fk, newfk] = Opt_Wolfe(xk, dk)
rho = 0.25; 
sigma = 0.75;
alpha = 1; 
a = 0; 
b = 1; 
while a < b
    if fun(xk + alpha*dk) <= fun(xk) + rho*alpha*gfun(xk)'*dk
        if gfun(xk + alpha*dk)'*dk >= sigma*gfun(xk)'*dk
            break;
        else
            a = alpha;
            alpha = 0.5*(a + b);
        end
    else
        b = alpha;
        alpha = (alpha+a)/2;
    end
end
newxk = xk + alpha*dk;
fk = fun(xk);
newfk = fun(newxk);

function f=fun(x)
f = 100*(x(1)^2 - x(2))^2 + (x(1)-1)^2;

function gf=gfun(x)
gf = [400*x(1)*(x(1)^2 - x(2)) + 2*(x(1) - 1);
        -200*(x(1)^2 - x(2))];

 

评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值