x <- list(a = matrix(c(rep(1, times = 8), 9:16), nc = 4), b = matrix(1, nc = 4, nr = 4))
我的数据共享第一列和第二列，而第三列和第四列不同
如果我想添加每个列表的相应元素
Reduce("+",x)
如何在保持第一列和第二列不变的情况下仅添加第三列和第四列？
答案 0 :(得分：0)
为什么在添加之前不选择第三列和第四列？
cbind(x[[0]][,1:2], Reduce("+", lapply(x, function(mat) mat[, 3:4])))