我有以下形式的矩阵
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11]
1 1 3 2 3 1 1 2 3 3 2
接下来是我想要的输出(组合列号,具有相同的值)。
a<-1,2,6,7
b<-3,5,9,10
c<-4,8,11
最佳答案
以下列出了足够的 list :
aList <- setNames(split(seq_along(mat), mat), unique(letters[mat]))
aList
# $a
# [1] 1 2 6 7
#
# $c
# [1] 4 8 11
#
# $b
# [1] 3 5 9 10
但是,如果您的环境中确实需要变量,则可以执行以下操作:
attach(aList)
关于r - 合并具有相同值的列号,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/15246645/