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