以数据“钻石”为例,
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% 为“一般”。如何做这个情节?