r - 添加颜色渐变密度图R

Question

我有一个类似这样的代码:

x <- rnorm(100)
y <- density(x, n = 1000)
plot(y)
polygon(y,col="red")

但是，我还想在基本 R 中为密度图添加颜色渐变，特别是使用调色板，例如从蓝色到红色的 Spectral。这样，输出将如下所示:

感谢您的帮助!谢谢!

Answer 1

您可以使用 segments() 添加无数具有渐变颜色的线段。

x <- rnorm(100)
dens <- density(x, n = 1000)
plot(dens)
segments(dens$x, 0, dens$x, dens$y, col = hcl.colors(1000, "Spectral", rev = TRUE))
polygon(dens)