2012-04-04から1日間の記事一覧

R R

ある配列yの最小値を取る添字(i0)を知りたい. その添字に対応する,別の配列xの値を取得する. N <- 100 x <- rexp(N,rate=1) y <- runif(N) i0 <- which(y==min(y)) x[i0]