Добавление атрибута ребра к сетевому объекту со статнетом в R

Question

Я пытаюсь добавить атрибут края в network объект с statnet в R используя функцию add.edge.attribute(),

Здесь network объект:

> g
 Network attributes:
  vertices = 866 
  directed = TRUE 
  hyper = FALSE 
  loops = FALSE 
  multiple = TRUE 
  bipartite = FALSE 
  total edges= 5310 
    missing edges= 0 
    non-missing edges= 5310 

 Vertex attribute names: 
    vertex.names 

 Edge attribute names not shown

Я тогда использовал add.edge.attribute()с нижеследующим connections, который имеет ту же длину, что и количество ребер в сети:

> table(connections)
favorite  mention  retweet 
    2564     2041      705 
> sum(table(connections))
[1] 5310
> g <- set.edge.attribute(g, "connection_type", connections)

Тем не менее, когда я проверяю network объект, кажется, ничего не изменилось:

> g
 Network attributes:
  vertices = 866 
  directed = TRUE 
  hyper = FALSE 
  loops = FALSE 
  multiple = TRUE 
  bipartite = FALSE 
  total edges= 5310 
    missing edges= 0 
    non-missing edges= 5310 

 Vertex attribute names: 
    membership vertex.names 

 Edge attribute names not shown

Тем не менее, когда я проверяю с get.edge.attribute()Вроде бы сработало

> tmp <- get.edge.attribute(g, "connection_type")
> str(tmp)
 chr [1:5310] "mention" "mention" "mention" "mention" "mention" "mention" "mention" "mention" ...

И, когда я пытаюсь использовать атрибут края как часть ergm модель - я пытался использовать edgecov(), ошибка ниже была возвращена:

m1 <- ergm(g ~ edges + mutual + edgecov("connection_type"))
Error: There is no network attribute named connection_type

Что дает? Почему имена атрибутов ребер не отображаются? И почему он не работает как часть модели ergm?

Answer 1

M 1 <- ergm (g ~ ребра + взаимные + ребра (g,"тип_подключения"))