基本信息
源码名称:导纳矩阵matlab代码
源码大小:0.61KB
文件格式:.m
开发语言:MATLAB
更新时间:2021-07-04
友情提示:(无需注册或充值,赞助后即可获取资源下载链接)
嘿,亲!知识可是无价之宝呢,但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下,绝对物超所值哦!如有下载和支付问题,请联系我们QQ(微信同号):813200300
本次赞助数额为: 2 元×
微信扫码支付:2 元
×
请留下您的邮箱,我们将在2小时内将文件发到您的邮箱
源码介绍
N=input('请输入节点数: N=');
L=input('请输入支路数: L=');
B=input('请输入支路信息: B=');
X=input('请输入由节点号及其对地阻抗形成的矩阵:X=');
Y=zeros(N);
for n=1:N
if X(n,2)~=0
p=X(n,1);
Y(p,p)=1./X(n,2);
end
end
for n=1:L
if B(n,6)==0
p=B(n,1);q=B(n,2);
else
p=B(n,2);
q=B(n,1);
end
Y(p,q)=Y(p,q)-1./(B(n,3)*B(n,5));
Y(q,p)=Y(p,q);
Y(q,q)=Y(q,q) 1./(B(n,3)*B(n,5)^2) B(n,4)./2;
Y(p,p)=Y(p,p) 1./B(n,3) B(n,4)./2;
end
disp('导纳矩阵Y=');
disp(Y)
N=input('请输入节点数: N=');
L=input('请输入支路数: L=');
B=input('请输入支路信息: B=');
X=input('请输入由节点号及其对地阻抗形成的矩阵:X=');
Y=zeros(N);
for n=1:N
if X(n,2)~=0
p=X(n,1);
Y(p,p)=1./X(n,2);
end
end
for n=1:L
if B(n,6)==0
p=B(n,1);q=B(n,2);
else
p=B(n,2);
q=B(n,1);
end
Y(p,q)=Y(p,q)-1./(B(n,3)*B(n,5));
Y(q,p)=Y(p,q);
Y(q,q)=Y(q,q) 1./(B(n,3)*B(n,5)^2) B(n,4)./2;
Y(p,p)=Y(p,p) 1./B(n,3) B(n,4)./2;
end
disp('导纳矩阵Y=');
disp(Y)