如何在原始直方图之上绘制两条估计的密度曲线[重复]答案

【问题标题】：How to plot two an estimated density curve on top of the original histogram [duplicate]如何在原始直方图之上绘制两条估计的密度曲线[重复]
【发布时间】：2018-08-07 19:38:32
【问题描述】：

我知道以前有人问过类似的问题，但没有针对我的问题提出任何具体问题：

gamma_j <- function(x) {
  y <- .120605*dgamma(x, shape =  2.2181, scale = 4.310067) + 
    .879395*dgamma(x, shape = 5.2007, scale = 8.7208)
  return(y)
}

j_plot <- plot(gamma_j(0:120), type =  "l")

上面是我创建的伽马混合物。如何将其叠加在使用 ggplot 制作的原始直方图之上？

pop_dist <- ggplot(HHMembers, aes(Age)) +
  geom_histogram(binwidth = 1)
pop_dist

抱歉，我不知道如何输入年龄数据本身。有数以万计的数据点，所以像 dput 这样的东西对于控制台来说太大了，我无法复制和粘贴。

但正如您所见，一个使用 ggplot，另一个使用内置绘图功能，所以我不确定如何将它们堆叠在一起。加一个是密度，另一个是频率。将频率除以问题的总修复部分吗？

谢谢（：

【问题讨论】：

这么多相关链接：here, here, here, here, ...
您是说这些链接中的任何解决方案都不适合您吗？在这种情况下，能否请您更具体地说明您尝试过的什么以及如何它不起作用。

标签： r ggplot2

【解决方案1】：

只需绘制直方图，然后运行

curve(gamma_j, add=TRUE)

【讨论】：