matlab支路参数矩阵,哪位大神看看这个程序呀，参数下面给了

该楼层疑似违规已被系统折叠 隐藏此楼查看此楼

K=0;

N=input('请输入节点数:N=');

NPQ =input('请输入节点数:NPQ=');

NPV =input('请输入节点数:NPV=');

Nl=input('请输入支路数:Nl=');

B1=input('请输入由各支路参数形成的矩阵:B1=');%[1 2 0.1+0.4i 0.01528i 1 1;1 3 0.3i 0 1.1 0;1 4 0.12+0.5i 0.0192i 1 0;2 4 0.08+0.4i 0.01413i 1 0]格式为某支路的首端号P，某支路末端号Q，且P

Y=zeros(N);

for i=1:Nl

if B1(i,6)==0

p=B1(i,1);q=B1(i,2);

else p=B1(i,2);q=B1(i,1);

end

Y(p,q)=Y(p,q)-1./(B1(i,3)*B1(i,5));

Y(q,p)=Y(p,q);

Y(q,q)=Y(q,q)+1./(B1(i,3)*B1(i,5)^2)+B1(i,4)./2;

Y(p,p)=Y(p,p)+1./B1(i,3)+B1(i,4)./2;

end%求导纳矩阵

disp('导纳矩阵Y=');

disp(Y);G=real(Y);B=imag(Y);

Kmax=input('\n\n