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 

Это использует тот факт, что вы можете выполнять математические операции, как принимать среднее, из логические векторы.