计算至少有一个值的行数[重复]

Question

我有一个这样的 df：

a   b   c   d
1   1   1   1
2   2   3   NA
3   NA  NA  2 
4   NA  2   NA
5   NA  NA  NA

是否有可能计算出有多少行在所有变量上都没有非缺失值，因此例如这里它将返回 4，因为其余的部分至少有一个 none NA 值变量。

Answer 1

既然现在很清楚我们想从计算中忽略列a。这里有几种方法：

使用rowSums

sum(rowSums(!is.na(df[-1])) > 0)
#[1] 4

#OR

sum(rowSums(is.na(df[-1])) != (ncol(df) - 1))

使用apply

sum(apply(!is.na(df[-1]), 1, any))

#OR

sum(!apply(is.na(df[-1]), 1, all))

使用dplyr中的filter_at根据条件过滤行，但我们可以使用nrow来获取满足我们要求的行数。

library(dplyr)
df %>%  filter_at(-1, any_vars(!is.na(.))) %>% nrow