R语言怎么对矩阵每行进行排列，然后记住元素在原矩阵的位置

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

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

怎么对矩阵每行进行从大到小排列，然后记住元素在原矩阵的位置，求大牛帮忙，谢谢！
>      [,1] [,2] [,3] [,4]
[1,]    11    6    3   1
[2,]    10    8    7   4
[3,]    12    9    5   2

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 Data matrix 元素

1. > for(i in 1:3){
   
2. + M[i,]<-M[i,order(M[i,],decreasing=T)]
   
3. + }
   
4. > M

复制代码

不知道是你想要的不

jalonso 发表于 2015-11-27 16:50
不知道是你想要的不

谢谢，那我怎么用一个matrix或者list来记住元素所在原来矩阵的列数？还请赐教

1. # 按降序排列,排序用sort
   
2. t(apply(M,1,sort,decreasing=T))
   
3. # 对应原来的位置，order
   
4. t(apply(M,1,order,decreasing=T))

复制代码

jiangbeilu 发表于 2015-11-27 19:28

非常感谢，代码简洁明了，大牛，能不能再请教个问题：粗糙集里面有3中划分如：
U/R1={{x1,X2,X3,},{x4,x5,x6}}
U/R2={{x1,x2},{x3,x4,x5,x6}}
U/R3={{x1,x2,x3,x4},{x5,x6}}
最后得到：
U/R={{x1,x2},{x3},{x4},{x5,x6}}

恳求大牛帮帮忙，代码实现，非常感谢您！