1

以数据“钻石”为例,

library(ggplot2)
library(ggridges)
ggplot(diamonds, aes(x = price, y = cut,fill = factor(stat(quantile)))) +
    stat_density_ridges(
        geom = "density_ridges_gradient", 
        calc_ecdf = TRUE,
        quantiles = 0.25) +
    theme_ridges() +
    scale_fill_manual(
        name = "Probability", values = c("#FF0000A0", "#A0A0A0A0"),
        labels = c("(0, 0.25]", "(0.25, 0.75]")
    )

这将绘制 5 个不同的密度重叠,给定分类变量“cut”映射到 y 轴,所有 5 个密度脊中 25% 的分位数尾部将填充红色“#FF0000A0”,或“quantiles=2”参数将导致 50% 分位数的彩色尾部。

但我想要的是“cut”变量中每个组的不同分位数尾部,例如 10% 尾为“理想”,20% 为“高级”,30% 为“好”,40% 为“非常好”,50% 为“一般”。如何做这个情节?

4

0 回答 0