Сетевой объект из фрейма данных - PullRequest
Новая
       13

Сетевой объект из фрейма данных

0 голосов
/ 15 ноября 2018

Я надеюсь создать сетевой объект из фрейма данных.

Фрейм данных представляет собой портфель альянса, связи оцениваются и имеются атрибуты вершин как для состояния A, так и для состояния B

Данные выглядят примерно так 

data <- data.frame(CC1 = c(2,2,2,2,2,2,20,20,20,20,20,40,40,40,40,41,41,41,42,42,70), 
               CC2 = c(20,40,41,42,70,90,40,41,42,70,90,41,42,70,90,42,70,90,70,90,90),
               weight=rnorm(n=21, mean=0.337, sd=0.75),
               type1=c("x","x","x","x","x","x","x","x","x","x","x","y","y","y","y","z","z","z","a","a","b"),
               type2=c("x","y","z","a","b","c","y","z","a","b","c","z","a","b","c","a","b","c","b","c","c"))

CC1 - это состояние A CC2 - это состояниеB, а вес - это уровень их союза. Тип 1 и Тип 2 являются атрибутами CC1 и CC2 соответственно.

Я успешно создал матрицу смежности, но при попытке создать сетевой объект выдает ошибку «аргумент не матрица» 

nodes=unique(c(data[,1],data[,2]))
g=graph.data.frame(data, directed=F, vertices=nodes)
a=as_adjacency_matrix(g,attr = "weight",sparse = T)
n=network(a, directed=FALSE, loops=FALSE)

В конечном итоге я пытаюсь создать сетевой объект, чтобы я мог запустить модель эргма и включить соответствие узлов для типа.

...