R字形索引

Question

我在执行以下代码时遇到了一些问题：

library(igraph)
library('ggplot2')
subgraphz <- graph.famous("Zachary")

qq <- transitivity(subgraphz, type="local")
qq <- max(q, na.rm = TRUE)

V(subgraphz)$tr <- (transitivity(subgraphz, v=V(subgraphz), 
type="local"))
V(subgraphz)$size <- 5
V(subgraphz)[tr==qq]$size <- 15

plot(subgraphz)

我知道这个错误：

simple_vs_index(x，ii，na_ok)：选定的未知顶点

我预计具有最大传递性值的顶点将变成15大小。这是关于逻辑索引的，但我不知道如何才能准确地解决这个问题。

Answer 1

您可以像这样指定想要的顶点

V(subgraphz)[which(V(subgraphz)$tr==qq)]$size <- 15
plot(subgraphz)

​

​