如何用R更清晰地绘制社交网络图？

我现在使用lesmis.gml做网络分析作业。 我无法调整图形节点的距离：有70多个节点，而且节点太近。 图形是变量g和g2。 这是我使用R的代码。 我试着用Gephi，但我的笔记本电脑运行不好。它关闭了

install.packages('igraph')
install.packages('statnet')
library('igraph')
library('statnet')
g<-read.graph("lesmis.gml", format=c("gml"))
g
graph.density(g)
igraph::degree(g,mode="out")
plot(g)
vcount(g)
centralization.degree(g)
V(g)$size<-igraph::degree(g)*5
plot(g)
clo<-igraph::closeness(g)
clo
clo.score<-round((clo-min(clo))*length(clo)/max(clo))+1
clo.colors<-rev(heat.colors(max(clo.score)))
V(g)$color<-clo.colors[clo.score]
plot(g)
btw<-igraph::betweenness(g)
btw
btw.score<-round(btw)+1
btw.score
btw.colors<-rev(heat.colors(max(btw.score)))
V(g)$color<-btw.colors[btw.score]
plot(g)
clusters(g)
clusters(g)$csize
cliques(g)
sapply(cliques(g), length)
largest_cliques(g)
cliques(g)
sapply(cliques(g),length)
a<-largest_cliques(g)
a
clique1<-a[[1]]
g2<-induced.subgraph(graph=g,vids=clique1)
plot(g2)
vcol<-rep("grey80",vcount(g))
vcol[unlist(largest_cliques(g))]<-"gold"
plot(as.undirected(g),vertex.lavel=V(g)$name, vertex.color=vcol)
windows()

install.packages（'igraph'））
install.packages（'statnet'））
库（'igraph'）
库（'statnet'）
我有两个建议。在展示它们之前，我将设置基础，以便我所做的（大部分）是可重复的。这只是代码中的简化版本，只是对顶点大小进行了更改

library(igraph)
g<-read.graph("temp/lesmis.gml", format=c("gml"))
V(g)$size<-igraph::degree(g)/2

btw<-igraph::betweenness(g)
btw.score<-round(btw)+1
btw.colors<-rev(heat.colors(max(btw.score)))
V(g)$color<-btw.colors[btw.score]

库（igraph）
我有两个建议。在展示它们之前，我将设置基础，以便我所做的（大部分）是可重复的。这只是代码中的简化版本，只是对顶点大小进行了更改

library(igraph)
g<-read.graph("temp/lesmis.gml", format=c("gml"))
V(g)$size<-igraph::degree(g)/2

btw<-igraph::betweenness(g)
btw.score<-round(btw)+1
btw.colors<-rev(heat.colors(max(btw.score)))
V(g)$color<-btw.colors[btw.score]

库（igraph）
gI没有答案，但是有一些很酷的网络分析软件包，比如
ggraph
和
ggnet
。这些可能会有帮助。你试过改变布局吗？或者，您可以检查此项。这不是问题的答案，但在您的
plot
语句中，您有
vertex.lavel=V（g）$name
。那应该是
vertex.label
？我没有答案，但是有一些很酷的网络分析软件包，比如
ggraph
和
ggnet
。这些可能会有帮助。你试过改变布局吗？或者，您可以检查此项。这不是问题的答案，但在您的
plot
语句中，您有
vertex.lavel=V（g）$name
。应该是
vertex.label
？