ggraph 弧形图剪辑标签文本

Question

我正在使用 igraph 和 ggraph 包来绘制弧形图。我在使用 geom_node_text 参数时遇到问题，因为随着文本标签长度的增加，图形下边距不会相应增加。因此，如果节点的标签有点长，它最终会从绘图中剪掉。

这是一个使用 igraphdata 包中的 karate 示例数据的可重现示例。

data(karate)
ggraph(karate, layout="linear")+
  geom_edge_arc(aes(edge_width=weight), edge_alpha=0.5, fold=T)+
  geom_node_point(aes(size=strength(karate), color=as.factor(color)))+
  geom_node_text(aes(label=name), angle=90, hjust=1, nudge_y = -0.2, size=4)+
  theme_void()+theme(legend.position = "none")

我已经尝试通过 theme(plot.margin=) 更改绘图边距，但无论如何标签都会被剪掉。

Answer 1

您可以在绘图中设置 coord_cartesian(clip = "off") 并扩大绘图边距：

data(karate)

ggraph(karate, layout = "linear") +
  geom_edge_arc(aes(edge_width = weight), edge_alpha = 0.5, fold = TRUE) +
  geom_node_point(aes(size = strength(karate), color = as.factor(color))) +
  geom_node_text(aes(label = name), angle = 90, hjust = 1, nudge_y = -0.2, size = 4) +   
  coord_cartesian(clip = "off") + 
  theme_void() +  
  theme(legend.position = "none", plot.margin = unit(rep(30, 4), "points"))

ggraph 弧形图剪辑标签文本

ggraph arc diagram clips label text

r

igraph

ggplot2

arc-diagram

ggraph