比较R中的两列

Question

我在R中有两列，它们是1＆0; s和0＆＃39; s的列。

  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

我需要编写一个比较每列的函数，并获得预测列与得分列相同的平均值。这不应该太困难，但我是新的＆＃39; R＆＃39;编码，所以任何帮助非常感谢。谢谢！

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)