r - 组合具有相同值的列号

Question

我有以下形式的矩阵

[,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

Answer 1

以下为您提供了一个列表，应该足够了:

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)