10 lines
190 B
Mathematica
10 lines
190 B
Mathematica
|
function Lw=FormLw(Mat_G,Init_U,GenU,Busnum,PVQU)
|
|||
|
|
|
|||
|
|
PU=GenU(:,2);%<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><EFBFBD>Ͻ<EFBFBD>
|
|||
|
|
QU=PVQU(:,1);%<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ͻ<EFBFBD>
|
|||
|
|
VoltU=1.1*ones(1,Busnum);
|
|||
|
|
|
|||
|
|
t1=([PU',QU',VoltU])';
|
|||
|
|
t2=Mat_G+Init_U'-t1;
|
|||
|
|
Lw=t2;
|
|||
|
|
end
|