2

私はこのような大きなマトリックスを持っています:

NCols=100
NRows=100

myMat<-matrix(runif(NCols*NRows), ncol=NCols)

として計算された、マトリックスのすべての値の平均または中央値に最も近い値を持つ行と列を見つけることに興味がありますmean(myMat)

どうすればこれを行うことができRますか?

4

1 に答える 1

7

これを試して:

set.seed(45) # just for reproducibility
NCols <- 100
NRows <- 100
myMat <- matrix(runif(NCols*NRows), ncol=NCols)

mat_minus_mean <- abs(myMat - mean(myMat))
idx <- which(mat_minus_mean == min(mat_minus_mean), arr.ind = TRUE)
#      row col
# [1,]   5  33

> myMat[idx]
# [1] 0.5012305 # mean(myMat) is 0.5012474
于 2013-03-11T17:40:39.860 に答える