背景假设,如果每一用户收集到一行信息,表示不同维度的严重程度,对每一个用户的严重程度进行排序。
#人为创建一个数据矩阵
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
资源来自人大经济论坛,链接找不到了,感谢。