function [C,aver_C]=Clustering_Coefficient(A)
N=size(A,2);
C=zeros(1,N);
for i=1:N
aa=find(A(i,:)==1); %??????????????????
if isempty(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==1))/(m*(m-1));
end
end
end
aver_C=mean(C);