我使用R中的table()命令创建了一个表格:

   yx    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中有什么简单直接的方法可以做到这一点吗？

回答：

试试sum(diag(tbl))怎么样，其中tbl是你的表格？