我用layout.circle
"igraph包" 的算法绘制了这个数字.
由于放置在节点间边缘后面,左边的自环带的一些标签不清晰可见.我是否可以应用任何调整来提高绘图的可读性而不改变标签的距离?(我想在没有重新编码整个事情的情况下,在圆的径向矢量上绘制循环是不可能的...)
这是代码
par(mar=c(0,0,0,0))
plot(g,
layout=layout.circle,
vertex.label.family="Palatino",
edge.label.family="Palatino",
edge.label.cex=0.7,
vertex.size=log(V(g)$community_size)+7,
vertex.label=V(g)$community_size,
edge.width=log(E(g)$weight),
edge.label=E(g)$weight)
Run Code Online (Sandbox Code Playgroud)
将相同的图形绘制两次,首先绘制边缘,但没有标签,然后没有边缘和顶点以及标签.一些有用的部分:
add=TRUE
.none
.NA
为空字符串.要修复布局,请预先计算并将其存储在变量中:
lay <- layout.circle(g)
plot(g, layout=lay, ...)
plot(g, add=TRUE, layout=lay, ...)
Run Code Online (Sandbox Code Playgroud)