r - 多个矩阵的元素之和

Question

我有一些相同维度的矩阵。某些值缺失或不适用。

 matrix1

      [,1] [,2]
 [1,]    0    0
 [2,]   NA    2


 matrix2

      [,1] [,2]
 [1,]    1   NA
 [2,]   NA    0

 matrix3

       [,1] [,2]
 [1,]    1    0
 [2,]    3   NA

预期输出

      [,1] [,2]
[1,]    2    0
[2,]    3    2

试过 A + B +C 不正确

Answer 1

如果m1、m2、m3是矩阵

 matrix(mapply(sum, m1,m2,m3, MoreArgs=list(na.rm=T)),ncol=2)
 #      [,1] [,2]
 #[1,]    2    0
 #[2,]    3    2

或者

 Reduce(`+`, lapply(list(m1,m2,m3),function(x) {x[is.na(x)] <-0;x}))
 #       [,1] [,2]
 #[1,]    2    0
 #[2,]    3    2