2
我有同現類型的數據的平方矩陣,如:R:條件刪除行和列以矩陣
m <- matrix(c(30, 30, 30, 30, 20, 0, 0,
30, 373, 30, 204, 207, 0, 290,
30, 30, 65, 65, 20, 35, 0,
30, 204, 65, 239, 38, 35, 156,
20, 207, 20, 38, 207, 0, 134,
0, 0, 35, 35, 0, 35, 0,
0, 290, 0, 156, 134, 0, 290),
nrow=7, byrow=TRUE)
通過比較上三角+對角線元素,也有一些偏離對角線等於對角線。我想通過滿足刪除的行和列:
if ((m[i,j] == m[i,i]) & (m[i,j] < m[j,j]))
因此,只留下了較大的發生,當一個元素總是與另一個共同出現取出行/列的行/列。
輸出應該是:
373 204
204 239
謝謝!
這正是我需要的!非常感謝! – striatum