r - 如何在每个栏的顶部显示百分比标签

Question

我是 RI 的新手，正在使用 ggplot 显示条形图。我想显示每个条形顶部的百分比。我不想将 y 轴转换为百分比标签。而是我想在 y 轴和百分比中显示频率酒吧顶部的每一组。

我的数据片段是

我想要的输出片段是

欢迎任何帮助

Answer 1

这种情节可以很容易地用ggplot2.

dat <- data.frame(Frequency = c(10, 5, 97, 47, 50),
                  Fruits = gl(5, 1, labels = c("Mango", "Apple", "Orange", 
                                               "Guava", "Papaya")))


library(ggplot2)
ggplot(dat, aes(x = Fruits, y = Frequency)) +
  geom_bar(stat = "identity") +
  geom_text(aes(label = sprintf("%.2f%%", Frequency/sum(Frequency) * 100)), 
            vjust = -.5)