【#文档大全网# 导语】以下是®文档大全网的小编为您整理的《聚类系数》,欢迎阅读!
聚类系数
%%?求网络图中各节点的聚类系数及整个网络的聚类系数?
%%?求解算法:求解每个节点的聚类系数,找某节点的所有邻居,这些邻居节点构成一个子图?
%%?从A中抽出该子图的邻接矩阵,计算子图的边数,再根据聚类系数的定义,即可算出该节点的聚类系数?
%A————————网络图的邻接矩阵?
%C————————网络图各节点的聚类系数?%aver———————整个网络图的聚类系数 %% clc clear
A=zeros(11,11); fori=1:11 for j=1:11
if rem((i+j),2)==0 A(i,j)=floor((i+j)/2) else
A(i,j)=floor((i+j)/4) end end end
N=size(A,2); C=zeros(1,N); fori=1:N
aa=find(A(i,:)~=0); %寻找子图的邻居节点 ifisempty(aa)
disp(['节点',int2str(i),'为孤立节点,其聚类系数赋值为0']); C(i)=0; else
m=length(aa); if m==1
disp(['节点',int2str(i),'只有一个邻居节点,其聚类系数赋值为0']); C(i)=0; else
B=A(aa,aa) % 抽取子图的邻接矩阵 C(i)=length(find(B~=0))/(m*(m-1)); end end end
aver_C=mean(C)
本文来源:https://www.wddqxz.cn/418e5e88ed3a87c24028915f804d2b160b4e86c0.html