我有一个带有一组顶点的图形g和一个带有一些“特殊”顶点名称的列表。我希望图形显示一个标签,顶点名称仅适用于这些特殊顶点。
我试过这样的事情:
plot(g, vertex.size = 4, vertex.label = ifelse(V(g) %in% usernames, V(g)$label, ""), asp = F)
但显然我错过了一些东西,因为谓词永远不会输入TRUE。此外,似乎V(g)$ label导致以下错误:
ans [test&ok]错误< - rep(是的,length.out = length(ans))[test&ok]:替换长度为零
我们将不胜感激! :)
把V(g)
变成V(g)$label
?
set.seed(1)
library(igraph)
g <- ba.game(26)
V(g)$label <- letters[1:26]
usernames <- sample(letters, 5)
plot(g, vertex.label = ifelse(V(g)$label %in% usernames, V(g)$label, NA))
要么
set.seed(1)
library(igraph)
g <- ba.game(26)
usernames <- sample(vcount(g), 5)
plot(g, vertex.label = ifelse(V(g) %in% usernames, V(g), NA))
?