在所有 NA 的情况下，R 将行总和返回为零

Question

在使用 na.rm =T 计算 rowSum 时所有行都是 NA 的情况下，无论如何要避免 0 作为结果

在下面的示例中，行总和为零，以防所有行都是 NA 但我在结果中需要 NA。我不能跳过使用 na.rm = T 因为其他情况可能有一些 NA。
我正在专门寻找数据表解决方案。

`df <- data.table::fread("X Y
2   26
3   NA
0 0
NA  NA
4   5
", header = TRUE)
df[,Sum:=rowSums(.SD,na.rm = T), .SDcols = names(df)]`

Answer 1

有很多方法可以做到这一点。我的输入：

df[, Sum:= rowSums(df, na.rm = TRUE) * NA ^ (rowSums(!is.na(df)) == 0)]

将返回：

    X  Y Sum
1:  2 26  28
2:  3 NA   3
3:  0  0   0
4: NA NA  NA
5:  4  5   9