pes2014-wronglowervoltagebound/FormH.m

function Mat_H=FormH(Busnum,Volt,PG,PD,QG,QD,Y,UAngel,r,c,Angle,QD_NON_ZERO,QD_NON_ZERO_IND)
%% 
%QDcos=textread('D:\Project\<EFBFBD><EFBFBD>С<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<EFBFBD><EFBFBD>С<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<EFBFBD>ɺ<EFBFBD>919PDQDglys.txt');
%QD(QD~=0)=PD(QD~=0)./tan(QDcos);
%QD(QD_NON_ZERO_IND)=QD_NON_ZERO;
%% 
AngleIJ=sparse(r,c,UAngel(r)-UAngel(c)-Angle',Busnum,Busnum);
dP=PG-PD-diag(Volt)*Y.*cos(AngleIJ)*Volt';
dQ=QG-QD-diag(Volt)*Y.*sin(AngleIJ)*Volt';

Mat_H=[dP;dQ;];

end
-												删掉多余的函数参数，统一了ContrlCount

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-05-25 17:16:59 +08:00
+								function Mat_H=FormH(Busnum,Volt,PG,PD,QG,QD,Y,UAngel,r,c,Angle,QD_NON_ZERO,QD_NON_ZERO_IND)
-												用功率因数计算QD，收敛良好。

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-05-24 10:07:18 +08:00
+								%%
-												更改路径

Signed-off-by: unknown <dmy@dmy-PC.(none)>

											
										
										
											2012-09-04 11:10:39 +08:00
+								%QDcos=textread('D:\Project\<EFBFBD><EFBFBD>С<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<EFBFBD><EFBFBD>С<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<EFBFBD>ɺ<EFBFBD>919PDQDglys.txt');
-												加错误数据识别

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-07-25 15:08:54 +08:00
+								%QD(QD~=0)=PD(QD~=0)./tan(QDcos);
-												随机测试缺负荷

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-06-06 10:19:08 +08:00
+								%QD(QD_NON_ZERO_IND)=QD_NON_ZERO;
-												用功率因数计算QD，收敛良好。

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-05-24 10:07:18 +08:00
+								%%
-												已全部稀疏化

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-05-24 10:34:04 +08:00
+								AngleIJ=sparse(r,c,UAngel(r)-UAngel(c)-Angle',Busnum,Busnum);
-												original.not modified.

											
										
										
											2012-05-22 11:33:21 +08:00
+								dP=PG-PD-diag(Volt)*Y.*cos(AngleIJ)*Volt';
 								dQ=QG-QD-diag(Volt)*Y.*sin(AngleIJ)*Volt';
-												已全部稀疏化

Signed-off-by: facat <dmy@dmy-PC.(none)>

											
										
										
											2012-05-24 10:34:04 +08:00
-												original.not modified.

											
										
										
											2012-05-22 11:33:21 +08:00
+								Mat_H=[dP;dQ;];
 								end