資源簡介
應用粒子群法解決電力系統中經濟調度問題,減少了代碼的長度,適合仿真使用。

代碼片段和文件信息
function?[P?Fcost?Pl]=eld(dataBPd)
if?nargin?~=?3
?????error(‘Wrong?number?of?input?arguments‘)
end
ss=size(data);
if?ss(2)~=5
????P=‘data?is?wrong?the?matrix?should?have?six?columns‘;
????Fcost=‘verify?your?data‘;
?????Pl=‘verify?your?data‘;
else
end
warning?off
n=length(data(:1));
?????Aeq=ones(1n);
?????a=data(:1);
??????????b=data(:2);
???????????????c=data(:3);
????????????????????l=data(:4);
?????????????????????????u=data(:5);
???????????????????????????P=l;
?????????????????????????for?i=1:10
?????????????????????????????Pl=P‘*B*P;
?????????????????????????????Pd1=Pd+Pl;
?????????????????????????????ll=diag(1-2*B*P);
?????????????????????????????A1=inv(ll)*a;
??????????????????????????????B1=inv(ll)*b;
??????????????????????????????H=2*diag(A1);
??????????????????????????????P=quadprog(HB1[][]AeqPd1lu);
?????????????????????????end
??????????????????????????????Fcost=sum(a.*P.*P+b.*P+c);
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????953??2009-03-28?18:16??pso(economic?dispatch)\eld.m
?????文件????????172??2004-04-27?15:05??pso(economic?dispatch)\forcecol.m
?????文件????????181??2004-04-27?15:05??pso(economic?dispatch)\forcerow.m
?????文件???????5788??2006-03-14?10:42??pso(economic?dispatch)\goplotpso.m
?????文件??????28672??2009-03-30?11:29??pso(economic?dispatch)\introduction.doc
?????文件?????126739??2008-05-27?09:54??pso(economic?dispatch)\ll1411.pdf
?????文件???????4588??2006-03-17?10:52??pso(economic?dispatch)\normmat.m
?????文件????????922??2009-03-28?16:03??pso(economic?dispatch)\psoeld.m
?????文件???????1032??2009-03-28?18:22??pso(economic?dispatch)\psotest.m
?????文件??????22221??2008-08-06?00:14??pso(economic?dispatch)\pso_Trelea_vectorized.m
?????文件????????758??2009-03-28?18:15??pso(economic?dispatch)\test.m
?????目錄??????????0??2009-05-31?08:47??pso(economic?dispatch)
-----------?---------??----------?-----??----
???????????????192026????????????????????12
評論
共有 條評論