25 lines
789 B
Mathematica
25 lines
789 B
Mathematica
|
function [Volt,UAngel,Init_Z,Init_W,Init_L,Init_U,Init_Y,PG,QG,RestraintCount]=OPF_Init(Busnum,Balance,PG,QG,Volt,GenU,GenL,PVi,PGi,PVQU,PVQL)
|
|||
|
|
RestraintCount=size(PVi,1)+size(PGi,1)+Busnum; %Լ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
t_Bal_volt=Volt(Balance);
|
|||
|
|
Volt=ones(1,Busnum);
|
|||
|
|
%Volt(Balance)=t_Bal_volt;
|
|||
|
|
Volt(Balance)=1;
|
|||
|
|
UAngel=zeros(1,Busnum);
|
|||
|
|
Init_Z=ones(1,RestraintCount);
|
|||
|
|
Init_W=-1*ones(1,RestraintCount);
|
|||
|
|
Init_L=ones(1,RestraintCount);
|
|||
|
|
Init_U=ones(1,RestraintCount);
|
|||
|
|
%Init_Y=zeros(1,2*Busnum);
|
|||
|
|
%Init_Y=ones(1,2*Busnum);
|
|||
|
|
Init_Y=zeros(1,2*Busnum);%<EFBFBD><EFBFBD>ѧ<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD>
|
|||
|
|
%Init_Y(1:2:2*Busnum)=1e-10;
|
|||
|
|
%Init_Y(2:2:2*Busnum)=-1e-10;
|
|||
|
|
tPU=GenU(:,2);% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
tQU=PVQU(:,1);% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
tPL=GenL(:,2);% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
tQL=PVQL(:,1);% <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
%PG(4:5)=[4.5 4.5];
|
|||
|
|
PG(PGi)=(tPU+tPL)/2;
|
|||
|
|
%QG(4:5)=[0 1.45];
|
|||
|
|
QG(PVi)=(tQU+tQL)/2;
|
|||
|
|
end
|