使用R查找包含最大值的行索引

给定以下矩阵，假设我要在第二列中找到最大值：

mat <- matrix(c(1:3,7:9,4:6), byrow = T, nc = 3)
mat
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    7    8    9
[3,]    4    5    6

我知道max(mat[,2])将返回8。如何返回行索引，在这种情况下为第二行？

看到 ?which.max

> which.max( matrix[,2] )
[1] 2

请参阅?order。您只需要最后一个索引（或第一个，以降序排列），因此这可以解决问题：

order(matrix[,2],decreasing=T)[1]

接下来的情况如何，其中y是矩阵的名称，并且您正在寻找整个矩阵中的最大值：

row(y)[y==max(y)]

如果要提取行：

y[row(y)[y==max(y)],] # this returns unsorted rows.

要返回已排序的行，请使用：

y[sort(row(y)[y==max(y)]),]

这种方法的优点是您可以将条件内部更改为所需的任何内容。此外，使用col(y)和悬挂逗号的位置，您还可以提取列。

y[,col(y)[y==max(y)]]

要仅查找特定列中最大值的行，请说出第2列，您可以使用：

seq(along=y[,2])[y[,2]==max(y[,2])]

同样，该条件可以灵活地查找不同的需求。

有关其他想法，请参见Phil Spector出色的“ S和S-Plus简介”第5章。