r - 如何找到R中两列之间的准确性

Question

我有两列：一列用于预测值，另一列用于真实值。
我想计算这些列之间的准确性，如果两列都有缺失值，则使缺失值计为真。
所以当

Pred True
1     2
2     2
NA    NA
3     2

准确度为 50%。
另外，我应该如何对字符值做同样的事情？

标签： r

Answer 1

你可以做：

pred <- c(1,2,NA,3)
true <- c(2,2,NA,2)
(sum(pred==true, na.rm=T) + sum(is.na(pred) & is.na(true))) / length(pred)

也就是说，将pred和true相等sum(pred==true, na.rm=T)的次数加上它们都是NA值的次数sum(is.na(pred) & is.na(true))。除以向量长度。