r - 如何在 R 中创建错误（又名混淆）矩阵？

Question

如何在 R 中生成错误（又名混淆）矩阵？

让我们从一些示例数据开始：

a = c(1,2,3,4,5,1,2,2,3,4,2,1,4,5,5,1)
b = c(1,2,3,4,5,1,2,2,3,4,2,2,4,5,2,1)

这是我基于样本数据要实现的目标：

     [,1] [,2] [,3] [,4] [,5] [total]
 [,1]  3    1                    4
 [,2]       4                    4
 [,3]            2               2
 [,4]                3           3
 [,5]       1              3     4
[total]3    6    2   3     3     16   

我可以使用 创建一个简单的交叉表矩阵table()，但是我似乎无法获得行、列和总体总计。

> table(a,b)
   b
a   1 2 3 4 5
  1 3 1 0 0 0
  2 0 4 0 0 0
  3 0 0 2 0 0
  4 0 0 0 3 0
  5 0 1 0 0 2

Answer 1

要获取行、列和总体总计，只需使用addmargins：

> addmargins(table(a, b))
     b
a      1  2  3  4  5 Sum
  1    3  1  0  0  0   4
  2    0  4  0  0  0   4
  3    0  0  2  0  0   2
  4    0  0  0  3  0   3
  5    0  1  0  0  2   3
  Sum  3  6  2  3  2  16