facat
/
stateestimateionyalmip-lu9-forcomparision
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

加PD和QD上下界 

Signed-off-by: facat <dugg@21cn.com>
This commit is contained in:
facat 2013-04-06 21:44:24 +08:00
parent a3fb4e2222
commit 8990b8a278
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
Run_YALMIP.m
View File

@ -31,7 +31,6 @@ dPD=abs(dP./PD);
dQ=QG-QD-diag(Volt)*Y.*sin(AngleIJ)*Volt';
dQD=abs(dQ./QD);
maxdPQ=max([dPD(dPD<10);dQD(dQD<10)]);
[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);
%% ¨Òå±äÁ¿
BalVolt=Volt(Balance);
@ -50,8 +49,6 @@ assign(Volt(:),1);
assign(UAngel(:),0);
assign(PD(:),PD0(:));
assign(QD(:),QD0(:));
% assign(PG(:),PG0(:));
% assign(QG(:),QG0(:));
%% YALMIP²¿·Ö
dP=PG0-PD-diag(Volt)*Y.*cos( sparse(r,c,UAngel(r)-UAngel(c)-Angle,Busnum,Busnum) )*Volt;
dQ=QG0-QD-diag(Volt)*Y.*sin( sparse(r,c,UAngel(r)-UAngel(c)-Angle,Busnum,Busnum) )*Volt;
@ -64,7 +61,10 @@ Constraints = [%AngleIJ-sparse(r,c,UAngel(r)-UAngel(c)-Angle,Busnum,Busnum)==0,
PD(PD0==0)==0, ...
QD(QD0==0)==0, ...
0.9*ones(Busnum,1)<=Volt<=1.1*ones(Busnum,1), ...
Volt(Balance)==BalVolt;
Volt(Balance)==BalVolt, ...
UAngel(Balance)==0, ...
0.8*PD0<=PD<=1.2*PD0;
0.8*QD0<=QD<=1.2*QD0;
];
options = sdpsettings('verbose',2,'showprogress',1,'debug',0,'solver','ipopt','usex0','1');
sol = solvesdp(Constraints,Objective,options);
@ -75,7 +75,6 @@ if sol.problem == 0
dVangle=double(UAngel)
fprintf('ojb\n');
optimalObj=double(Objective)
double(PG)-PG0;
sol
else
display('Hmm, something went wrong!');