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 

這使用，你可以進行數學運算，如取均值，這一事實邏輯向量。