2013-03-05 10:43: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-11-04 12:37:11 +08:00
Loadi=find(QD~=0 | PD~=0);
%Loadi=[1:Busnum]';
2013-03-05 10:43:18 +08:00
RestraintCount=size(Loadi,1)*2+Busnum*1; %Լ<> <D4BC> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> ,<2C> ſ <EFBFBD> <C5BF> <EFBFBD> <EFBFBD> <EFBFBD> QD
2012-05-22 11:33:21 +08:00
t_Bal_volt=Volt(Balance);
2012-11-04 12:37:11 +08:00
Volt=sparse(1*ones(1,Busnum));
2012-05-22 11:33:21 +08:00
Volt(Balance)=t_Bal_volt;
2012-05-25 15:38:31 +08:00
UAngel=sparse(1,Busnum);
Init_Z=sparse(ones(1,RestraintCount));
Init_W=sparse(-1*ones(1,RestraintCount));
2012-11-04 12:37:11 +08:00
Init_L=1*sparse(ones(1,RestraintCount));
Init_U=1*sparse(ones(1,RestraintCount));
2012-05-25 15:38:31 +08:00
Init_Y=sparse(1,2*Busnum);%<25> <> ѧ<EFBFBD> <D1A7> һ <EFBFBD> <D2BB>
tPU=sparse(GenU(:,2));% <20> <> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> й<EFBFBD> <D0B9> <EFBFBD> <EFBFBD> <EFBFBD>
tQU=sparse(PVQU(:,1));% <20> <EFBFBD> <DEB9> <EFBFBD> <EFBFBD> <EFBFBD>
tPL=sparse(GenL(:,2));% <20> <> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> й<EFBFBD> <D0B9> <EFBFBD> <EFBFBD> <EFBFBD>
tQL=sparse(PVQL(:,1));% <20> <EFBFBD> <DEB9> <EFBFBD> <EFBFBD> <EFBFBD>
2013-03-05 10:43:18 +08:00
wPG=0;
wQG=0;
2012-11-04 12:37:11 +08:00
%randInt=randperm(size(Loadi,1));
%randPDind=randInt(1:10);
randPDind=0;
2013-03-06 22:16:56 +08:00
wPD=1/.05^2*zeros(size(Loadi,1),1);
2013-03-05 10:43:18 +08:00
wPD(1:2:end)=0;
2013-03-06 22:16:56 +08:00
wQD=1/.05^2*ones(size(Loadi,1),1);
2013-03-05 10:43:18 +08:00
wQD(1:2:end)=0;
2012-11-04 12:37:11 +08:00
%wD(randPDind)=0;%һ Щ<D2BB> <D0A9> <EFBFBD> ɲ<EFBFBD> Լ<EFBFBD> <D4BC>
%wD(7)=0;
% wD(11)=0;
2013-03-05 10:43:18 +08:00
PD=0.5*PD0;
2012-11-04 12:37:11 +08:00
%powerFacter=0.98;
%QD=PD*sqrt((1-powerFacter^2)/powerFacter^2);
2013-03-05 10:43:18 +08:00
QD=.5*QD0;
2012-05-22 11:33:21 +08:00
end