R检查至少有20％的矢量是否有特定值

Question

说我有一个x长度的矢量。我想检查这个向量中至少有20％的元素的值是否低于0.00001。我会怎么做？

到目前为止，我知道我可以弄清楚如何获得20％的矢量，它应该是length(vector)/5。

我不知道如何做其余的。任何帮助？谢谢。

Answer 1

试试这个：

percentage<-(length(which(x<.000001))/length(x))*100 
if(percentage<20) { .....} 

Answer 2

试试这个

if(sum(which(vector < 0.00001) == T) >= length(vector)/5) { 
    --- check --- 
} 

Answer 3

另一种选择：

x <- 1:100 
mean(x < 10) >= 0.2 # replace 10 with 0.00001 or whatever you need 
#[1] FALSE 

这使用，你可以进行数学运算，如取均值，这一事实逻辑向量。