复杂网络度分布计算的Matlab程序

function [DeDaver_DeD]=Degree_Distribution（A）
%% 求网络图中各节点的度及度的分布曲线
%% 求解算法：求解每个节点的度，再按发生频率即为概率，求P（k） 
%A————————网络图的邻接矩阵
%DeD————————网络图各节点的度分布
%aver_DeD———————网络图的平均度
N=size（A2）;
DeD=zeros（1N）;
for i=1:N
   % DeD（i）=length（find（（A（i:）==1）））;
   DeD（i）=sum（A（i:））;
end
aver_DeD=mean（DeD）;

if sum（DeD）==0
    disp（‘该网络图只是由一些孤立点组成‘）;
    return;
else 
    figur