после создания списка годовых сетей я хочу преобразовать все из них в одну динамическую сеть.В качестве справочной информации: я сначала преобразовал проекты, связанные с несколькими людьми, в однорежимные сети, связывающие разных людей друг с другом.Теперь я хочу посмотреть на временное развитие этой сети, связанной с этой страной.Следующий код предоставляет мне вложенный список стран, тогда как каждая страна сама является списком ежегодных сетей с одним режимом.Но мне не удается построить динамическую структуру динамической сети obejtc (начало, смещение и т. Д., Как она используется в пакетах tsna, ndtv, networkDynamic).
Вот мой код
list_sna.y <- list()
list_sna.c <- list()
for (i in countries) {
country <- as.character(i)
for (j in years) {
year <- as.character(j)
sna.complete.list <- sna.complete[which(sna.complete$country.1 == i &
sna.complete$year.1 == j ),]
sna.list.complete.igraph.calc <- graph.data.frame(sna.complete.list)
V(sna.list.complete.igraph.calc)$type <- V(sna.list.complete.igraph.calc)$name %in%
sna.complete.list$persons
sna.list.complete.igraph.calc.one <- try(bipartite.projection(sna.list.complete.igraph.calc,
type=V(sna.list.complete.igraph.calc)$type))
list_sna.y[[year]] <- sna.list.complete.igraph.calc.one[[2]]
}
list_sna.c[[country]] <- list_sna.y
}