edge.betweenness.community (graph, directed = TRUE,
edge.betweenness = TRUE, merges = TRUE, bridges = TRUE,
labels = TRUE)
edge.betweenness.community.merges (graph, edges)
merges
, even if the community
structure algorithm itself is divisive and not agglomeratedge.betweenness.community
,
with the following components:
removed.edges
.merges
argument for the
format.name
argument of the vertices.edge.betweenness.community
edge.betweenness
for details. The
idea of the edge betweenness based community structure detection is
that it is likely that edges connecting separate modules have high
edge betweenness as all the shortest paths from one module to another
must traverse through them. So if we gradually remove the edge with
the highest edge betweenness score we will get a hierarchical map, a
rooted tree, called a dendrogram of the graph. The leafs of the tree
are the individual vertices and the root of the tree represents the
whole graph. edge.betweenness.community
performs this algorithm by
calculating the edge betweenness of the graph, removing the edge with
the highest edge betweenness score, then recalculating edge
betweenness of the edges and again removing the one with the highest
score, etc.
edge.betweeness.community
returns various information collected
throught the run of the algorithm. See the return value down here.
edge.betweenness.community.merges
gets a list of edges and by
gradually removes them from the graph it creates a merge matrix
similar to the one returned by edge.betweenness.community
.
edge.betweenness
for the definition and
calculation of the edge betweenness,
walktrap.community
, fastgreedy.community
,
leading.eigenvector.community
for other community
detection methods. as.dendrogram
for creating an
R dendrogram object from the result of the clustering. See
community.to.membership
to create the actual communities
after a number of edges removed from the network.g <- barabasi.game(100,m=2)
eb <- edge.betweenness.community(g)
g <- graph.full(10) %du% graph.full(10)
g <- add.edges(g, c(0,10))
eb <- edge.betweenness.community(g)
E(g) [ eb$removed.edges[1] ]
Run the code above in your browser using DataLab