在R中求和3D矩阵

Summing 3D matrix in R

我有一个 3D 矩阵,"xx",尺寸为:6847x2x2。这是一片:

         > xx[1,,]
              [,1] [,2]
         [1,]  0.4  0.1
         [2,]  0.1  0.4

还有一个...

          > xx[6847,,]
                [,1] [,2]
           [1,]  0.4  0.9
           [2,]  0.1  0.8

我想做的是创建一个 2x2 矩阵,其中该矩阵是所有 6847 个矩阵的总和。也就是说,matrix_new[1,1] 将引用 .4+..+.4 而 matrix_new[1,2] 将是 .1+..+.9 谢谢

colSums(或rowSums)在这里可能有用

# Data 
ar <- 1:12
dim(ar) <- c(3, 2, 2)

ar[1,,]
#     [,1] [,2]
#[1,]    1    7
#[2,]    4   10

 ar[2,,]
#     [,1] [,2]
#[1,]    2    8
#[2,]    5   11

ar[3,,]
#     [,1] [,2]
#[1,]    3    9
#[2,]    6   12

 # Sum over first dimension
 colSums(ar, dims=1)
 #     [,1] [,2]
 #[1,]    6   24
 #[2,]   15   33