matlab 复杂网络工具箱

很有用的亲，MATLAB复杂网络少了他不行

function [BetweenneessCentrality varargout]= GraphBetweennessCentrality（GraphSourceNodes）
% Computes betweenneess centrality of each node. 
%   
% Receives:
%   Graph   -   Graph Struct           -    the graph loaded with GraphLoad
%   SourceNodes - array of double      -    （optional） nodes from which passes start. Default: [] （all nodes）.
%   
% Returns:
%   BetweenneessCentrality  -   array of double -   Betweenneess Centrality for each node.
%   Nodes                   -   array of double -   （optional）List of all nodes for which betweennessn centrality is computed
%
% Algorithm:
%   http://www.boost.org/libs/graph/doc/betweenness_centrality.html
%
% See Also:
%       mexGraphAllNodeShortestPasses
%

warning（‘Use the more optimized mexGraphBetweennessCentrality.dll‘）;

error（nargchk（12nargin））;
error（nargoutchk（02nargout））;

if ~exist（‘SourceNodes‘） | isempty（SourceNodes）
    SourceNodes = unique（Graph.Data（:1））;
end
Nodes = unique（Graph.Data（:1:2））;
%TotalPasses = zeros（GraphCountNumberOfNodes（Graph）GraphCountNumberOfNodes（Graph））;
Betweenness = zeros（GraphCountNumberOfNodes（Graph）1）;

for Node = Nodes（:）.‘
    [ShortesPasses PassesHistogram]= mexGraphAllNodeShortestPasses（GraphNode）;
    %TotalPasses = TotalPasses + sum（PassesHistogram（2:end））;
    tic
    for i = 1 : numel（ShortesPasses）
        %T = ShortesPasses（i）.Passes（end）;
        %TotalPasses（NodeShortesPasses（i）.Passes（end）） =  size（ShortesPasses（i）.Passes2）; % compute total number of shortes passes from Node to some other node.       
        Passes = ShortesPasses（i）.Passes（2:end-1:）;
        NodesOnTheWay = unique（Passes）;
        if numel（NodesOnTheWay）==1
            Count = 1; % hist behaves differently in this case.
        else
            Count = hist（Passes（:）NodesOnTheWay）;
        end
        Betweenness（NodesOnTheWay（:）） = Betweenness（NodesOnTheWay（:））+ Count（:）/size（ShortesPasses（i）.Passes2）;
    end
    toc
    disp（Node）
end

if nargout>1
    varagout{1} = Nodes;
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       7411  2007-05-25 23:12  matlab 复杂网络工具箱\fileslist.txt

     文件       1084  2007-05-25 22:37  matlab 复杂网络工具箱\FlexIO\FIOAddParameter.m

     文件        709  2007-05-25 22:37  matlab 复杂网络工具箱\FlexIO\FIOParameterNames.m

     文件       1468  2007-05-25 22:37  matlab 复杂网络工具箱\FlexIO\FIOProcessInputParameters.m

     文件       1439  2007-05-25 22:37  matlab 复杂网络工具箱\FlexIO\FIOTestInput.m

     文件       2052  2005-03-18 21:14  matlab 复杂网络工具箱\GraphBetweennessCentrality.m

     文件       4001  2005-07-02 18:30  matlab 复杂网络工具箱\GraphBetweennessDegreeHierarchy.m

     文件       1574  2006-06-23 15:27  matlab 复杂网络工具箱\GraphComponents.m

     文件       1545  2006-06-27 12:41  matlab 复杂网络工具箱\GraphComponentsDirected.m

     文件       1140  2005-11-04 13:58  matlab 复杂网络工具箱\GraphConvertFromV2.m

     文件       1109  2005-08-03 20:55  matlab 复杂网络工具箱\GraphCountNodeDegree.m

     文件       2264  2005-10-20 12:59  matlab 复杂网络工具箱\GraphCountNodesDegree.m

     文件        745  2004-05-26 10:00  matlab 复杂网络工具箱\GraphCountNumberOflinks.m

     文件       1013  2005-08-17 11:57  matlab 复杂网络工具箱\GraphCountNumberOfNodes.m

     文件       1837  2004-05-31 12:49  matlab 复杂网络工具箱\GraphCountStatistics.m

     文件       2870  2005-10-20 21:02  matlab 复杂网络工具箱\GraphCountUnderectionality.m

     文件       1307  2006-03-10 22:07  matlab 复杂网络工具箱\GraphCreateRandomGraph.m

     文件       3444  2005-02-14 18:09  matlab 复杂网络工具箱\GraphDrawGraphViz.m

     文件       3183  2005-02-15 12:58  matlab 复杂网络工具箱\GraphDrawPajek.m

     文件       3461  2005-12-01 09:23  matlab 复杂网络工具箱\GraphExportToFile.m

     文件      12335  2007-01-29 08:31  matlab 复杂网络工具箱\GraphExportToGML.m

     文件       1314  2005-03-20 14:15  matlab 复杂网络工具箱\GraphGenerateCompleteBipartiteGraph.m

     文件       1146  2005-03-20 14:08  matlab 复杂网络工具箱\GraphGenerateCompleteGraph.m

     文件       1057  2005-03-20 19:26  matlab 复杂网络工具箱\GraphGenerateCompleteKPartiteGraph.m

     文件       1376  2006-12-12 14:00  matlab 复杂网络工具箱\GraphGetNodeNames.m

     文件       3369  2005-08-07 13:22  matlab 复杂网络工具箱\GraphGetNodeProperty.m

     文件      53511  2007-05-25 23:42  matlab 复杂网络工具箱\GraphGIUBrowseGraph.m

     文件        488  2007-05-25 23:48  matlab 复杂网络工具箱\GraphGIUBrowseGraph.mat

     文件       6978  2005-07-28 13:11  matlab 复杂网络工具箱\GraphGIUSelectGraph.m

     文件       1167  2006-04-19 11:41  matlab 复杂网络工具箱\GraphKShell.m

............此处省略82个文件信息