о счетных столбцах, удовлетворяющих условиям, используя R

Question

Как мы можем подсчитать количество столбцов, чтобы удовлетворить некоторым условиям.

df <- data.frame(id=c(1,2,3,4),v1=c(0.2,0.4,0.6,0.9),
       v2=c(0.1,0.2,0.6,0.1),v3=c(0.1,0.4,0.6,0.1))  


count<-function(x){dplyr::count(x>=0.5)}
df$count<-apply(x = df[,c(2:4)], MARGIN = 1, FUN =count, na.rm = TRUE)

Это не сработало .....

Должно быть

df$count<-c(0,0,3,1)

Answer 1

Вы можете использовать rowSums для подсчета условий, где df[-1]>=0.5:

rowSums(df[-1]>=0.5)
#[1] 0 0 3 1

Answer 2

Вариант с Reduce

Reduce(`+`, lapply(df[-1], `>=`, 0.5))
#[1] 0 0 3 1