我正在尝试寻找一种方法来增加堆叠条形图中文本标签之间的间距,以免它们重叠。再多的垂直调整也不会进一步将它们隔开。
geom_text(size = 6, position = position_stack(), vjust = -0.5)
:
最佳答案
这是一个使用 ggrepel
包中的 geom_text_repel()
的示例。
library(ggplot2)
library(ggrepel)
library(reshape2)
DF <- read.table(text="Rank F1 F2
1 300 150 50
2 400 10 10
", header=TRUE)
DF1 <- melt(DF, id.var="Rank")
ggplot(DF1, aes(x = Rank, y = value, fill = variable)) +
geom_bar(stat = "identity")+
geom_text_repel(aes(label = variable),
nudge_y=0.5,
nudge_x=0)
关于r - ggplot2 增加堆叠文本标签之间的间距,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/48412772/