R geom_density over geom_histogram with facet_grid 未显示答案

【问题标题】：R geom_density over geom_histogram with facet_grid not displayedR geom_density over geom_histogram with facet_grid 未显示
【发布时间】：2021-01-02 09:27:41
【问题描述】：

我有一个直方图，想在上面显示一条密度图线或区域。它不适用于以下代码。

直方图以我想要的方式显示，但 geom_density() 似乎不起作用请注意，我更改了列名以使其在堆栈上匿名。

plot <- ggplot(data=df, aes(x=DFCOLUMN)) +
                  geom_histogram(binwidth=10, color="#0000FF", fill="white") +
                  geom_density(alpha=.5, fill="#FF6666") +
                  facet_grid(. ~ SOME OTHER COLUMN) +
                  coord_cartesian(xlim=c(0,600)) +
                  ggtitle("COLUMNAME") +
                  theme(panel.background = element_blank())

你能想出一个解决办法吗？

谢谢

【问题讨论】：

到底是什么问题？您的代码在使用时运行良好，例如mtcars 作为示例数据。
它不显示密度图。
问题是没有任何数据（也许是你的情节的图像），我们只能猜测问题所在。
是的，很抱歉。我在帖子中添加了一张图片。
也许问题只是直方图和密度的不同比例？密度通常小于 1 ...

标签： r ggplot2 plot

【解决方案1】：

这有帮助吗？如果没有，将删除，评论太长了:)

library(ggplot2)
# http://www.sthda.com/english/wiki/ggplot2-density-plot-quick-start-guide-r-software-and-data-visualization
# https://stackoverflow.com/questions/6957549/overlaying-histograms-with-ggplot2-in-r

x <- data.frame(V1 = rnorm(1000, 100,40))

### Density on y axis
ggplot(x, aes(x = V1)) +
  geom_histogram(aes(y = ..density..), colour = "black", fill = "white") +
  geom_density(alpha = .2, fill = "#FF6666")

### count on y axis
ggplot(x, aes(x = V1)) +
  geom_histogram(colour = "black", fill = "white") +
  geom_density(aes(y = ..count..), alpha = .2, fill = "#FF6666")

【讨论】：

谢谢 QAsena。第二个代码“### y 轴计数”有帮助。它现在显示密度图。只剩下一个问题：我可以更改密度图的 yscale 以使其在 Y 轴上显示得更明显吗？它目前显然遵循直方图分布，但在左下角相当小。很遗憾，我无法在此处的评论中发布图片。
mm 我不确定。 ggplot 不同意双轴 (stackoverflow.com/questions/3099219/…)。 @斯特凡？也许您可以更新@corkinabottle 问题中的图片？
哦，这有点偏小...我不确定是否有正确的方法来增加大小，因为根据数据它应该是正确的。我用一个示例更新了我的答案，该示例显示了 ..count.. 和 ..density.. 参数之间的更多差异，但它可能并不能完全解决问题......对不起！
虽然有帮助。保持小总比没有好。感谢您的帮助。我在堆栈上有点新手。我应该将其标记为已解决吗？我对你的回答很好。也许其他人仍然有解决方案。
我顺便发现了这个问题。我将 binwidth 设置为 10，这会产生这个小密度图。如果您将其更改为例如1、密度图看起来更贴合实际的条形图。