将geom_text放在geom_col堆积条形图中每个条形段的中间位置

概述参见英文答案 > Showing data values on stacked bar chart in ggplot2                                    2个 我想将相应的值标签放在每个条形段中间的geom_col堆叠条形图中. 但是,我天真的尝试失败了. library(ggplot2) # Version: ggplot2 2.2dta <- data 参见英文答案 > Showing data values on stacked bar chart in ggplot22个
我想将相应的值标签放在每个条形段中间的geom_col堆叠条形图中.

但是,我天真的尝试失败了.

library(ggplot2) # Version: ggplot2 2.2dta <- data.frame(group  = c("A","A","B","B"),sector = c("x","y","z","x","z"),value  = c(10,20,70,30,50))ggplot(data = dta) +  geom_col(aes(x = group,y = value,fill = sector)) +  geom_text(position="stack",aes(x = group,label = value))

显然,为geom_text设置y = value / 2也没有帮助.此外,文本的顺序错误(反向).

任何(优雅的)想法如何解决这个问题？

解决方法 您需要将一个映射到美学的变量表示为geom_text中的组.对你而言,这是你的“部门”变量.您可以将它与geom_text中的组审美一起使用.

然后使用position_stack和vjust来居中标签.

ggplot(data = dta) +    geom_col(aes(x = group,fill = sector)) +    geom_text(aes(x = group,label = value,group = sector),position = position_stack(vjust = .5))

您可以通过全局设置美学来节省一些打字.然后fill将用作geom_text的分组变量,您可以跳过组.

ggplot(data = dta,fill = sector)) +    geom_col() +    geom_text(aes(label = value),position = position_stack(vjust = .5))

总结

以上是内存溢出为你收集整理的将geom_text放在geom_col堆积条形图中每个条形段的中间位置全部内容，希望文章能够帮你解决将geom_text放在geom_col堆积条形图中每个条形段的中间位置所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。