如何使用apply函数在R中找到相同位置的数组条目的平均值

How to use the apply function to find the mean of array entry in the same position in R

对于以下数组

z <- array(1:12, dim = c(2,2,3))
 z
, , 1

     [,1] [,2]
[1,]    1    3
[2,]    2    4

, , 2

     [,1] [,2]
[1,]    5    7
[2,]    6    8

, , 3

     [,1] [,2]
[1,]    9   11
[2,]   10   12

我想通过取相同头寸条目的平均值来构造一个 2x2 矩阵。我的第一个条目是 1,5,9 的平均值,第二个条目是 3,7,11 的平均值,第三个条目是 2,6,10 的平均值,第四个条目是 4,8,12 的平均值。 任何帮助表示赞赏。

我们将 MARGIN 指定为 1 和 2,并使用 apply

应用 mean
apply(z, c(1,2), mean)
#     [,1] [,2]
#[1,]    5    7
#[2,]    6    8

或指定一个边距并使用rowMeans

apply(z, 1, rowMeans)