我有一个像这样的 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)
非常感谢
做这个:
rowMeans(datamonth, dims = 2)
Run Code Online (Sandbox Code Playgroud)
它会比
apply(datamonth, c(1,2), mean)
Run Code Online (Sandbox Code Playgroud)