如何在R中对4-D阵列的第四维进行平均

Question

我在R中有一个4-D数组，我想在第四维上平均我的数组，以便它被缩减为3-D数组。是否有一个简单的命令来执行此操作，或者在for循环中执行它是否更快？

例如，假设我有以下4-D数组A，我想要一些可以在A.mean

中产生答案的代码

A = array(2,c(3,4,2,2))
A[,,,2] = 3


A.mean = array(2.5,c(3,4,2))

Answer 1

我们可以使用

apply(A, c(1,2,3), FUN=mean)