R語言與醫學統計圖形【8】顏色的選取

R語言基礎繪圖系統

基礎繪圖包之低級繪圖函數——內置顏色、

1.內置顏色選取

功能657種內置顏色。colors()

調色板函數：palette(), rgb(), rainbow()。

palette默認8種顏色。

#重新配置調色板
palette(rainbow(7))

#恢復默認的調色板
palette('default')

• rgb（red,green,blue)函數，分別加入多少紅綠藍成分，取值0-1。

• hsv函數（hue色調，saturation飽和度，value純度）構造顏色。

• hcl函數（hue,chroma色度，luminance色度和亮度）構造顏色。

2. RColorBrewer包

內置了三種調色板：連續型、極端值、離散型調色板。

• 連續型調色板
  包含18種漸變色。

library(RColorBrewer)
display.brewer.all(type = 'seq') #連續型

age <- rnorm(100,45,10)
hist(age,col = brewer.pal(9,'BuGn'))

• 極端值調色板

display.brewer.all(type = 'div') #極端型

age <- rnorm(100,45,10)
hist(age,col=brewer.pal(11,'BrBG'))

• 離散型調色板
  顏色間差異最大，主要用於分類變量。

display.brewer.all(type = 'qual') #離散型

data <- data.frame(胃癌=c(3493,2454,3252),
                     肺癌=c(4632,3632,4742),
                     食管癌=c(2142,1632,2314),
                     肝癌=c(3642,2353,2932),
                     白血病=c(1934,1209,883))
barplot(as.matrix(data),beside = T,col = brewer.pal(3,'Set1'))
legend('topright',legend = c('0-49','50-64','>65'),
       col = brewer.pal(3,'Set1'),pch = 15)

• 自定義調色板: colorRampPalette

color <- brewer.pal(4,'Dark2')
mycolor <- colorRampPalette(color)(15)
#從色系中提取4種顏色，再細分成15種顏色
value <- sample(20:100,10)
barplot(value,col = mycolor)

3. colourpicker插件

功能是展示一個顏色板，自己挑選合適的顏色。插件安裝后在Rstudio中的位置如下：

library(colourpicker)
library(ggplot2)
ggplot(mtcars,aes(mpg,wt))+
  geom_point(aes(color=factor(cyl)))+
  scale_color_manual(values = CPCOLS) 
#CPCOLS在上圖中選取顏色