【读书笔记】R语言的绘图基础

3.1 概述

R语言绘图函数分类

3.2 颜色以及文字/点/线参数的设置

3.2.1 颜色

通过设置col参数，可以改变图像、坐标轴、文字、点、线等的颜色参数。

1.      固有颜色

在设置col参数时，直接填写相关颜色的代表文字便可。例如：

plot(c(1:10),type="b",col="black")  #设置线的颜色

text(6,5,labels="文字",col="red")   #设置文字的颜色

points(2,5,col="blue")              #设置点的颜色

下面的代码展示所有657种颜色名称及其对应的颜色，并输出在一个PDF文件中。

pdf("D://colors-bar.pdf",height=120)

par(mar=c(0,10,3,0)+0.1,yaxs="i")

barplot(rep(1,length(colors())),col=rev(colors()),

        names.arg=rev(colors()),horiz=T,las=1,

       xaxt="n",main=expression("Bars of colors in"~

                                  italic(colors())))

dev.off()

2.      RGB取色

3.      主题调色板

1)        rainbow()

raninbow()即彩虹的颜色，是由“赤、橙、黄、绿、青、蓝、紫”一系列颜色组成的。该函数的用户如下：

rainbow(n,s=1,v=1,start=0,end=max(1,n-1)/n,gamma=1);

下面看一个实例：

barplot(rep(1,41),

        col=c(rainbow(n=6,start=0,end=1/6),

             "white",

             rainbow(n=6,start=1/6,end=2/6),

             "white",

             rainbow(n=6,start=2/6,end=3/6),

             "white",

             rainbow(n=6,start=3/6,end=4/6),

             "white",

              rainbow(n=6,start=4/6,end=5/6),

             "white",

             rainbow(n=6,start=5/6,end=1)))

x.text<-c("赤色","黄色","绿色","青色","蓝色","紫色")

axis(side=1,at=seq(from=3,length.out=6,by=8.5),labels=x.text,cex=0.75)

2)        其他主题配色函数

par(mfrow=c(4,1))

barplot(rep(1,6),col=heat.colors(6),main="barplot(rep(1,6),col=heat.colors(6))")

barplot(rep(1,6),col=terrain.colors(6),main="barplot(rep(1,6),col=terrain.colors(6))")

barplot(rep(1,6),col=topo.colors(6),main="barplot(rep(1,6),col=topo.colors(6))")

barplot(rep(1,6),col=cm.colors(6),main="barplot(rep(1,6),col=cm.colors(6))")

par(mfrow=c(1,1))

4.      RColorBrewer颜色扩展包

RColorBrewer包提供了3套很好的配色方案。用户只需要制定配色方案的名称，既可以用包中的brewer.pal()函数生成颜色。这3套配色方案包括：

r  连续型Sequential：生成一系列连续渐变的颜色，通常用来标记连续型数值的大小。

r  极端型Diverging：生成用深色强调两端、浅色标示中部的系列颜色、可用来标记数据中的利群点。

r  离散型Qualitative：生成一系列彼此差异比较明显的颜色，通常用来标记分类数据。

在使用这3套配色方案之前，要先加载RColorBrewer包：library(RColorBrewer)

下面介绍这3套配色方案的用法。

1）  seq连续型：共18组颜色，每组分为9个渐变颜色展示。

display.brewer.all(type="seq")

如果想使用YlOrRd组的第3~8种颜色，可以使用下面代码实现。

barplot(rep(1,6),col=brewer.pal(9,"YlOrRd")[3:8])

2）  div极端型：共9组颜色，每组分为11个渐变颜色展示。其实现代码如下：

display.brewer.all(type="div")

                   如果想使用BrBG组的第3~8种颜色，则可用下面代码来实现。

                   barplot(rep(1,6),col=brewer.pal(11,"BrBG")[3:8])

3）  qual离散型：共8组颜色，每组渐变颜色数也不尽相同。其实现代码如下：

display.brewer.all(type="qual")