2012-11-16 22:10:18 +08:00
|
|
|
|
function [Volt,UAngel,Init_Z,Init_W,Init_L,Init_U,Init_Y,PG,QG,RestraintCount,wPG,wQG,wPD,wQD,PD,PD0,QD,randPDind,Loadi]=OPF_Init(Busnum,Balance,PG,QG,Volt,GenU,GenL,PVi,PGi,PVQU,PVQL,PD0,QD0,QD,PD)
|
2012-08-01 10:32:46 +08:00
|
|
|
|
Loadi=find(QD~=0 | PD~=0);
|
2012-05-25 15:38:31 +08:00
|
|
|
|
%Loadi=[1:Busnum]';
|
2014-05-22 09:36:36 +08:00
|
|
|
|
RestraintCount=size(Loadi,1)*4+Busnum*2+Busnum+length(Loadi)*2; %Լ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,<EFBFBD>ſ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>QD
|
2014-05-22 10:24:34 +08:00
|
|
|
|
%<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
2014-05-25 11:35:26 +08:00
|
|
|
|
RestraintCount=RestraintCount+Busnum+length(Loadi)*2;
|
2012-05-22 11:33:21 +08:00
|
|
|
|
t_Bal_volt=Volt(Balance);
|
2012-05-27 19:54:38 +08:00
|
|
|
|
Volt=sparse(1*ones(1,Busnum));
|
2012-05-22 11:41:52 +08:00
|
|
|
|
Volt(Balance)=t_Bal_volt;
|
2012-05-24 10:34:04 +08:00
|
|
|
|
UAngel=sparse(1,Busnum);
|
|
|
|
|
|
Init_Z=sparse(ones(1,RestraintCount));
|
|
|
|
|
|
Init_W=sparse(-1*ones(1,RestraintCount));
|
2012-05-27 19:54:38 +08:00
|
|
|
|
Init_L=1*sparse(ones(1,RestraintCount));
|
|
|
|
|
|
Init_U=1*sparse(ones(1,RestraintCount));
|
2012-05-24 10:34:04 +08:00
|
|
|
|
Init_Y=sparse(1,2*Busnum);%<EFBFBD><EFBFBD>ѧ<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD>
|
|
|
|
|
|
tPU=sparse(GenU(:,2));% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|
|
|
|
|
tQU=sparse(PVQU(:,1));% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|
|
|
|
|
tPL=sparse(GenL(:,2));% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|
|
|
|
|
tQL=sparse(PVQL(:,1));% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
2013-01-23 21:27:33 +08:00
|
|
|
|
wPG=0;
|
|
|
|
|
|
wQG=0;
|
2012-09-11 19:27:02 +08:00
|
|
|
|
%randInt=randperm(size(Loadi,1));
|
|
|
|
|
|
%randPDind=randInt(1:10);
|
|
|
|
|
|
randPDind=0;
|
2014-05-13 16:48:46 +08:00
|
|
|
|
wPD=zeros(size(Loadi,1),1);
|
2013-04-04 22:05:27 +08:00
|
|
|
|
wPD(1:2:end)=0;
|
2014-05-13 16:48:46 +08:00
|
|
|
|
wQD=zeros(size(Loadi,1),1);
|
2013-04-04 22:05:27 +08:00
|
|
|
|
wQD(1:2:end)=0;
|
2012-07-25 15:08:54 +08:00
|
|
|
|
%wD(randPDind)=0;%һЩ<EFBFBD><EFBFBD><EFBFBD>ɲ<EFBFBD>Լ<EFBFBD><EFBFBD>
|
2012-06-06 10:19:08 +08:00
|
|
|
|
%wD(7)=0;
|
|
|
|
|
|
% wD(11)=0;
|
2014-07-21 21:49:50 +08:00
|
|
|
|
PD=0.0*PD0;
|
2012-11-04 12:37:11 +08:00
|
|
|
|
%powerFacter=0.98;
|
|
|
|
|
|
%QD=PD*sqrt((1-powerFacter^2)/powerFacter^2);
|
2014-07-21 21:49:50 +08:00
|
|
|
|
QD=.0*QD0;
|
2012-05-22 11:33:21 +08:00
|
|
|
|
end
|