zw_wolfe.zip

zw_wolfe.zip

function alf=wolfe（fxx0p）
u=0.1; q=0.5; a=0; b=inf; alf=1; j=0;  
g=grad（fxx0）; 
while j<=100
    xk=x0+alf*p;
    h=-u.*alf.*g‘*p;
    while double（subs（f{x}{x0}））-double（subs（f{x}{xk}））< h;% 条件（1.6）%
        b=alf;
        alf=（alf+a）/2;
        h=-u.*alf.*g‘*p;
        xk=x0+alf*p;
        j=j+1;
    end;
    gk=grad（fxxk）;
    if gk‘*p < q.*g‘*p %条件（1.7）%
        a=alf;
        alf=min（2*alf（alf+b）/2）;
        j=j+1;
    else
        break;
    end;
end;
%page 24%

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件         492  2019-03-16 09:23  \wolfe.m
     文件          36  2019-03-16 09:23  \no.txt