r - 使用 purrr 和 dplyr: 是 rlang::sym 最好的方法-6ren

r - 使用 purrr 和 dplyr: 是 rlang::sym 最好的方法

转载作者：行者123 更新时间：2023-12-01 03:17:11

32

4

我想编写使用 dplyr 动词的函数，这意味着我必须涉足 rlang 的浑水。 .

为了提供一个具体的例子，假设我想使用 purrr::map_df()迭代 dplyr::group_by() 中的变量. programming with dplyr小插图通过写 my_summarise()功能;方法是使用 rlang::enquo()在分组变量上，然后用 !! 取消引用.
这种方法可以创建一个新的类似 dplyr 的函数，该函数采用不带引号的变量名(小插图中的 my_summarise(df, g1))。

相比之下，我想 purrr 以字符串形式提供变量名称。是 rlang::sym()这样做的正确方法是什么？好像不是，因为 sym()在 dplyr 编程小插图中没有提到，在 rlang tidy evaluation article 中也几乎没有提到.有没有更好的办法？

library(tidyverse)
my_summarise <- function(df, group_var) {
  group_var <- rlang::sym(group_var)

  df %>%
    group_by(!!group_var) %>%
    summarise(mpg = mean(mpg))
}

# This works. Is that a good thing?
purrr::map_df(c("cyl", "am"), my_summarise, df = mtcars)

# A tibble: 5 x 3
    cyl   mpg    am
  <dbl> <dbl> <dbl>
1  4.00  26.7 NA   
2  6.00  19.7 NA   
3  8.00  15.1 NA   
4 NA     17.1  0   
5 NA     24.4  1.00

作为后续，为什么简单地取消引用(不首先应用 enquo 或 sym )有时会起作用？在下面的例子中，为什么 select()按预期工作，但 group_by()不是吗？

x <- "cyl"
select(mtcars, !!x)
group_by(mtcars, !!x)

更新:答案与取消引用无关。就是这样 select更灵活，可以处理字符串，而 group_by不能。

其他引用:此 blog post通过埃德温·托恩。

最佳答案

简短的回答:是的。

如果您想 map在列上，sym是一个很好的方法。莱昂内尔·亨利演示 sym在 draft vignette .

如果您想传递列名，但不想迭代，Kirill Müller prefers quo .在下面的示例中，它们具有相同的效果。

library(dplyr)

x <- rlang::quo(cyl)
y <- rlang::sym("cyl")
identical(group_by(mtcars, !!x), group_by(mtcars, !!y))  # TRUE

关于r - 使用 purrr 和 dplyr: 是 rlang::sym 最好的方法，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/48131597/

32

4

0

文章推荐： python - jitclass 与扩展 API : what can be used in a list?

文章推荐： ajax - jQuery .find() 不适用于 $.post() 数据

文章推荐： python - 如何在应用程序退出时正确终止线程

Ruby 方法() 方法
我想了解 Ruby 方法 methods() 是如何工作的。我尝试使用“ruby 方法”在 Google 上搜索，但这不是我需要的。我也看过 ruby-doc.org，但我没有找到这种方法。
VBS教程：方法-Test 方法
Test 方法对指定的字符串执行一个正则表达式搜索，并返回一个 Boolean 值指示是否找到匹配的模式。 object.Test(string) 参数 object 必选项。总是一个
VBS教程：方法-Replace 方法
Replace 方法替换在正则表达式查找中找到的文本。 object.Replace(string1, string2) 参数 object 必选项。总是一个 RegExp 对象的名称。
VBS教程：方法-Raise 方法
Raise 方法生成运行时错误 object.Raise(number, source, description, helpfile, helpcontext) 参数 object 应为
VBS教程：方法-Execute 方法
Execute 方法对指定的字符串执行正则表达式搜索。 object.Execute(string) 参数 object 必选项。总是一个 RegExp 对象的名称。 string
VBS教程：方法-Clear 方法
Clear 方法清除 Err 对象的所有属性设置。 object.Clear object 应为 Err 对象的名称。说明在错误处理后，使用 Clear 显式地清除 Err 对象。此
VBS教程：方法-CopyFile 方法
CopyFile 方法将一个或多个文件从某位置复制到另一位置。 object.CopyFile source, destination[, overwrite] 参数 object 必选
VBS教程：方法-Copy 方法
Copy 方法将指定的文件或文件夹从某位置复制到另一位置。 object.Copy destination[, overwrite] 参数 object 必选项。应为 File 或 F
VBS教程：方法-Close 方法
Close 方法关闭打开的 TextStream 文件。 object.Close object 应为 TextStream 对象的名称。说明下面例子举例说明如何使用 Close 方
VBS教程：方法-BuildPath 方法
BuildPath 方法向现有路径后添加名称。 object.BuildPath(path, name) 参数 object 必选项。应为 FileSystemObject 对象的名称
VBS教程：方法-GetFolder 方法
GetFolder 方法返回与指定的路径中某文件夹相应的 Folder 对象。 object.GetFolder(folderspec) 参数 object 必选项。应为 FileSy
VBS教程：方法-GetFileName 方法
GetFileName 方法返回指定路径（不是指定驱动器路径部分）的最后一个文件或文件夹。 object.GetFileName(pathspec) 参数 object 必选项。应为
VBS教程：方法-GetFile 方法
GetFile 方法返回与指定路径中某文件相应的 File 对象。 object.GetFile(filespec) 参数 object 必选项。应为 FileSystemObject
VBS教程：方法-GetExtensionName 方法
GetExtensionName 方法返回字符串，该字符串包含路径最后一个组成部分的扩展名。 object.GetExtensionName(path) 参数 object 必选项。应
VBS教程：方法-GetDriveName 方法
GetDriveName 方法返回包含指定路径中驱动器名的字符串。 object.GetDriveName(path) 参数 object 必选项。应为 FileSystemObjec
VBS教程：方法-GetDrive 方法
GetDrive 方法返回与指定的路径中驱动器相对应的 Drive 对象。 object.GetDrive drivespec 参数 object 必选项。应为 FileSystemO
VBS教程：方法-GetBaseName 方法
GetBaseName 方法返回字符串，其中包含文件的基本名 (不带扩展名), 或者提供的路径说明中的文件夹。 object.GetBaseName(path) 参数 object 必
VBS教程：方法-GetAbsolutePathName 方法
GetAbsolutePathName 方法从提供的指定路径中返回完整且含义明确的路径。 object.GetAbsolutePathName(pathspec) 参数 object
VBS教程：方法-FolderExists 方法
FolderExists 方法如果指定的文件夹存在，则返回 True；否则返回 False。 object.FolderExists(folderspec) 参数 object 必选项
VBS教程：方法-FileExists 方法
FileExists 方法如果指定的文件存在返回 True；否则返回 False。 object.FileExists(filespec) 参数 object 必选项。应为 FileS

首页

博学

6Ren·AI

商城

r - 使用 purrr 和 dplyr: 是 rlang::sym 最好的方法