如何将点添加到频数图？

Question

我用geom_freqpoly绘制频率图：

ggplot(all,aes(x=time,color=type))
+geom_freqpoly(size=1.3,binwidth=2160) 
+theme_bw()+scale_x_datetime(breaks = date_breaks("2 hours"), labels=date_format("%H:%M"))

我想在图中添加点：

如何执行此操作？非常感谢。

Answer 1

我有一个相同的问题，发现我们可以告诉geom_point（）使用与geom_freqpoly（）相同的垃圾箱和计数，如下所示：

set.seed(8675309)
df <- data.frame(x=rnorm(100))

ggplot(data=df, aes(x=x)) +
  geom_freqpoly(binwidth=0.25) +
  geom_point(stat="bin", aes(y=..count..), binwidth=0.25)

我希望这会有所帮助！