使用矩阵调整igraph中的节点大小

13

我有以下网络图:

set.seed(1410)
df<-data.frame(
"site.x"=c(rep("a",4),rep("b",4),rep("c",4),rep("d",4)),
"site.y"=c(rep(c("e","f","g","h"),4)),
"bond.strength"=sample(1:100,16, replace=TRUE))

library(igraph)
df<-graph.data.frame(df)
V(df)$names <- c("a","b","c","d","e","f","g","h")
layOUT<-data.frame(x=c(rep(1,4),rep(2,4)),y=c(4:1,4:1))
E(df)[ bond.strength < 101 ]$color <- "red"
E(df)[ bond.strength < 67 ]$color <- "yellow"
E(df)[ bond.strength < 34 ]$color <- "green"
V(df)$color <- "white"
l<-as.matrix(layOUT)
plot(df,layout=l,vertex.size=10,vertex.label=V(df)$names,
edge.arrow.size=0.01,vertex.label.color = "black")

enter image description here

我可以帮您进行翻译。该句话的意思是:希望能够使用类似于这样的矩阵来调整节点的大小。
m<-matrix(data=c(25,0,15,0,35,0,5,0,0,10,0,5,0,19,0,44), nrow=2, ncol=8)
colnames(m)<-c("a","b","c","d","e","f","g","h")
row.names(m)<-c("site.x","site.y")

        a  b  c d  e f  g  h
site.x 25 15 35 5  0 0  0  0
site.y  0  0  0 0 10 5 19 44

您有什么建议可以帮我完成这个任务吗?

1个回答

15
你可以使用

标签。

node.size<-setNames(c(25, 15, 35, 5, 10, 5, 19, 44),c("a", "b","c", "d", "e", "f", "g", "h"))
plot(df,layout=l,vertex.label=V(df)$names,
edge.arrow.size=0.01,vertex.label.color = "black",vertex.size=node.size)

基本上是一个命名的向量。

plot(df,layout=l,vertex.label=V(df)$names,
edge.arrow.size=0.01,vertex.label.color = "black",vertex.size=as.matrix(node.size) )

也可以起作用

在此输入图片描述

更新:

如果需要使用您的m矩阵

plot(df,layout=l,vertex.label=V(df)$names,
edge.arrow.size=0.01,vertex.label.color = "black",vertex.size=m[m!=0]) 

那么,在使用矩阵或数据框来创建命名向量时,是否需要使用setNames函数?您能否举个例子,说明我如何使用我的示例中的矩阵m来创建命名向量,并将其插入到“vertex.size=”中?非常感谢。 - Elizabeth
有人可以看一下我的问题吗?https://stackoverflow.com/questions/65209890/r-change-size-of-points-on-a-graph 谢谢 - stats_noob

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接