将数据帧的完整连接列表加速到R中的一个数据帧

Question

我有100,000个数据帧的列表，并希望将它们完全合并到一个数据帧中。 我试过Reduce，但速度很慢。这是我的代码示例：

dfs <- list(
    df1 = data.frame(a = 1:3, b = c("a", "b", "c")),
    df2 = data.frame(c = 4:6, b = c("a", "c", "d")),
    df3 = data.frame(d = 7:9, b = c("b", "c", "e"))
)
z <- dfs %>%
    Reduce(function(dtf1,dtf2) dplyr::full_join(dtf1,dtf2), .)

有人可以提出任何建议来优化这个full_join函数吗？