以值为条件的 RowSums

Question

我是 r 的新手，有一个看起来很简单的问题。我想做 rowSums 但只包含在特定范围内的总和值(例如，高于 0)。

例如- 最后一列是请求的金额

  col1  col2  col3  col4 totyearly
1   -5     3     4    NA      7
2    1     40   -17   -3     41
3   NA     NA    -2   -5      0
4   NA     1      1    1      3  

我目前拥有的是:

df$totyearly <- rowSums(df[, 1:4], na.rm=TRUE)

如何添加正值条件？

Answer 1

我们可以使用replace将小于0的值替换为0，然后取rowSums。

df$totyearly <- rowSums(replace(df, df < 0, 0), na.rm = TRUE)
df

#  col1 col2 col3 col4 totyearly
#1   -5    3    4   NA         7
#2    1   40  -17   -3        41
#3   NA   NA   -2   -5         0
#4   NA    1    1    1         3