小编use*_*827的帖子

我有一个情节,在直方图上叠加了几个观察结果.按顺序收集观察结果,我需要观察它们的收集顺序.使用a很简单scale_colour_brewer.问题是,连续啤酒调色板的最大长度是9.我有多达20个观察的例子,我不知道如何使用插值颜色.下面是一些代码,用于显示少于10个点的所需输出.

# Setting this to be > 9 will cause a warning and not produce the desired result.
observations = 9
subset <-1:observations
res = data.frame(x_data = rnorm(5000),TestID=1:5000)
ggplot(res,aes(x=x_data)) + 
  stat_bin(aes(y=..density..))+
  stat_density(colour="blue", fill=NA)+
  geom_point(data = res[res$TestID %in% subset,], 
             aes(x = x_data, 
                 y = 0, 
                 colour = as.factor(res$TestID[res$TestID %in% subset])
             ),
             size = 5) +scale_colour_brewer("Fancy title", type="seq", palette='Reds')

我知道随着观察数量的增加,这个情节将变得难以阅读.但是,我相信有多达20种颜色,应该可以在我的应用程序中解释结果.