在处理混淆矩阵时添加新列的 R 问题

R issue with adding a new column while working on Confusion Matrix

我正在研究 R 中的混淆矩阵。

我有以下数据

row.names    A    B    C    Actual
d1           1    1    1    1
d2           0    0    1    0
d3           1    1    0    0
d4           0    0    0    0
d5           0    1    1    1
d6           1    0    1    1

我需要创建一个新列 Classifier,如果 rowsums(data[,1:3]) 大于或等于 2,则值为 1,如果行和小于 2,则值为 0。

任何人都可以向我提供如何执行此操作的提示。

你可以试试

data$Classifier <- (rowSums(data[,1:3]) >=2)+0L
data
#   A B C Actual Classifier
#d1 1 1 1      1          1
#d2 0 0 1      0          0
#d3 1 1 0      0          1
#d4 0 0 0      0          0
#d5 0 1 1      1          1
#d6 1 0 1      1          1

数据

data <- structure(list(A = c(1L, 0L, 1L, 0L, 0L, 1L), B = c(1L, 0L, 
1L, 
0L, 1L, 0L), C = c(1L, 1L, 0L, 0L, 1L, 1L), Actual = c(1L, 0L, 
0L, 0L, 1L, 1L)), .Names = c("A", "B", "C", "Actual"), 
row.names = c("d1", "d2", "d3", "d4", "d5", "d6"),
class = "data.frame")