背景假設,如果每一用戶收集到一行信息,表示不同維度的嚴重程度,對每一個用戶的嚴重程度進行排序。
#人爲創建一個數據矩陣
data <-c(1,4,2,6,8,5,3,7,9,11,10,12)
M<-matrix(data,nrow=3,ncol=4)
M
[,1] [,2] [,3] [,4]
[1,] 1 6 3 11
[2,] 4 8 7 10
[3,] 2 5 9 12
#先使用列排序再轉置
t(apply(M,1,sort,decreasing=T))
[,1] [,2] [,3] [,4]
[1,] 11 6 3 1
[2,] 10 8 7 4
[3,] 12 9 5 2
#這是顯示相應的位置
t(apply(M,1,order,decreasing=T))
[,1] [,2] [,3] [,4]
[1,] 4 2 3 1
[2,] 4 2 3 1
[3,] 4 3 2 1
資源來自人大經濟論壇,鏈接找不到了,感謝。