将计数值添加到“ qplot”直方图

Question

我想知道如何将计数值添加到由qplot绘制的直方图中？

    qplot(cluster_name$km.out1.cluster, geom="histogram",binwidth = 0.5,
main = "Histogram for clusters Number", xlab = "cluster number", fill=I("blue")) + 
  theme(plot.title = element_text(hjust = 0.5)) 

我尝试添加

+ stat_bin(aes(y=..count..,label=..count..), geom="text", vjust=-.5, binwidth = 0.5)

但是，此命令将在x轴上添加一堆零，这不是我想要的。我试图删除label，但收到一条错误消息。请在下面查看结果图片：

Answer 1

为防止为零计数加标签，您可以在ifelse或stat_bin上添加geom_text语句，以将标签设置为零计数的空字符串。

使用mtcars作为示例数据，请尝试以下操作：

library(ggplot2)

qplot(mtcars$mpg, geom="histogram",binwidth = 0.5,
      main = "Histogram for clusters Number", xlab = "cluster number", fill=I("blue")) + 
  theme(plot.title = element_text(hjust = 0.5)) +
  stat_bin(aes(y=..count..,label = ifelse(..count.. > 0, ..count.., "")), geom="text", vjust=-.5, binwidth = 0.5)