46 lines
1.5 KiB
Plaintext
46 lines
1.5 KiB
Plaintext
|
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,notLoadi]=OPF_Init(Busnum,Balance,PG,QG,Volt,GenU,GenL,PVi,PGi,PVQU,PVQL,PD0,QD0,QD,PD)
|
|||
|
|
Loadi=find(QD~=0 | PD~=0);
|
|||
|
|
PDi=find(PD~=0);
|
|||
|
|
QDi=find(QD~=0);
|
|||
|
|
notLoadi=setxor(1:Busnum,Loadi);
|
|||
|
|
PGOnly=setdiff(PGi,PDi);
|
|||
|
|
QGOnly=setdiff(PVi,QDi);
|
|||
|
|
PDOnly=setdiff(PDi,PGi);
|
|||
|
|
QDOnly=setdiff(QDi,PVi);
|
|||
|
|
PGPD=intersec(PDi,PGi);
|
|||
|
|
QGQD=intersec(QDi,PVi);
|
|||
|
|
noPGPDQGQD=setdiff(1:B)
|
|||
|
|
%Loadi=[1:Busnum]';
|
|||
|
|
RestraintCount=size(PVi,1)+size(PGi,1)+size(Loadi,1)*1+Busnum*1; %Լ<><D4BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,<2C>ſ<EFBFBD><C5BF><EFBFBD><EFBFBD><EFBFBD>QD,<2C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><D4BC>QD<51><44><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
RestraintCount=RestraintCount+length(Loadi); %<25><><EFBFBD>Ϲ<EFBFBD><CFB9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ù<EFBFBD><C3B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><D4BC>QD
|
|||
|
|
t_Bal_volt=Volt(Balance);
|
|||
|
|
Volt=sparse(1*ones(1,Busnum));
|
|||
|
|
Volt(Balance)=t_Bal_volt;
|
|||
|
|
UAngel=sparse(1,Busnum);
|
|||
|
|
Init_Z=sparse(ones(1,RestraintCount));
|
|||
|
|
Init_W=sparse(-1*ones(1,RestraintCount));
|
|||
|
|
Init_L=1*sparse(ones(1,RestraintCount));
|
|||
|
|
Init_U=1*sparse(ones(1,RestraintCount));
|
|||
|
|
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>
|
|||
|
|
PG(PGi)=(tPU+tPL)/2;
|
|||
|
|
QG(PVi)=(tQU+tQL)/2;
|
|||
|
|
wPG=1*ones(size(PGi,1),1);
|
|||
|
|
wQG=1*ones(size(PVi,1),1);
|
|||
|
|
%randInt=randperm(size(Loadi,1));
|
|||
|
|
%randPDind=randInt(1:10);
|
|||
|
|
randPDind=0;
|
|||
|
|
wPD=1*ones(size(Loadi,1),1);
|
|||
|
|
wQD=1.5*ones(size(Loadi,1),1);
|
|||
|
|
%wD(randPDind)=0;%һЩ<D2BB><D0A9><EFBFBD>ɲ<EFBFBD>Լ<EFBFBD><D4BC>
|
|||
|
|
%wD(7)=0;
|
|||
|
|
% wD(11)=0;
|
|||
|
|
PD=1*PD0;
|
|||
|
|
%powerFacter=0.98;
|
|||
|
|
%QD=PD*sqrt((1-powerFacter^2)/powerFacter^2);
|
|||
|
|
QD=QD0;
|
|||
|
|
|
|||
|
|
end
|