r - 高度按比例缩放的 ggridges

Question

如何更改 ggridges 图的缩放比例，使绘图更像直方图，而不像核密度图？也就是说，我希望该图反射(reflect)分类变量的不同大小。

例如

library(tidyverse)
library(ggridges)

data(mpg)    

mpg %>% 
  mutate(
    drv = drv %>% 
      fct_reorder(
        cty
        )
    ) %>% 
  ggplot(
    aes(cty, drv)
    ) +
  geom_density_ridges(
    stat = "binline", 
    scale = .8
    )

这里的问题是 mpg$drv 的 r 类别只有 25 个观察值，而 f 和 4 每个都有超过 100 个观察值。我希望图形的高度反射(reflect)每个点的观察次数

Answer 1

有趣的是，您的标题本质上就是解决方案。您需要在 aes()

中包含 height = ..count..

mpg %>% 
  mutate(
    drv = drv %>% 
      fct_reorder(
        cty
      )
  ) %>% 
  ggplot(
    aes(cty, drv, height = ..count..)
  ) +
  geom_density_ridges(
    stat = "binline", 
    scale = .8
  )

它为您提供以下内容: