使用purrr创建查询列表

Question

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

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

返回求值的查询(即包含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

请注意，这里我们还使用了map()中匿名函数的公式简写，以返回一个未计算的查询。Quosure本身可以被map() (使用purrr::as_mapper())强制成函数，所以你之所以首先得到求值答案，是因为你本质上是在编写map(foo, ~ . + 2)。

由reprex package于2018-08-06创建(v0.2.0.9000)。