我有一个由约 300 个节点组成的无向图。该图由多个连通图组成（下面的示例是由 5 个连通图组成的无向图）。使用 R，我如何提取每个连接的子图，以及它们的节点和边数。我的图表由两列 data.frame 表示：
node1 node2
node1 node3
node2 node5
...
使用下面的示例，预期结果将是
Subgraph NodeCount EdgeCount
1 2 1
2 4 3
3 2 1
4 2 1
5 2 1
谢谢
【问题讨论】：
你可以这样做：
library(igraph)
set.seed(1)
g <- simplify(graph.compose(graph.ring(10), graph.star(5, mode = "undirected"))) + edge("7", "8")
dg <- decompose.graph(g)
t(sapply(seq_along(dg), function(x) c(Subgraph = x, NodeCount = vcount(dg[[x]]), EdgeCount = ecount(dg[[x]]))))
# Subgraph NodeCount EdgeCount
# [1,] 1 7 12
# [2,] 2 2 1
# [3,] 3 1 0
示例图如下所示 (plot(g))：
【讨论】：
?igraph::graph.data.frame。