通过在 purrr 中按元素求和来减少列表

Reduce lists by summing element-wise in purrr

我正在尝试使用 purrr 对具有相同索引的列表元素求和。这可以在 base R 中使用以下方法实现:

xx <- list(a = c(1,2,3,4,5), b = c(1,2,3,4,5))
Reduce("+", xx)

其中提供:

[1]  2  4  6  8 10

太棒了!这就是我需要的,但我想在 purrr 内完成所有操作。 %>% reduce(sum) 返回单个值。有谁知道在 purrr?

中执行此操作的语法

编辑 - 我忘了具体说明,这需要对 n 个列表起作用。

你可以做到(s.?reduce):

   xx %>% reduce(`+`)
   [1]  2  4  6  8 10