R 中的 map() 与 map_dfr() 的差异

Question

在 R 中使用purrr的 purrr R时，我看到map() function 返回了一个列表。

library(tidyverse)
set.seed(123)

map(1:5, ~rnorm(3))
#> [[1]]
#> [1] -0.5604756 -0.2301775  1.5587083
#> 
#> [[2]]
#> [1] 0.07050839 0.12928774 1.71506499
#> 
#> [[3]]
#> [1]  0.4609162 -1.2650612 -0.6868529
#> ......

我想将此列表转换为具有 3 列的数据框。 一种选择是使用do.call(rbind, .) 。 但是，我也注意到map_dfr() function 存在。

以与map()相同的方式使用此 function 会产生错误。

map_dfr(1:5, ~rnorm(3))
#> Error: Argument 1 must have names.

问题

导致此错误的map()和map_dfr()函数之间有什么区别？ 以及应该如何使用map_dfr() function 直接在映射 function 中绑定行？

Answer 1

当map output 是 dataframe 或命名向量时， map_dfr直接绑定行：

library(dplyr)
library(purrr)

map(1:5, ~as.data.frame(matrix(rnorm(3),nrow=1)))
[[1]]
        V1        V2        V3
1 1.326029 0.4581257 0.4367454

[[2]]
          V1         V2        V3
1 -0.3769822 -0.2488601 -1.441538

[[3]]
          V1       V2         V3
1 -0.4931225 1.145818 -0.6269974

[[4]]
         V1       V2       V3
1 -1.679398 1.035032 1.784175

[[5]]
         V1        V2        V3
1 0.5158901 -2.322314 -1.145897

map_dfr(1:5, ~as.data.frame(matrix(rnorm(3),nrow=1)))
           V1         V2          V3
1  0.29250530 -0.8325543  0.21013608
2  1.03348415  0.3333718 -0.08498664
3  1.01011329  0.6583516 -0.49360421
4 -0.06229409 -0.1200969  0.06078136
5 -1.92491929  0.3891900 -0.57046411

它相当于：

map(1:5, ~as.data.frame(matrix(rnorm(3),nrow=1))) %>% bind_rows

您收到错误是因为您向map_dfr提供了一个没有列名的向量。
这有效：

map_dfr(1:5, ~setNames(rnorm(3),LETTERS[1:3])) 
# A tibble: 5 x 3
       A      B      C
   <dbl>  <dbl>  <dbl>
1 -0.360 -1.36   1.40 
2  0.715  1.55   0.381
3  1.20  -0.179  0.315
4  0.126 -0.467  1.04 
5  1.31   0.375 -2.21 

Answer 2

使用 map_dfr 的另一种方法。 我喜欢以这种方式使用它，因为它允许 OP 问题的 scope 之外的其他可能性。

library(tidyverse)

df <- map_dfr(1:5, function(x) {
       r <- rnorm(3)
       tibble(A = r[1], B = r[2], C = r[3])
})