我确信这是一个非常简单的修复，但我似乎找不到答案...我试图在数据框的末尾创建一个列，它是特定值的次数总和（例如“1”）出现在该行上。例如，如果我从以下数据框开始：
X1 <- c(5,1,7,8,1,5)
X2 <- c(5,0,0,2,3,7)
X3 <- c(6,2,3,4,1,7)
X4 <- c(1,1,5,2,1,7)
df <- data.frame(id,X1,X2,X3,X4)
id X1 X2 X3 X4
1 1 5 5 6 1
2 2 1 0 1 1
3 3 7 0 3 5
4 4 8 2 4 2
5 5 1 3 2 1
6 6 5 7 7 7
我试图确定值“1”在该行中出现了多少次，我希望输出如下所示：
id X1 X2 X3 X4 one_appears
1 1 5 5 6 1 2
2 2 1 0 1 1 3
3 3 …