具有缩放到计数的高度的ggridges

Question

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

例如

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多个观察值。我希望图的高度反映每个点的观察值。

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
  )

这将为您提供以下内容：

​