随机测试缺负荷

Signed-off-by: facat <dmy@dmy-PC.(none)>
This commit is contained in:
facat
2012-06-06 10:19:08 +08:00
parent 54cd254cea
commit f9dc83b862
12 changed files with 172 additions and 42 deletions

View File

@@ -1,4 +1,4 @@
function [Volt,UAngel,Init_Z,Init_W,Init_L,Init_U,Init_Y,PG,QG,RestraintCount,wG,wD,PD,PD0,randPDind,Loadi]=OPF_Init(Busnum,Balance,PG,QG,Volt,GenU,GenL,PVi,PGi,PVQU,PVQL,PD0,QD)
function [Volt,UAngel,Init_Z,Init_W,Init_L,Init_U,Init_Y,PG,QG,RestraintCount,wG,wD,PD,PD0,randPDind,Loadi]=OPF_Init(Busnum,Balance,PG,QG,Volt,GenU,GenL,PVi,PGi,PVQU,PVQL,PD0,QD,HH)
Loadi=find(QD~=0);
%Loadi=[1:Busnum]';
RestraintCount=size(PVi,1)+size(PGi,1)+size(Loadi,1)+Busnum*1; %
@@ -17,13 +17,13 @@ tPL=sparse(GenL(:,2));%
tQL=sparse(PVQL(:,1));%
PG(PGi)=(tPU+tPL)/2;
QG(PVi)=(tQU+tQL)/2;
wG=ones(size(PGi,1),1);
wG=0.1*ones(size(PGi,1),1);
randInt=randperm(size(Loadi,1));
randPDind=randInt(1:0);
wD=ones(size(Loadi,1),1);
randPDind=randInt(1:HH);
wD=0.1*ones(size(Loadi,1),1);
wD(randPDind)=0;%
%wD(12)=0;
%wD(7)=0;
% wD(11)=0;
PD=1*PD0;
end