fun.asv

用0.618法和Fibonacci法求解函数最小值

function x_min=fun(X,S)
format long;
Y=X-a.*S
f=100(Y(2)-(Y(1))^2)^2+(1-Y(1))^2+90*(Y(4)-(Y(3))^2)^2+(1-Y(3))^2+10.1*((Y(2)-1)^2+(Y(4)-1)^2)+19.8*(Y(2)-1)*(Y(4)-1);
format long;