在同一圖上繪制密度圖和散點圖

Question

我想復制密度圖和散點圖的組合圖，如本文圖3所示：

https://www.ncbi.nlm.nih.gov/pmc/articles/PMC6222032/

我想在基本R或任何R包中執行此操作。 我知道如何繪制密度圖和散點圖，但不知道如何像本文中那樣將兩者結合起來。 有人可以建議什么嗎？

Answer 1

library(ggplot2)
ggplot(iris, aes(Sepal.Width)) + 
  geom_histogram(binwidth = 0.3, fill = "gray70", color = "white") +
  geom_jitter(aes(y = -5), height = 3, alpha = 0.2) +
  theme_classic()