r - 在 ggplot2 中的密度图上应用渐变填充

Question

是否可以向 ggplot2 中的密度图添加渐变填充，以便图表中的颜色沿 x 轴变化？在下面的这个例子中，fill参数似乎被忽略了。

library(ggplot2)
ggplot(data.frame(x = rnorm(100)), aes(x = x, fill = x)) + geom_density()

Answer 1

总有一个选项可以手动计算密度:

set.seed(123)
x <- rnorm(100)
y <- density(x, n = 2^12)
ggplot(data.frame(x = y$x, y = y$y), aes(x, y)) + geom_line() + 
  geom_segment(aes(xend = x, yend = 0, colour = x)) + 
  scale_color_gradient(low = 'green', high = 'red')