fun_d.m

来自「无标度网络的生成模型」· M 代码 · 共 19 行

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 功能：计算网路直径
%% 输入：距离矩阵；输出：网络直径
%%By Xiao Lp, 2007-07-07
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [d] = Fun_D( Mat_Distance)

Int_Nodes = size(Mat_Distance, 1);

Temp = 0;

for j= 1: Int_Nodes
    for i  = j : Int_Nodes
        Temp = Temp + Mat_Distance ( i, j);
    end
end

d = 2*Temp/(Int_Nodes*(Int_Nodes+1));