為ggplot2中的頻率圖創建數據標簽？

Question

在這個問題中，可以使用ggplot創建頻率圖。 例如：

f <- factor(sample(letters[1:5], 100, r=T))
h <- table(f) / length(f)
dat <- data.frame(f = f)
ggplot(dat, aes(x=f, y=..count.. / sum(..count..), fill=f)) + geom_bar()

現在如何獲得圖中每個單獨條形的數據標簽？

謝謝。

Answer 1

您可以添加geom_text() ：

library(ggplot2)
ggplot(dat, aes(x=f, y=..count.. / sum(..count..), fill=f)) + 
  geom_bar() +
  geom_text(stat = "count", aes(label=..count../100))