计算具有行的特定值的列

Question

我想计算具有特定值/限制的列。

实施例： 数据帧具有列a0，a1，a2，... a9

我现在想要计算值大于1.0的A列，并将该值存储在数据帧的另一列（例如s0）中。

应该对数据框中的每一行进行此操作。

提前谢谢

Answer 1

df <- data.frame(a0=sample(0:5,20,replace=TRUE),a1=sample(0:5,20,replace=TRUE))

df$s0 <- apply(df,1,function(x) sum(x>1))

或

df$s0 <- rowSums(df>1)   ## Suggested by Sotos