[R言語]apply()で配列(array)の行ごとの中央値を取得する(get medians of each rows)には？

どうも、ちょげ(@chogetarou)です。

apply()を使って配列(array)の行ごとの中央値を取得する方法を紹介します。

方法
使用例

方法

apply()を使って配列(array)の行ごとの中央値を取得するには、median()を使います。

まず、apply()を呼び出します。

そして、apply()の第１引数に配列(array)、第２引数に「１」、第３引数に「median」を指定します。

#arr=対象の配列
result <- apply(arr, 1, median)

上記のapply()は、配列(array)の行ごとの中央値を取得します。

使用例

nums <- array(c(99, -2, 91, 86, 88, 95,
                 33, 28, 31, 0, 39, 34,
                 30, 28, 24, 24, -5, 28,
                 1, 4, 11, 0, 2, -10), dim=c(4, 6))

result <- apply(nums, 1, median)

nums
cat("中央値：", result)

出力：
     [,1] [,2] [,3] [,4] [,5] [,6]
[1,]   99   88   31   30   -5   11
[2,]   -2   95    0   28   28    0
[3,]   91   33   39   24    1    2
[4,]   86   28   34   24    4  -10

中央値： 30.5 14 28.5 26