获得R中矩阵的每行中K个最小或最大元素的索引

Question

如何在R？

中获得矩阵的eaach行中K个最小或最大元素的索引

E.g。我有矩阵：

2   3   1  65  2
46  7   9  3   2
9   45  3  5   7
24  65  87 3   6
34  76  54 33  6

我想在每行中获得指数2个最小元素（以任何方式打破关系）的指数矩阵。结果应采用以下格式：

3 1
5 4
3 4
4 5
5 4

我使用sort，apply，arrayInd，which等尝试了一些命令，但仍然无法获得所需的结果。 欢迎任何帮助。

Answer 1

apply(mat, 1, which.max)  #.....largest
apply(mat, 1, which.min)  #.....smallest

t(apply(mat, 1, sort)[ 1:2, ])  # 2 smallest in each row

t(apply(mat, 1, order)[ 1:2, ])  # indices of 2 smallest in each row

除了使用decrease = TRUE之外，您还可以将它用于连续两个最大值：

t(apply(mat, 1, order)[ 5:4, ])    

Answer 2

怎么样？

• 在每一行中找到k个最大值的索引

  apply(mat, 1, function(x, k) which(x <= max(sort(x, decreasing = F)[1:k]), arr.ind = T), k)`
  

• 在每一行中找到k个最小值的索引

  apply(mat, 1, function(x, k) which(x >= min(sort(x, decreasing = T)[1:k]), arr.ind = T), k)`
  

在您的示例中，对于k <- 2，前者会导致

     [,1] [,2] [,3] [,4] [,5]
[1,]    2    1    1    2    2
[2,]    4    3    2    3    3

后者导致

[[1]]
[1] 1 3 5

[[2]]
[1] 4 5

[[3]]
[1] 3 4

[[4]]
[1] 4 5

[[5]]
[1] 4 5

将apply的第二个参数从1更改为2以搜索列。