所有 NA 的 rowSums

Question

这个问题在这里已经有了答案:

rowSums but keeping NA values (4 个回答)

关闭 6年前。

df <- data.frame(a = c(1, 1, NA, 0, 1, 0),
                 b = c(0, 1, NA, NA, 0, 1),
                 c = c(NA, 0, NA, 0, 1, NA),
                 d = c(1, NA, NA, 1, 1, 0))

rowSums(df)
#[1] NA NA NA NA  3 NA
rowSums(df, na.rm=T)
#[1] 2 2 0 1 3 1

我得到了第一个，但我的假设和希望是第三个观察结果将返回 NA。有没有办法让它返回 NA 进行第三次观察？

Answer 1

这是一种选择:

rowSums(df, na.rm = TRUE) * NA ^ (rowSums(!is.na(df)) == 0)
# [1]  2  2 NA  1  3  1

这使用 anything ^ 0 在 R 中等于 1。