r - 使用 purrr 创建一个 quosures 列表

Question

是否可以使用 purrr 返回 quosures 列表？

foo <- c(1:3)
purrr::map(foo, rlang::quo(. + 2))

返回评估的 quosures（即包含 3 到 5 的列表）。

有没有办法返回包含 quo(1 + 2)、quo (2 + 2) 等的列表？

（如果重要的软件包版本或将来访问：purrr 0.2.5，rlang 0.2.1）。

Answer 1

您可以使用!!将输入取消引用到 quosure：

foo <- c(1:3)
purrr::map(foo, ~ rlang::quo(!!.x + 2))
#> [[1]]
#> <quosure>
#>   expr: ^1L + 2
#>   env:  0000000015213C98
#> 
#> [[2]]
#> <quosure>
#>   expr: ^2L + 2
#>   env:  0000000015217758
#> 
#> [[3]]
#> <quosure>
#>   expr: ^3L + 2
#>   env:  00000000157B9FD0

请注意，这里我们还使用匿名函数 in 的公式简写map()来返回未评估的 quosure。Quosures 本身可以通过map()（使用purrr::as_mapper()）强制转换为函数，所以你之所以首先得到评估答案是因为你本质上是在写map(foo, ~ . + 2).

由reprex 包(v0.2.0.9000) 于 2018 年 8 月 6 日创建。