r - 凝集ブロックの計算 cohesion igraph 0.5.4

Question

cohesive.blocks()igraph 0.5.4 の各凝集ブロック (つまり の結果) の凝集を推定する多かれ少なかれ直接的な方法はありますか?

実際のバージョン (0.6) には という関数がありますcohesion()が、バージョン 0.5.x にはありません。それを計算する簡単な方法はありますか、それともブロックごとに個別に（手動で!!）行うべきですか？

Answer 1

これは、例であっても、実際にはドキュメントにあります。

g <- graph.disjoint.union(graph.full(4), graph.empty(2,directed=FALSE))
g <- add.edges(g,c(3,4,4,5,4,2))
g <- graph.disjoint.union(g,g,g)
g <- add.edges(g,c(0,6,1,7,0,12,4,0,4,1))

## Find cohesive blocks:
gBlocks <- cohesive.blocks(g)

## Examine block membership and cohesion:
gBlocks$blocks
# [[1]]
#  [1]  0  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17
# [[2]]
#  [1] 12 13 14 15 16
# [[3]]
#  [1]  0  1  2  3  4  6  7  8  9 10
# [[4]]
#  [1] 12 13 14 15
# [[5]]
#  [1] 0 1 2 3 4
# [[6]]
#  [1] 6 7 8 9

gBlocks$block.cohesion
# [1] 1 2 2 3 4 3