我正在使用igraph包分析的网络图列表(即 1000 多个邻接矩阵)。这些图表存储在一个拆分文件中,每个图表都有一个唯一的 ID。
我使用以下代码计算了每个图中各个节点的中介中心性分数:
b <- function (b) betweenness(b, directed = FALSE, normalized = TRUE)
Between <- lapply (listofgraphs, b)
show(Between) #looks like this:
$`35630` #Graph ID
1676 1741 1750 #Node ID
0 1 0 #Scores
$`35631`
1738 1750
0 1
$`35633`
1738 1750 4110
0 0 0
现在,我需要的是一个数据框,其中包含图表 ID、节点 ID 和介数的各个分数的列。像这样:
Graph.ID Node.ID Betweenness
35630 1676 0
35630 1741 1
35630 1759 0
35631 1738 0
35631 1750 1
35631 1738 0
35633 1750 0
35633 et cetera .....
我试图取消列出、rbind 等,但由于某种原因我无法让它工作。如果有人可以帮助我,那就太棒了!