14 lines
489 B
Mathematica
14 lines
489 B
Mathematica
|
|
function deltdeltF=func_deltdeltF(Busnum,GenC,PVi,PGi)
|
|||
|
|
|
|||
|
|
ContrlCount=size(PVi,1)+size(PGi,1)+Busnum*2; %P,Q,Volt theta<EFBFBD><EFBFBD>Щ<EFBFBD><EFBFBD><EFBFBD>Ʊ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
deltdeltF=[diag(GenC(:,2))*2,zeros(size(GenC,1),ContrlCount-size(GenC,1));
|
|||
|
|
zeros(ContrlCount-size(GenC,1),ContrlCount);
|
|||
|
|
]; %#ok<NASGU>
|
|||
|
|
sizeGenC=size(GenC(:,2),1);
|
|||
|
|
diagC=sparse(1:sizeGenC,1:sizeGenC,GenC(:,2),sizeGenC,sizeGenC);
|
|||
|
|
deltdeltF=[
|
|||
|
|
diagC*2,sparse(sizeGenC,ContrlCount-sizeGenC);
|
|||
|
|
sparse(ContrlCount-sizeGenC,ContrlCount);
|
|||
|
|
];
|
|||
|
|
|
|||
|
|
end
|