计算列表或3D数组中的矩阵之和

Question

给定一个2x2矩阵的列表（长度= n），我该如何计算所有这些矩阵的总和（并得到一个2x2矩阵）？

我该怎么做，如果不是列表而是列表中有这些矩阵在（2 x 2 x n）维数组中？

Answer 1

的总和列表中的矩阵：

Reduce("+", matrix_list) 

Answer 2

我会惹阵列，所以如果你有一个list例如：

n <- 5 
someList <- lapply(1:n, function(i) matrix(1:4+(i-1)*4,2,2)) 

改造它到3d array

someArray <- array(unlist(someList), c(2,2,n)) 

现在你可以使用rowSums

rowSums(someArray, dims=2) 
#  [,1] [,2] 
# [1,] 45 55 
# [2,] 50 60