r - 稜線プロット内の個々の密度曲線を色で塗りつぶす方法

Question

Rの稜線プロットで密度ごとに色を指定したい. と を使用ggplot2してggridgesいます.

ここで次のことを試して、色のないリッジ プロットを作成しました。

seq_plot_alt <- ggplot(seq_df, aes(x=x, y=as.factor(beta), fill = beta)) + 
  labs(title = 'Sequential', y = expression(beta), x = 'x', fill = expression(beta)) +
  geom_density_ridges(scale = 5) +
  theme_ridges(grid = FALSE, center_axis_labels = T) +
  scale_x_continuous(expand = c(0.01, 0)) +
  scale_y_discrete(expand = c(0.05, 0))

関数で fill 引数を使用してaes色を追加しましたが、各密度プロットの正確な色を指定できるようにしたいと考えています。したがって、これらのそれぞれについて、それぞれの長さ 8 のベクトルを指定できます。