> library(RColorBrewer)

> display.brewer.all()

可以显示所有  RColorBrewer 里的调色板

成都创新互联从2013年成立，先为凤泉等服务建站，凤泉等地企业，进行企业商务咨询服务。为凤泉企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

比如，

Set1 中只有9个颜色， Set3中有12个颜色，Paired 中有12个颜色

如果要使用Paired这个板

> gbr<-colorRampPalette(c("green","blue","orange","red", "yellow"))
> palette(adjustcolor(gbr(50), alpha.f = 0.1))
> palette(brewer.pal(12,"Paired"))

使用Set1 这个板

> gbr<-colorRampPalette(c("green","blue","orange","red"))
> palette(adjustcolor(gbr(70), alpha.f = 0.1))
> palette(brewer.pal(8,"Set1"))      // 数字8 也可以为9，且最大允许值是9

如果没有安装RColorBrewer这个包， 就要用install.packages() 安装这个包

> install.packages("RColorBrewer")

或者用以下命令自动检查 RColorBrewer是否安装， 未安装则进行安装

> if (!require("RColorBrewer")) {
    install.packages("RColorBrewer")
    library(RColorBrewer)
   }

普通是绘制一张图， 如果要绘制四张图， 要设置四个绘图区

> par(mfrow=c(2,2))

R版本为

R version 2.14.2 (2012-02-29)
Copyright (C) 2012 The R Foundation for Statistical Computing
ISBN 3-900051-07-0
Platform: x86_64-pc-mingw32/x64 (64-bit)