时间戳

首页 > 解决方案 > Tidyverse：为什么选择助手通过管道传递到 cross() 时，当将助手放置在 cross 内时，会抛出有关外部向量的注释/警告/错误？

r - Tidyverse：为什么选择助手通过管道传递到 cross() 时，当将助手放置在 cross 内时，会抛出有关外部向量的注释/警告/错误？

问题描述

matches()将选择助手 ( , contains(), starts_with(), )管道（的值ends_with()）到across()函数的行为与将选择助手放在括号内的行为不同across()。

复制

library(dplyr)

# Very simple function: returns input
self = function(x){x}

# Data to manipulate
dtemp = tibble(var = 1:2)

# No note/warning/error when selection helper is inside across()
dtemp %>% mutate(across(matches("var"), self))

# Note/warning/error when selection helper is piped to across()
dtemp %>% mutate(matches("var") %>% across(self))

观察到的行为

最后一行导致 R 打印

Note: Using an external vector in selections is ambiguous.
i Use `all_of(.)` instead of `.` to silence this message.
i See <https://tidyselect.r-lib.org/reference/faq-external-vector.html>.
This message is displayed once per session.

请注意，此消息每个会话仅打印一次，因此您必须重新启动 R 才能再次看到它（除非有其他方法可以重置控制此打印的计数器）。

倒数第二个命令（带有matches()inside across()）不会导致 R 打印注释。

预期行为

最后两个命令的行为相同。

附加信息

> sessionInfo()
R version 4.0.3 (2020-10-10)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 19042)

Matrix products: default

locale:
[1] LC_COLLATE=English_United States.1252  LC_CTYPE=English_United States.1252   
[3] LC_MONETARY=English_United States.1252 LC_NUMERIC=C                          
[5] LC_TIME=English_United States.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] dplyr_1.0.6

loaded via a namespace (and not attached):
 [1] fansi_0.5.0      assertthat_0.2.1 utf8_1.2.1       crayon_1.4.1    
 [5] R6_2.5.0         DBI_1.1.1        lifecycle_1.0.0  magrittr_2.0.1  
 [9] pillar_1.6.1     cli_2.5.0        rlang_0.4.11     rstudioapi_0.13 
[13] vctrs_0.3.8      generics_0.1.0   ellipsis_0.3.2   tools_4.0.3     
[17] glue_1.4.2       purrr_0.3.4      compiler_4.0.3   pkgconfig_2.0.3 
[21] tidyselect_1.1.1 tibble_3.1.2

标签： rdplyrtidyverseacross

解决方案

matches返回一个字符向量。在最近的dplyr版本中，all_of引入了消除歧义。假设您有一个data.frame包含两列的 a x，y 此外，假设您有一个变量x = 'y'。现在如果你select(x)，你的意思是列x还是列y？all_of(x)将消除这种歧义。因此，当您通过管道matches传输到across时，看起来您正在选择一个名为.. 这样做的原因是评估选择助手本身只是返回一个向量作为 .cols 的参数。这是 R 管道和输入的基本原理。您可以使用rlang::quo. 如果f <- function(x) rlang::quo(x)，则运行f(1)不同于运行1 %>% f. 首先返回一个带引号的 1，第二个返回一个带引号的.。因此，如果我们评估across(<selection-helper>)this 与评估 相同f(1)，而<selection-helper> %>% across()与 相同1 %>% f()。因为后者看起来像一个变量.，它有一个包含其值的专用环境（因此它看起来像一个名为..

为了澄清，让我们看看输出如下：

library(magrittr)
f <- function(x) rlang::enquo(x)
f(1)
#> <quosure>
#> expr: ^1
#> env:  empty
1 %>% 
    f()
#> <quosure>
#> expr: ^.
#> env:  00000000166DD798
`%>%`(1,f)
#> <quosure>
#> expr: ^.
#> env:  00000000165176F0

由reprex 包(v2.0.0)创建于 2021-06-24 第一个输出捕获和引用1（没有环境它不是对象/符号），在使用管道命令时，我们将值存储lhs在带有符号/名称的环境.。该值1现在包含在该环境中。这是管道工作原理的本质。将值存储lhs在名为 的环境中.，然后将其作为第一个参数放入rhs（除非.放在其他地方）并评估它。

因此，它会引发警告，因为它看起来像您将符号作为输入而不是值。如果保持<selection-help>内部交叉，它不是符号/对象它是字符向量，并且字符向量没有歧义（因为它不是符号）。原理同上f(1)。我希望这能提供一些清晰的信息。需要注意的是，一旦我们评估输入，它就不再是.它的真正价值。print(x)您可以通过在引用之前添加来看到这一点x。您可以在高级 R 编程https://adv-r.hadley.nz/中阅读更多相关信息，主要是第 7 章，以了解元编程部分中 R 引用、承诺和评估中的环境。

推荐阅读