web-dev-qa-db-ja.com

行列の最大値の行と列のインデックスを見つける

マトリックスの最大要素値とその位置（マトリックスの行と列のID）を見つけたい。

次の関数を使用して、行列の行と列を返します。

これは悪いハックのように思えます-それは私がおそらくネイティブメソッドを欠いているようなものです。より良い/ Rをもっと方法はありますか？

私の機能は次のとおりです。

matxMax <- function(mtx)
{
    colmn <- which(mtx == max(mtx)) %/% nrow(mtx) + 1
    row <- which(mtx == max(mtx)) %% nrow(mtx)
    return( matrix(c(row, colmn), 1))
}

私が使用するのは次のとおりです。

mm <- matrix(rnorm(100), 10, 10)
maxCords <- matxMax(mm)
mm[maxCords]
rmatrix
52
ricardo

できる

## Some data
set.seed(123)
mm <- matrix(rbinom(40, 20, 0.5), 8, 5)
mm
#      [,1] [,2] [,3] [,4] [,5]
# [1,]    9   10    8   11   11
# [2,]   12   10    6   11   12
# [3,]    9   14    9   10    6
# [4,]   13   10   14   11   10
# [5,]   13   11   13    9   12
# [6,]    6   10   11    8    8
# [7,]   10    7   11   14    9
# [8,]   13   13   16   13    8

which(mm == max(mm), arr.ind = TRUE)
#      row col
# [1,]   8   3
102
QuantIbex

これらはどうですか？

which.min(mm)
which.max(mm)
0
Dongho Yoo