R语言col参数值对应的颜色条形图

绘制图形时，我们经常会给图形设定相应的颜色，通过保留下面的关于颜色的条形图，我们就可以很轻松的知道相应的col参数值所对应得具体颜色

pdf("colors-bar.pdf",heigh=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("Bar of colors in"~
                                                    italic(colors())))
dev.off()
getwd()#获得当前R语言的工作路径，在该目录下找到对应得条形图