1.設置圖形要素的顏色
Plot函數中，使用col=參數來決定要素的顏色
如果不指定plot type，顏色加在散點上，如果指定了plot type，例如line，則顏色加在線上
其它函數，例如barplot()和histogram()也使用col=參數影響顏色
2.顏色的表示
①顏色名
> colors() #查看所有顏色名 > plot(rnorm(1000),col="yellow")
②數值
> palette() #查看當前調色板 （缺省調色板下，1表示黑色，2表示紅色，0表示背景色）
> plot(rnorm(1000),col="2") #數值為當前調色板上的顏色值
> palette(c("red","blue","green","orange")) #改變缺省調色板
> palette()
> plot(rnorm(1000),col="2")
③十六進制
> rgb(0.5,0.5,0.5,0.8) #設置紅色，綠色，藍色，透明度的數值（范圍為0-1）返回16進制表示
> plot(rnorm(1000),col="#808080CC") #col參數為上一步的結果
3.多種顏色畫圖
①使用調色板控制包
> library(RColorBrewer) #加載調色板控制包 > display.brewer.all() #查看所有色板 > brewer.pal(7,"YlOrRd") #替換缺省調色板 > display.brewer.pal(7,"YlOrRd") #畫圖
②使用顏色名
> sales<-read.csv("citysales.csv",header=TRUE)
> barplot(as.matrix(sales[,2:4]), beside=T,
+ legend=sales$City, #增加圖例
+ col=c("red","blue","green","orange","pink"), #顏色數和樣本數相等
+ border="white")
> barplot(as.matrix(sales[,2:4]), beside=T,
+ legend=sales$City,
+ col=c("red","blue","green","orange"), #顏色數和樣本數不相等
+ border="white")
③使用函數
> barplot(as.matrix(sales[,2:4]), beside=T, + legend=sales$City, + col=heat.colors(length(sales$City)), + border="white") > barplot(as.matrix(sales[,2:4]), beside=T, + legend=sales$City, + col=rainbow(length(sales$City)), + border="white") > barplot(as.matrix(sales[,2:4]), beside=T, + legend=sales$City, + col=terrain.colors(length(sales$City)), + border="white") > barplot(as.matrix(sales[,2:4]), beside=T, + legend=sales$City, + col=cm.colors(length(sales$City)), + border="white") > barplot(as.matrix(sales[,2:4]), beside=T, + legend=sales$City, + col=topo.colors(length(sales$City)), + border="white")
