如何在R中总结表格的前导对角线

Posted 2023-03-12

【中文标题】如何在R中总结表格的前导对角线

【英文标题】：How to sum leading diagonal of table in R

【发布时间】：2011-08-04 15:29:18

【问题描述】：

我在 R 中使用table() 命令创建了一个表：

   y
x    0  1  2  3  4  5  6  7  8  9
  0 23  0  0  0  0  1  0  0  0  0
  1  0 23  1  0  1  0  1  2  0  2
  2  1  1 28  0  0  0  1  0  2  2
  3  0  1  0 24  0  1  0  0  0  1
  4  1  1  0  0 34  0  3  0  0  0
  5  0  0  0  0  0 33  0  0  0  0
  6  0  0  0  0  0  2 32  0  0  0
  7  0  1  0  1  0  0  0 36  0  1
  8  1  1  1  1  0  0  0  1 20  1
  9  1  3  0  1  0  1  0  1  0 24

这张表显示了分类的结果，我想总结它的前对角线（带有大数字的对角线 - 比如 23、23、28 等）。在 R 中是否有一种明智/简单的方法可以做到这一点？

【参考方案1】：

sum(diag(tbl)) 怎么样，tbl 是你的桌子？

【讨论】：

不会使用矩阵函数“trace”，给出相同的答案，但更简单？如果“tbl”是您的表，则 R 命令为 tr(tbl)

但是没有函数tr。 trace 用于调试 - 我看不出这在这里有什么用处。