这是关于scale-free网络的鲁棒性研究的一点程序,,但还不是很完善
代码片段和文件信息
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
文件 602 2009-09-21 11:22 sfnet.m
文件 499 2009-02-04 19:17 scalefree.m
----------- --------- ---------- ----- ----
1101 2
function [b]=scalefree(nimde)
b=zeros(m1);
dp=zeros(ni+11);
sk=0;
for i=1:ni
sk=sk+de(i);
end
dp(11)=0;
for i=1:ni
dp(i+11)=dp(i1)+de(i1);
end
is=1;
while is<=m
r=rand(11);
r=fix(r*sk+1);
for i=1:ni
if r>dp(i1)&r<=dp(i+11)
it=i;
end
end
pd=0;
for j=1:is
if it==b(j1)
pd=1;
end
end
if pd==0
b(is1)=it;
is=is+1;
else
is=is;
end
end
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
文件 602 2009-09-21 11:22 sfnet.m
文件 499 2009-02-04 19:17 scalefree.m
----------- --------- ---------- ----- ----
1101 2
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件举报,一经查实,本站将立刻删除。
评论列表(条)