成功删除QG变量

This commit is contained in:
facat
2013-01-21 22:37:54 +08:00
parent d9f6d993e6
commit 618b56bc67
15 changed files with 25 additions and 30 deletions

View File

@@ -1,7 +1,7 @@
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)
Loadi=find(QD~=0 | PD~=0);
%Loadi=[1:Busnum]';
RestraintCount=size(PVi,1)+size(PGi,1)+size(Loadi,1)*2+Busnum*1; %,QD
RestraintCount=size(PGi,1)+size(Loadi,1)*2+Busnum*1; %,QD
t_Bal_volt=Volt(Balance);
Volt=sparse(1*ones(1,Busnum));
Volt(Balance)=t_Bal_volt;
@@ -16,14 +16,12 @@ tQU=sparse(PVQU(:,1));%
tPL=sparse(GenL(:,2));%
tQL=sparse(PVQL(:,1));%
PG(PGi)=(tPU+tPL)/2;
QG(PVi)=(tQU+tQL)/2;
wPG=0*ones(size(PGi,1),1);
wQG=0*ones(size(PVi,1),1);
wQG=0*ones(size(PVi,1),0);
%randInt=randperm(size(Loadi,1));
%randPDind=randInt(1:10);
randPDind=0;
wPD=20*ones(size(Loadi,1),1);
wQD=20*ones(size(Loadi,1),1);
%wD(randPDind)=0;%
%wD(7)=0;
% wD(11)=0;