RColorBrewer包
三类调色板:sequential / diverging / qualitative 调色板的信息可以与colorRamp / colorRampPalette结合使用从一个极端到另一个极端,慢慢过渡呈现顺序
两边的颜色比较亮,中间的颜色比较暗,适合凸显处在极端的数值,想进行高低对比。
颜色对比鲜明,适合呈现分类变量,凸显他们的差异和对比。
在RStudio中进行:
- 首先是colorRamp
> pal <-colorRamp(c("red","blue"))> pal(0) #红色 [,1] [,2] [,3][1,] 255 0 0> pal(1) #蓝色 [,1] [,2] [,3][1,] 0 0 255> pal(0.5) # 红色和蓝色之间的颜色 [,1] [,2] [,3][1,] 127.5 0 127.5> pal(seq(0,1,len=10)) #红色和蓝色之间的10个颜色 [,1] [,2] [,3] [1,] 255.00000 0 0.00000 [2,] 226.66667 0 28.33333 [3,] 198.33333 0 56.66667 [4,] 170.00000 0 85.00000 [5,] 141.66667 0 113.33333 [6,] 113.33333 0 141.66667 [7,] 85.00000 0 170.00000 [8,] 56.66667 0 198.33333 [9,] 28.33333 0 226.66667[10,] 0.00000 0 255.00000
- colorRampPalette
> pal<-colorRampPalette(c("red","yellow"))> pal(1) #十六进制数表示的红色[1] "#FF0000"> pal(2) #十六进制数表示的黄色[1] "#FF0000" "#FFFF00" > pal(10) # [1] "#FF0000" "#FF1C00" "#FF3800" "#FF5500" "#FF7100" "#FF8D00" "#FFAA00" "#FFC600" "#FFE200"[10] "#FFFF00"
- RColorBrewer包
#三列分别表示:最多可以使用颜色的数目、种类属于哪一类,是否影响色盲人士> library(RColorBrewer)> brewer.pal.info maxcolors category colorblindBrBG 11 div TRUEPiYG 11 div TRUEPRGn 11 div TRUEPuOr 11 div TRUERdBu 11 div TRUERdGy 11 div FALSERdYlBu 11 div TRUERdYlGn 11 div FALSESpectral 11 div FALSEAccent 8 qual FALSEDark2 8 qual TRUEPaired 12 qual TRUEPastel1 9 qual FALSEPastel2 8 qual FALSESet1 9 qual FALSESet2 8 qual TRUESet3 12 qual FALSEBlues 9 seq TRUEBuGn 9 seq TRUEBuPu 9 seq TRUEGnBu 9 seq TRUEGreens 9 seq TRUEGreys 9 seq TRUEOranges 9 seq TRUEOrRd 9 seq TRUEPuBu 9 seq TRUEPuBuGn 9 seq TRUEPuRd 9 seq TRUEPurples 9 seq TRUERdPu 9 seq TRUEReds 9 seq TRUEYlGn 9 seq TRUEYlGnBu 9 seq TRUEYlOrBr 9 seq TRUEYlOrRd 9 seq TRUE
- 如何使用RColorBrewer和colorRampPalette结合起来
#调用brewer.pal包里面的greens调色板,从中取出3个颜色,传入调色板colorRampPalette。数据集为volcano,以3个端点颜色为进行取值。cols<-brewer.pal(3,"Greens")pal<-colorRampPalette(cols)image(volcano,col=pal(20))
呈现出这些颜色的原因是我们选取的调色板中的3个颜色如下
#查看greens调色板的3个颜色display.brewer.pal(3,"Greens")