我正在使用rstudio版本 0.99.879 和igraph版本 1.0.1。
我的问题与Show only specific labels on network graph using igraph in R非常相似。我已将我的后续问题作为评论发布在那里，但被要求提出一个新问题。
我还想只显示特定的顶点标签，如果您使用度数或介数中心性函数，这可以正常工作。但是，我尝试使用特征向量或中心中心性，它显示以下错误
ifelse(evcent(g) > 0.1, V(g)$name, NA) 中的错误：（列表）对象不能被强制输入“double”
这是代码：
#random graph
library(igraph)
g <- graph( c("John", "Jim", "Jim", "Jack", "Jim", "Jack", "Brian", "John", "John", "Janis", "Janis", "Jennifer", "Justin", "John"),
isolates=c("Jesse", "Brian") )
# works perfectly fine
par(mfrow=c(1,2), mar=c(0,0,1,0))
plot(g, vertex.size=9,
vertex.label = ifelse(betweenness(g) > 0, V(g)$name, NA),
edge.arrow.size=.5)
plot(g, vertex.size=9,
vertex.label = ifelse(degree(g) > 0, V(g)$name, NA),
edge.arrow.size=.5)
#does not work
plot(g, vertex.size=9,
vertex.label = ifelse(evcent(g) > 0.01, V(g)$name, NA),
edge.arrow.size=.5)
# I also tried this with no success
eig <- evcent(g)
par(mfrow=c(1,1), mar=c(0,0,1,0))
plot(g, vertex.size=9,
vertex.label = ifelse(eig$vector > 0.1, V(g)$name, NA),
edge.arrow.size=.5)
这怎么能解决。这到底是什么意思：
'类型双'
在此先感谢您的帮助！
查看帮助页面?evcent。它说：
价值
包含组件的命名列表：...
你需要使用
ifelse(evcent(g)$vector > 0.01,
同样，使用 hub_cent$vector
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句