資源簡介
這是關于scale-free網絡的魯棒性研究的一點程序,,但還不是很完善

代碼片段和文件信息
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
評論
共有 條評論