example5_29.m

来自「MATLAB7辅助控制系统设计与仿真 第5章」· M 代码 · 共 9 行

function [eval]=griewangk(sol)
numv = size(sol,2);
x=sol(1:numv);
multi=1;
for i=1:numv
  multi=multi*cos(x(i)/sqrt(i));
end
eval=sum(x.^2/4000)-multi+1;