r - 当有 1000 个条形时，条形图不显示条形颜色(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 将禁用边框的绘制。