R rgb透明度与rect画图

来源:互联网 发布:mac系统全选快捷键 编辑:程序博客网 时间:2024/06/05 18:42

哥们找个图让我画,查了一番和妹子的点拨,总结了一些东西:

fa<-read.table("KEYNAME.cluNum.ladder",header=FALSE)mat <- fa[,2]pdf("bar.pdf")barplot(mat,ylim=c(0,7000),width=1,space=0)axis(1,1:96,labels=fa$V1,tick=FALSE)color <- rgb(255,127,0,alpha=80,max=255) #rgb的透明度与max有关系rect(-0.2,0,96.2,7000,col=color,border="transparent")rect(10,0,96.2,7000,col=color,border="transparent")rect(85,0,96.2,7000,col=color,border="transparent")rect(95,0,96.2,7000,col=color,border="transparent")dev.off()