f6.m

来自「利用PSO算法解决经济批量分发问题的matlab源代码」· M 代码 · 共 13 行

 function [y  Pl]=f6(in)
 in=abs(in);
global data B B0  Pd
a=data(:,1);
b=data(:,2);
c=data(:,3);
 y1=in.*in*diag(a)+in*diag(b);
 Pl1=(in*B).*in+in*diag(B0);
 Pl=sum(Pl1')';
 lam=abs(Pd+Pl'-sum(in'))';
 y=(sum(y1')+sum(c))'+100*lam;