相关疑难解决方法(0)

我有一个使用igraph制作的图表.我想分散节点.到目前为止我找到的唯一方法是缩放布局并强制绘图命令不重新缩放.

png("kmeansColouredNetwork.png", width=1200,height = 1000)
col=c("yellow", "saddlebrown", "brown1","chartreuse2", "chocolate1","darkorange" ,"deepskyblue1", "hotpink1","plum2")
for(i in 1:9){
  V(graph)$cluster[which(V(graph)$name %in% kmeans[,i])]<-col[i]
}
V(graph)$color=V(graph)$cluster
coords <- layout.fruchterman.reingold(graph)*0.5
plot(graph, layout = coords, vertex.label=NA, rescale=FALSE,  vertex.size=degree(graph)*.25,vertex.color=V(graph)$cluster)
labels = paste("cluster:", 1:length(colours))
legend("left",legend=labels, col=col, pch=16, title="K means clustered subgroups")
dev.off()

如果我不重新缩放,中央高度连接的节点聚集在一起,我得到一个这样的图形,其中图形体内的模式无法辨别:

另一方面,如果我告诉plot命令不要重新缩放,那么我得到这个:

图案可辨别的地方,但图表的一半不在图中.这不是绘图大小的问题,就好像我增加了png的尺寸一样,它仍然将图形置于绘图边缘的中心.

这不是布局的问题 - 我尝试过fruchterman.reingold,layout_nicely,reingold.tilford,layout.circle,布局随机,同样的事情发生了.

显然曾经有一个变量来设置节点之间的排斥因子,但这似乎已被弃用.

如何将图表的节点展开或重新缩放并重新定位图？