R語言基礎(chǔ)繪圖系統(tǒng)
基礎(chǔ)繪圖包之低級(jí)繪圖函數(shù)——內(nèi)置顏色缠诅、
1.內(nèi)置顏色選取
功能657種內(nèi)置顏色枣抱。colors()
調(diào)色板函數(shù):palette(), rgb(), rainbow()
。
palette默認(rèn)8種顏色旬痹。
#重新配置調(diào)色板
palette(rainbow(7))
#恢復(fù)默認(rèn)的調(diào)色板
palette('default')
rgb(red,green,blue)函數(shù),分別加入多少紅綠藍(lán)成分,取值0-1灸拍。
hsv函數(shù)(hue色調(diào),saturation飽和度砾省,value純度)構(gòu)造顏色鸡岗。
hcl函數(shù)(hue,chroma色度,luminance色度和亮度)構(gòu)造顏色编兄。
2. RColorBrewer包
內(nèi)置了三種調(diào)色板:連續(xù)型轩性、極端值、離散型調(diào)色板狠鸳。
- 連續(xù)型調(diào)色板
包含18種漸變色揣苏。
library(RColorBrewer)
display.brewer.all(type = 'seq') #連續(xù)型
age <- rnorm(100,45,10)
hist(age,col = brewer.pal(9,'BuGn'))
- 極端值調(diào)色板
display.brewer.all(type = 'div') #極端型
age <- rnorm(100,45,10)
hist(age,col=brewer.pal(11,'BrBG'))
- 離散型調(diào)色板
顏色間差異最大悯嗓,主要用于分類變量。
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)
- 自定義調(diào)色板: colorRampPalette
color <- brewer.pal(4,'Dark2')
mycolor <- colorRampPalette(color)(15)
#從色系中提取4種顏色卸察,再細(xì)分成15種顏色
value <- sample(20:100,10)
barplot(value,col = mycolor)
3. colourpicker插件
功能是展示一個(gè)顏色板脯厨,自己挑選合適的顏色。插件安裝后在Rstudio中的位置如下:
library(colourpicker)
library(ggplot2)
ggplot(mtcars,aes(mpg,wt))+
geom_point(aes(color=factor(cyl)))+
scale_color_manual(values = CPCOLS)
#CPCOLS在上圖中選取顏色