聚类系数 %%?求网络图中各节点的聚类系数及整个网络的聚类系数? %%?求解算法：求解每个节点的聚类系数，找某节点的所有邻居，这些邻居节点构成一个子图? %%?从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.wddqw.com/doc/418e5e88ed3a87c24028915f804d2b160b4e86c0.html