具有特定属性值的连接节点的图形数目

Question

我有一个图：

g <- make_empty_graph (2) %>%
  set_vertex_attr("a", value = 1) %>%
  add_vertices(2, color = 2, "a" = 2) %>%
  add_vertices(2, color = 4, "a" = 3) %>%
  add_edges(c(1, 2, 2, 1, 1, 5, 5, 1, 1, 4, 4, 1))
plot(g)

有没有一种方法可以找出有多少个属性“ a”的值为2的节点连接到节点“ 1”？

Answer 1

您可以使用neighbors获取节点1的neighbors ，然后测试哪些neighbors具有“ a” = 2。

NeighborList = neighbors(g, 1)
NeighborList[NeighborList$a == 2]
+ 1/6 vertex, from 3502fa5:
[1] 4