38 lines
1.0 KiB
Mathematica
38 lines
1.0 KiB
Mathematica
|
function Lw=FormLw(Mat_G,Init_U,Loadi,rPD3P,rQD3P,mVoltABCV,PDU,QDU)
|
|||
|
|
% KK=999;
|
|||
|
|
% %PU=GenU(:,2);%<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>й<EFBFBD><EFBFBD>Ͻ<EFBFBD>
|
|||
|
|
%
|
|||
|
|
% VoltU=(1.1)*ones(1,Busnum);
|
|||
|
|
% %VoltU=10*ones(1,Busnum);
|
|||
|
|
% PDU=PD0(Loadi);
|
|||
|
|
% % PDU=noDataTransCapacity;
|
|||
|
|
% PDU(PDU>0)=1.200*PDU(PDU>0);
|
|||
|
|
% PDU(PDU<0)=0.800*PDU(PDU<0);
|
|||
|
|
% PDU(PDU==0)=0.400;
|
|||
|
|
% realPD=PD0(Loadi);
|
|||
|
|
% indPD=find(realPD>0);
|
|||
|
|
% PDU(indPD(3:12:end))=1.55*realPD(indPD(3:12:end));
|
|||
|
|
% PDU(indPD(9:12:end))=1.05*realPD(indPD(9:12:end));
|
|||
|
|
% %PDU=10*ones(length(Loadi),1);
|
|||
|
|
% QDU=QD0(Loadi);
|
|||
|
|
% QDU(QDU>0)=1.200*QDU(QDU>0);
|
|||
|
|
% QDU(QDU<0)=0.800*QDU(QDU<0);
|
|||
|
|
% QDU(QDU==0)=0.400;
|
|||
|
|
% realQD=QD0(Loadi);
|
|||
|
|
% indQD=find(realQD>0);
|
|||
|
|
% QDU(indQD(3:12:end))=1.55*realQD(indQD(3:12:end));
|
|||
|
|
% QDU(indQD(9:12:end))=1.05*realQD(indQD(9:12:end));
|
|||
|
|
% PF=0.85;
|
|||
|
|
% QDU=1.0*PD(Loadi).*sqrt(1 -PF.^2)./PF;
|
|||
|
|
% PDU=1.8*ones(length(Loadi),1);
|
|||
|
|
% QDU=1.8*ones(length(Loadi),1);
|
|||
|
|
|
|||
|
|
% PDU=1.3*rPD3P.*(1+unifrnd(-0.15,0.15,length(rPD3P),1));
|
|||
|
|
% QDU=1.3*rQD3P.*(1+unifrnd(-0.15,0.15,length(rPD3P),1));
|
|||
|
|
|
|||
|
|
% t1=([PDU',QDU',1*ones(length(Volt),1)'])';
|
|||
|
|
t1=([PDU',QDU'])';
|
|||
|
|
t2=Mat_G+Init_U'-t1;
|
|||
|
|
Lw=t2;
|
|||
|
|
|
|||
|
|
end
|