行列内の最大値の行と列のインデックスを見つける [重複] 質問する

行列内の最大値の行と列のインデックスを見つける [重複] 質問する

行列の最大要素値とその位置 (行列内の行と列の 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]

ベストアンサー1

できるだろう

## 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

おすすめ記事