R:如何更改ggplot中的配色方案(需要14种颜色)

我使用以下代码使用ggplot创建一个图:

m = ggplot(derv, aes(x=Date, y=derv, colour = Season)) + geom_point() 
m2 = m+geom_abline(intercept = 0, slope = 0)
m3 = m2 + geom_abline(intercept = 2.578269274, slope = 0)
m3 = m3 + geom_abline(intercept = -1.4242559021, slope = 0) 

这个情节看起来很漂亮但是对于某些间隔,例如2010sp和2010au,我很难分辨出颜色何时发生变化.所以我想改变这个情节的配色方案.

我尝试了以下代码:

 m3+scale_color_brewer(palette="Dark2")

但我收到一条警告信息:

2: In RColorBrewer::brewer.pal(n, pal) :
n too large, allowed maximum for palette Dark2 is 8
Returning the palette you asked for with that many colors

我检查了可用的调色板,最大的一个包含12种颜色,但我需要14种颜色,所以我想知道是否有办法解决这个问题.

如果你真的想要/需要比调色板中给出的颜色更多的颜色,你可以连接两个不同的调色板然后使用scale_color_manual.我无法重现你的例子,但希望这传达了一般观点:

mycolors = c(brewer.pal(name="Dark2", n = 8), brewer.pal(name="Paired", n = 6))

ggplot(derv, aes(x=Date, y=derv, colour = Season)) + 
  geom_point() +
  geom_abline(intercept = 0, slope = 0) + 
  geom_abline(intercept = 2.578269274, slope = 0) + 
  geom_abline(intercept = -1.4242559021, slope = 0) +
  scale_color_manual(values = mycolors)

顺便说一句,如果你下次能够提供一个简单且可重复的例子,那就太棒了.也许只是将您的数据的一部分和dput()它放入问题中,或者使用您通过运行找到的数据集中的一个data()最接近数据格式的数据集.