3d 矩阵 R 上的平均值

use*_*416 2 r

我有一个像这样的 3d 数组

datamonth <- array(0, dim = c(length(LONG),length(LATG),length(YEAR)))

>dim(datamonth)
[1] 361 181  30
Run Code Online (Sandbox Code Playgroud)

其中前两个维度是经度和纬度(我有一个 1 度间隔的网格)。我想做的是计算每个网格点的数据月平均值,例如

Cell 1 
LON -180 -179
LAT  -90 -89

year 1: MeanCell1_yr
year 2: MeanCell1_yr    .
.
.
year 30: MeanCell1_yr

MeanCell1TOT = mean(MeanCell1_yr)
Run Code Online (Sandbox Code Playgroud)

非常感谢

flo*_*del 6

做这个:

rowMeans(datamonth, dims = 2)
Run Code Online (Sandbox Code Playgroud)

它会比

apply(datamonth, c(1,2), mean)
Run Code Online (Sandbox Code Playgroud)