我有一个矩阵如下;
1 2 3 4 5
1 0 1 1 0 0
2 0 0 1 1 0
3 1 0 0 0 1
4 0 0 1 0 0
5 0 1 0 0 0
我需要得到对称矩阵如下,对角线为 0;
1 2 3 4 5
1 0 1 1 0 0
2 1 0 1 1 1
3 1 1 0 1 1
4 0 1 1 0 0
5 0 1 1 0 0
我用for循环试过了,当矩阵的大小很小的时候很好。但是对于大尺寸,这需要时间。在 R 中有什么有效的方法吗?
编辑:第一行在第二和第三列有 1,第一列在第三行有 1。但是要具有对称的第一列也需要在第二行中有 1 个。同样,每一行和每一列都应该考虑 1 来保持对称矩阵。