比较R中的两列

Question

我在R中有两列，分别是1和0的列。

  Score Predict
     1       1
     1       0
     0       1
     1       1
     0       1
     1       0
     1       1
     1       1
     1       1
     0       1
     0       0
     0       0
     0       0
     1       1
     1       1
     1       1

我需要编写一个比较每个列并获取预测列与分数列相同次数的平均值的函数。 这应该不太困难，但是我是使用“ R”编码的新手，因此，非常感谢您的帮助。 谢谢！

Answer 1

评论回答：

比较每列...预测列与分数列相同

Score == Predict # or with(df, Score == Predict)

得到一个平均值

mean(Score == Predict) # with(df, Score == Predict)

Answer 2

如果您的数据是

 set.seed(123)
 df <- data.frame(a = rbinom(10, 1, 0.5), b = rbinom(10, 1, 0.75) )

然后

sum(df$a == df$b)/nrow(df) 
[1] 0.9

Answer 3

bdf <- data.frame(Score = rbinom(10, 1, 0.5), Predict = rbinom(10, 1, 0.5))
sum(with(bdf, Score == Predict))/nrow(bdf)