orient.m

来自「化学计量学中利用信息上进行分辨的程序！用到了pso优化算法！可以得到很真实的光谱」· M 代码 · 共 16 行

function y=orient(x) 

%this is a function used to solve the minimum point
%it can derive the result when the independent is x

n=size(x,2);
X=dev_ls(x,5,3,1);
X=X(:,3:198);
%%X=dev_ls(x);
p=abs(X(1,:))./sum(abs(X(1,:)));
y0=0;
for i=1:n-8
    y0=y0-p(i)*log(p(i));  
end
y=y0;