r - 如何合并具有相同列名的列表以获得它们的联合

Question

假设我有 N 个列表，它们都具有相同的列名。我想合并这些，以便我得到一个具有相同列的结果列表，但现在包含所有 N 列表中的条目。这是一个显示我想要的 MWE:

  ls<-list()
ls[[1]]<-list("a"=1,
              "b"=2)
    ls[[2]]<-list("a"=3,
                  "b"=4)

#how to write a one-liner that produces lsTotal, which is the union of ls[[1]] and ls[[2]]?

lsTotal<-list("a"=c(1,3),
              "b"=c(2,4))  

我找到了这个 thread ，从中我可以使用 Map(c, ls[[1]], ls[[2]]) .但是，如果 ls 写出来很乏味很长。有捷径吗？

Answer 1

一种选择是 tidyverse

library(purrr)
library(dplyr)
transpose(ls) %>%
        map(unlist)

或使用 Map与 do.call

do.call(Map, c(f=c, ls))
#$a
#[1] 1 3

#$b
#[1] 2 4