matlab中用K-means进行社区划分，求影响力最大化

matlab中用K-means进行社区划分，通过度最大的点，边的介数和点的介数求影响力最大化

filename=‘C:\Users\Administrator\Desktop\论文\基于蚁群算法的复杂网络社团发现新方法\GraphsCluster\karateClub.txt‘;
fileType=‘AdjMat‘;
% G是存放概率的邻接矩阵Ge是邻接矩阵
G=loadData（filenamefileType）;
Ge=G;
Ge（Ge~=0）=1;
[IdxCsumDD]=kmeans（Ge3）;
[nodearc]=betweenness_centrality（sparse（Ge））;
X=full（arc）;
Sum=sum（X）;
SumT=Sum‘;
Arc=[（1:length（Idx））‘SumT];
A=sortrows（Arc-2）;

S1=A（11）;
S2=[S1A（21）];
S3=[S2A（31）];
S4=[S3A（41）];
S5=[S4A（51）];

  G（S1S1）=1;
    G1=G;
    Ac=RandCas（G1）;
    I1=length（Ac（Ac~=0））; 

        a=S2（11）;
        b=S2（12）;
        G（aa）=1;
        G（bb）=1;
         G2=G;
     Ac=RandCas（G2）;
     I2=length（Ac（Ac~=0））; 
     
        a=S3（11）;
        b=S3（12）;
        c=S3（13）;
        G（aa）=1;
        G（bb）=1;
        G（cc）=1;
        G3=

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

     文件       1391  2018-04-15 09:44  New Folder\edgeBetweeness.m

     文件        197  2018-05-02 20:09  New Folder\haha.m

     文件       2582  2018-04-10 17:11  New Folder\karateClub.txt

     文件       3901  2018-05-02 11:02  New Folder\Kmeans1.m

     文件        827  2018-04-12 11:22  New Folder\loadData.m

     文件       3711  2018-04-14 11:51  New Folder\PointBetweeness.m

     文件        562  2018-04-10 19:39  New Folder\RandCas.m

     文件        124  2018-04-15 09:45  New Folder\Tu1.m

     目录          0  2018-05-02 21:04  New Folder

----------- ---------  ---------- -----  ----

                13295                    9