function Mat_G=FormG(Volt,PVi,PG,GB,AngleIJMat,indexi,indexj) t1=PG(PVi); %GP=t1;%发电机P GP=[4.5 4.5]'; %%线路 t1=Volt'*Volt; t2=real(GB).*cos(AngleIJMat)+imag(GB).*sin(AngleIJMat); t3=t1.*t2; t4=zeros(size(indexi,2),1); for I=1:size(indexi,2) t4(I)=Volt(indexi(I))*real(GB(indexi(I),indexj(I)))+t3(indexi(I),indexj(I));%线路 end LP=t4; %发电机Q t1=Volt'*Volt; t2=real(GB).*sin(AngleIJMat)-imag(GB).*cos(AngleIJMat); t3=t1.*t2; t4=sum(t3,2);%发电机Q GQ=t4; Mat_G=[ GP; GQ(PVi); Volt'; LP; ]; end