facat/pes2014
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

已全部稀疏化

Browse Source 
Signed-off-by: facat <dmy@dmy-PC.(none)>
This commit is contained in:
facat
2012-05-24 10:34:04 +08:00
parent ca24c4f8d5
commit 9c5239bd1e
14 changed files with 166 additions and 936 deletions
Download Patch File Download Diff File Expand all files Collapse all files

64
func_deltG.m
View File

@@ -1,27 +1,49 @@
function deltG=func_deltG(Busnum,PVi,PGi)
dg1_dPg=eye(size(PGi,1));
dg2_dPg=zeros(size(PGi,1),size(PVi,1));
dg3_dPg=zeros(size(PGi,1),Busnum);
dg4_dPg=zeros(size(PGi,1),Busnum);
%%
dg1_dQr=zeros(size(PVi,1),size(PGi,1));
dg2_dQr=eye(size(PVi,1));
dg3_dQr=zeros(size(PVi,1),Busnum);
dg4_dQr=zeros(size(PVi,1),Busnum);
%%
dg1_dPD=zeros(Busnum,size(PGi,1));
dg2_dPD=zeros(Busnum,size(PVi,1));
dg3_dPD=eye(Busnum,Busnum);
dg4_dPD=zeros(Busnum,Busnum);
sizePGi=size(PGi,1);
sizePVi=size(PVi,1);
%%
% dg1_dPg=eye(size(PGi,1));
% dg2_dPg=zeros(size(PGi,1),size(PVi,1));
% dg3_dPg=zeros(size(PGi,1),Busnum);
% dg4_dPg=zeros(size(PGi,1),Busnum);
dg1_dPg=sparse(1:sizePGi,1:sizePGi,ones(sizePGi,1),sizePGi,sizePGi);
dg2_dPg=sparse(sizePGi,sizePVi);
dg3_dPg=sparse(sizePGi,Busnum);
dg4_dPg=sparse(sizePGi,Busnum);
%%
dg1_dx=zeros(2*Busnum,size(PGi,1));
dg2_dx=zeros(2*Busnum,size(PVi,1));
dg3_dx=zeros(2*Busnum,Busnum);
dg4_dx=zeros(2*Busnum,Busnum);
for I=1:Busnum
%dg3_dx(2*I,I)=1;ÔÝĘą¸ÄŇťĎÂ
dg4_dx(I,I)=1;
end
% dg1_dQr=zeros(size(PVi,1),size(PGi,1));
% dg2_dQr=eye(size(PVi,1));
% dg3_dQr=zeros(size(PVi,1),Busnum);
% dg4_dQr=zeros(size(PVi,1),Busnum);
dg1_dQr=sparse(sizePVi,sizePGi);
dg2_dQr=sparse(1:sizePVi,1:sizePVi,ones(sizePVi,1),sizePVi,sizePVi);
dg3_dQr=sparse(sizePVi,Busnum);
dg4_dQr=sparse(sizePVi,Busnum);
%%
% dg1_dPD=zeros(Busnum,size(PGi,1));
% dg2_dPD=zeros(Busnum,size(PVi,1));
% dg3_dPD=eye(Busnum,Busnum);
% dg4_dPD=zeros(Busnum,Busnum);
dg1_dPD=sparse(Busnum,size(PGi,1));
dg2_dPD=sparse(Busnum,size(PVi,1));
dg3_dPD=sparse(1:Busnum,1:Busnum,ones(Busnum,1),Busnum,Busnum);
dg4_dPD=sparse(Busnum,Busnum);
%%
% dg1_dx=zeros(2*Busnum,size(PGi,1));
% dg2_dx=zeros(2*Busnum,size(PVi,1));
% dg3_dx=zeros(2*Busnum,Busnum);
% dg4_dx=zeros(2*Busnum,Busnum);
% for I=1:Busnum
% %dg3_dx(2*I,I)=1;ÔÝĘą¸ÄŇťĎÂ
% dg4_dx(I,I)=1;
% end
dg1_dx=sparse(2*Busnum,sizePGi);
dg2_dx=sparse(2*Busnum,sizePVi);
dg3_dx=sparse(2*Busnum,Busnum);
dg4_dx=[sparse(1:Busnum,1:Busnum,ones(Busnum,1),Busnum,Busnum);
sparse(Busnum,Busnum);
];
%%
deltG=[dg1_dPg,dg2_dPg,dg3_dPg,dg4_dPg;
dg1_dQr,dg2_dQr,dg3_dQr,dg4_dQr;