Я работаю со списком сетевых графов (т. Е. С более чем 1000 матриц смежности), которые я анализирую с помощью пакета igraph. Графики хранятся в отдельном файле, каждый из которых имеет уникальный идентификатор.
Я рассчитал баллы центральности промежуточности отдельных узлов в каждом соответствующем графике, используя следующий код:
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
Теперь мне нужен один фрейм данных со столбцами для идентификаторов графика, идентификаторов узлов и индивидуальных оценок промежуточности. Нравится:
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 и т. Д., Но по какой-то причине я не могу заставить это работать. Если бы кто-нибудь мог мне с этим помочь, это было бы замечательно!
melt
, т.е.library(reshape2); melt(Between)
- person akrun   schedule 26.03.2016melt(lapply(Between, stack))[-2]
- person akrun   schedule 26.03.2016