shufcn.m

matlab宝典,电子工业出版社,包含该书的源码2-4章

function f = shufcn(y)
for j = 1: size(y,1)
    f(j) = 0.0;
    x = y(j,:);
    temp1 = 0; 
    temp2 = 0;
    x1 = x(1);
    x2 = x(2);
    for i = 1:5
        temp1 = temp1 + i.*cos((i+1).*x1+i);
        temp2 = temp2 + i.*cos((i+1).*x2+i);
    end
    f(j) = temp1.*temp2;
end