当有1000个酒吧时,Barplot不会显示条形颜色(R语言)

Question

我的一个CSV文件有超过1000行记录,我想创建一个条形图并用"蓝色"或"红色"为条形颜色,具体取决于每个图表的值.所以我做了以下,但我注意到当我绘制整个CSV文件时,我没有看到任何"蓝色"或"红色"条; 然而,当我截断前50行并做同样的情节时,我能够看到彩色条纹.

> cols<-c("blue", "red")[(x>10)+1]
> barplot(x, col=cols, main="FO1_FO2 Variant Allele Frequencies", xlab="SNPs", ylab="VAF(%)", space=c(0.2, 0.8))

当我有1000多个条形/行数据时,有没有办法让彩条变色？或者是否有更好的绘图来显示值并通过颜色区分差异？

Answer 1

它正在绘制颜色,但它也绘制了一个覆盖颜色的边框.尝试

x<-rpois(1000,7)
cols<-c("blue", "red")[(x>10)+1]
barplot(x, col=cols, 
    main="FO1_FO2 Variant Allele Frequencies", 
    xlab="SNPs", ylab="VAF(%)", 
    space=c(0.2, 0.8),
    border=NA)

该border=NA会禁用边框的绘制.