r - 是否有 R 函数用于对存储为单个列表对象中的元素的矩阵进行元素求和？

Question

这个问题在这里已经有了答案:




8年前关闭。

Possible Duplicate:
Sum a list of matrices
Add together a list of matrices element-by-element

我有一个 R 列表对象。列表的每个元素都包含 3 x 3 矩阵。
我想按元素对所有矩阵求和。
那是:

 myList <- list();
 myList[[1]] <- matrix(1:9,3,3)
 myList[[2]] <- matrix((1:9)*10,3,3)

然后我想要最终的输出输出

myList[[1]]+myList[[2]]

      [,1] [,2] [,3]
 [1,]   11   44   77
 [2,]   22   55   88
 [3,]   33   66   99

当然，我可以为此计算编写一个循环，但 R 中的循环非常慢。
R 中是否有内置函数来完成这项业务？

Answer 1

见 ?Reduce .

从示例中:

## A general-purpose adder:
add <- function(x) Reduce("+", x)

然后你可以

add(myList)