facat
/
stateestimation-ipm
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

完成了含有电压幅值，线路功率，变压器功率的状态估计程序。 

Signed-off-by: facat <facat@facat.cn>
This commit is contained in:
facat 2013-08-17 17:50:36 +08:00
parent d39075c0aa
commit e7e390c20a
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
run.m
View File

@ -208,17 +208,18 @@ while maxD>1e-3;
SEBranchI=BranchI( SEVolt.*exp(1j*SEVAngel),lineI,lineJ,lineR,lineX );%复数支路电流 SEBranchI=BranchI( SEVolt.*exp(1j*SEVAngel),lineI,lineJ,lineR,lineX );%复数支路电流
SEBranchP=BranchP( SEVolt.*exp(1j*SEVAngel),SEBranchI,lineI,lineB2 ); SEBranchP=BranchP( SEVolt.*exp(1j*SEVAngel),SEBranchI,lineI,lineB2 );
SEBranchQ=BranchQ( SEVolt.*exp(1j*SEVAngel),SEBranchI,lineI,lineB2 ); SEBranchQ=BranchQ( SEVolt.*exp(1j*SEVAngel),SEBranchI,lineI,lineB2 );
SETransP=TransPower( newwordParameter,cmpY,rVolt,rVAngel ); SETransP=TransPower( newwordParameter,SEVolt,SEVAngel );
h=[SEVolt;SEBranchP;SEBranchQ]; SETransQ=TransReactivePower( newwordParameter,SEVolt,SEVAngel );
z=[mVolt;mBranchP;mBranchP]; h=[SEVolt;SEBranchP;SEBranchQ;SETransP;SETransQ];
z=[mVolt;mBranchP;mBranchQ;mTransP;mTransQ];
W=sparse(1:length(h),1:length(h),1/sigma.^2,length(h),length(h)); W=sparse(1:length(h),1:length(h),1/sigma.^2,length(h),length(h));
G=H'*W*H; G=H'*W*H;
g=-H'*W*(z-h); g=-H'*W*(z-h);
% 平衡节点相角恒定; % 平衡节点相角恒定;
% G(length(mVolt)+Balance,:)=0; G(length(mVolt)+Balance,:)=0;
% G(:,length(mVolt)+Balance)=0; G(:,length(mVolt)+Balance)=0;
% G=G+sparse(length(mVolt)+Balance,length(mVolt)+Balance,1,length(mVolt)*2,length(mVolt)*2); G=G+sparse(length(mVolt)+Balance,length(mVolt)+Balance,1,length(mVolt)*2,length(mVolt)*2);
% g(length(mVolt)+Balance)=0; g(length(mVolt)+Balance)=0;
dX=G\-g; dX=G\-g;
maxD=max(abs(dX)) maxD=max(abs(dX))
% 更新变量 % 更新变量