diff --git a/FormG.m b/FormG.m index f1857a1..755f22e 100644 --- a/FormG.m +++ b/FormG.m @@ -8,6 +8,6 @@ Mat_G=[ Volt'-mVolt'-bigM*Vbi-0.03; Volt'-mVolt'+bigM*Vbi+0.03; Vbi; - % PDbi; + PDbi; ]; end \ No newline at end of file diff --git a/FormLw.m b/FormLw.m index 836bf99..3ed0ca2 100644 --- a/FormLw.m +++ b/FormLw.m @@ -24,7 +24,7 @@ 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; -t1=([PDU',PDU',QDU',QDU',0*VoltU,100*ones(1,length(VoltU)),1*ones(1,Busnum)])'; +t1=([PDU',PDU',QDU',QDU',0*VoltU,100*ones(1,length(VoltU)),1*ones(1,Busnum+length(Loadi))])'; t2=Mat_G+Init_U'-t1; Lw=t2; diff --git a/FormLz.m b/FormLz.m index e55519a..8de54ba 100644 --- a/FormLz.m +++ b/FormLz.m @@ -21,7 +21,7 @@ indQD=find(realQD>0); QDL(indQD(3:12:end))=0.95*realQD(indQD(3:12:end)); QDL(indQD(9:12:end))=0.95*realQD(indQD(9:12:end)); % QDL=0*PD(Loadi).*sqrt((1-PF.^2))./PF; -t1=([PDL',PDL',QDL',QDL',-100*ones(1,length(VoltL)),0*VoltL,0*ones(1,Busnum)])'; +t1=([PDL',PDL',QDL',QDL',-100*ones(1,length(VoltL)),0*VoltL,0*ones(1,Busnum+length(Loadi))])'; t2=Mat_G-Init_L'-t1; Lz=t2; diff --git a/Modification.m b/Modification.m index 22a10ee..3c3daf2 100644 --- a/Modification.m +++ b/Modification.m @@ -25,5 +25,5 @@ Volt=Volt+AlphaP*t(1:Busnum); Volt(Balance)=balVolt; UAngel=UAngel+AlphaP*t(Busnum+1:2*Busnum); Vbi=Vbi+AlphaP*t(2*Busnum+1:2*Busnum+Busnum)'; -% PDbi=PDbi+AlphaP*t(3*Busnum+1:end)'; +PDbi=PDbi+AlphaP*t(3*Busnum+1:end)'; end \ No newline at end of file diff --git a/OPF.m b/OPF.m index 9a6d5d6..ce1795c 100644 --- a/OPF.m +++ b/OPF.m @@ -45,7 +45,7 @@ RealQD=QD0; Gap=(Init_L*Init_Z'-Init_U*Init_W'); KK=0; plotGap=zeros(1,60); -ContrlCount=size(Loadi,1)*2+Busnum*2+Busnum; +ContrlCount=size(Loadi,1)*2+Busnum*2+Busnum+length(Loadi); kmax=60; Precision=Precision/1; %% 加误差 diff --git a/OPF_Init.m b/OPF_Init.m index b6a756b..29f9c3e 100644 --- a/OPF_Init.m +++ b/OPF_Init.m @@ -1,7 +1,7 @@ function [Volt,UAngel,Init_Z,Init_W,Init_L,Init_U,Init_Y,PG,QG,RestraintCount,wPG,wQG,wPD,wQD,PD,PD0,QD,randPDind,Loadi]=OPF_Init(Busnum,Balance,PG,QG,Volt,GenU,GenL,PVi,PGi,PVQU,PVQL,PD0,QD0,QD,PD) Loadi=find(QD~=0 | PD~=0); %Loadi=[1:Busnum]'; -RestraintCount=size(Loadi,1)*4+Busnum*2+Busnum+length(Loadi)*0; %约束条件数,放开所有QD +RestraintCount=size(Loadi,1)*4+Busnum*2+Busnum+length(Loadi)*1; %约束条件数,放开所有QD t_Bal_volt=Volt(Balance); Volt=sparse(1*ones(1,Busnum)); Volt(Balance)=t_Bal_volt; diff --git a/func_ddh.m b/func_ddh.m index 8850a0c..a4390b5 100644 --- a/func_ddh.m +++ b/func_ddh.m @@ -51,7 +51,7 @@ t=[ddPdVdV+ddQdVdV,ddPdVdT+ddQdVdT; sizeLoadi=size(Loadi,1)*2; ddh=[ sparse(sizeLoadi,ContrlCount); - sparse(2*Busnum,sizeLoadi),-t,sparse(2*Busnum,Busnum); - sparse(Busnum,ContrlCount); + sparse(2*Busnum,sizeLoadi),-t,sparse(2*Busnum,Busnum+length(Loadi)); + sparse(Busnum+length(Loadi),ContrlCount); ]; end \ No newline at end of file diff --git a/func_deltF.m b/func_deltF.m index df1523c..409b262 100644 --- a/func_deltF.m +++ b/func_deltF.m @@ -3,7 +3,7 @@ deltF=[sparse(length(Loadi),1); sparse(length(Loadi),1); sparse(2*Busnum,1); sparse(ones(Busnum,1)); - %sparse(ones(length(Loadi),1)); + sparse(ones(length(Loadi),1)); ]; end \ No newline at end of file diff --git a/func_deltG.m b/func_deltG.m index 760acad..baaaa16 100644 --- a/func_deltG.m +++ b/func_deltG.m @@ -40,8 +40,8 @@ dg6_dvbi=sparse(eye(Busnum,Busnum)); dg7_dvbi=sparse(eye(Busnum,Busnum)); dgPDbi_dvbi=sparse(Busnum,sizeLoadi); %% -dg3_dPDbi=sparse(-eye(sizeLoadi)); -dg32_dPDbi=sparse(eye(sizeLoadi)); +dg3_dPDbi=sparse(-zeros(sizeLoadi)); +dg32_dPDbi=sparse(zeros(sizeLoadi)); dg4_dPDbi=sparse(length(Loadi),length(Loadi)); dg42_dPDbi=dg4_dPDbi; dg5_dPDbi=sparse(length(Loadi),Busnum); @@ -49,15 +49,11 @@ dg6_dPDbi=sparse(length(Loadi),Busnum); dg7_dPDbi=sparse(length(Loadi),Busnum); dgPDbi_dPDbi=sparse(eye(length(Loadi))); %% -% deltG=[dg3_dPD,dg32_dPD,dg4_dPD,dg42_dPD,dg5_dPD,dg6_dPD,dg7_dPD,dgPDbi_dPD; -% dg3_dQD,dg32_dQD,dg4_dQD,dg42_dQD,dg5_dQD,dg6_dQD,dg7_dQD,dgPDbi_dQD; -% dg3_dx,dg32_dx,dg4_dx,dg42_dx,dg5_dx,dg6_dx,dg7_dx,dgPDbi_dx; -% dg3_dvbi,dg32_dvbi,dg4_dvbi,dg42_dvbi,dg5_dvbi,dg6_dvbi,dg7_dvbi,dgPDbi_dvbi; -% dg3_dPDbi,dg32_dPDbi,dg4_dPDbi,dg42_dPDbi,dg5_dPDbi,dg6_dPDbi,dg7_dPDbi,dgPDbi_dPDbi; -% ]; -deltG=[dg3_dPD,dg32_dPD,dg4_dPD,dg42_dPD,dg5_dPD,dg6_dPD,dg7_dPD; - dg3_dQD,dg32_dQD,dg4_dQD,dg42_dQD,dg5_dQD,dg6_dQD,dg7_dQD; - dg3_dx,dg32_dx,dg4_dx,dg42_dx,dg5_dx,dg6_dx,dg7_dx; - dg3_dvbi,dg32_dvbi,dg4_dvbi,dg42_dvbi,dg5_dvbi,dg6_dvbi,dg7_dvbi; +deltG=[dg3_dPD,dg32_dPD,dg4_dPD,dg42_dPD,dg5_dPD,dg6_dPD,dg7_dPD,dgPDbi_dPD; + dg3_dQD,dg32_dQD,dg4_dQD,dg42_dQD,dg5_dQD,dg6_dQD,dg7_dQD,dgPDbi_dQD; + dg3_dx,dg32_dx,dg4_dx,dg42_dx,dg5_dx,dg6_dx,dg7_dx,dgPDbi_dx; + dg3_dvbi,dg32_dvbi,dg4_dvbi,dg42_dvbi,dg5_dvbi,dg6_dvbi,dg7_dvbi,dgPDbi_dvbi; + dg3_dPDbi,dg32_dPDbi,dg4_dPDbi,dg42_dPDbi,dg5_dPDbi,dg6_dPDbi,dg7_dPDbi,dgPDbi_dPDbi; ]; + end \ No newline at end of file diff --git a/func_deltH.m b/func_deltH.m index 33ac2c6..4eef687 100644 --- a/func_deltH.m +++ b/func_deltH.m @@ -4,6 +4,6 @@ dH_dQD=[sparse(size(Loadi,1),Busnum) sparse(1:size(Loadi,1),Loadi,-ones(size(Loa dH_dx = jacobian_M(Busnum,Volt,Y,Angle,UAngel,r,c); %形成雅克比矩阵 dH_dvbi=sparse(Busnum,2*Busnum); dH_dPDbi=sparse(length(Loadi),2*Busnum); -deltH=[dH_dPD;dH_dQD;dH_dx';dH_dvbi;]; +deltH=[dH_dPD;dH_dQD;dH_dx';dH_dvbi;dH_dPDbi]; end \ No newline at end of file