dplyr::recode() 在选定的变量上答案

【问题标题】：dplyr::recode() over selected variablesdplyr::recode() 在选定的变量上
【发布时间】：2021-03-25 13:58:07
【问题描述】：

我有一个数据集，其中的列在几个月内与同一种药物相关联，在它的 colnames 中只需更改月份编号，例如。 med1_m1、med1_m2 等等。我需要为所有飞蛾创建这种药物的指示变量，所以我使用正则表达式选择了这些列。在这个选定的列上，我想使用recode() 函数来创建指标。我所拥有的是这样的：

df <- as.data.frame(matrix(c(1,1,2,1,2,1,1,2),ncol=2))

colnames(df) <- c("med1_m1", "med1_m2")

df %>% select(matches("^med1_m\\d{1,}"))

然后，我想添加如下内容：

df %>% select(matches("^med1_m\\d{1,}")) %>% recode("1" = 1, "2" = 0, .default = NULL)

但我收到以下错误：

UseMethod("recode") 中的错误：没有适用于“recode”的方法应用于“data.frame”类的对象

有人知道如何重新编码这些选定的变量吗？我需要使用正则表达式来选择它们，因为每种药物都有很多飞蛾。

谢谢！

【问题讨论】：

标签： r regex select dplyr recode

【解决方案1】：

您正在将数据帧传递给导致错误的重新编码函数。我认为您可以将mutate() 与across() 一起使用：

df %>% mutate(across(matches("^med1_m\d{1,}"), ~recode(.x, "1" = 1, "2" = 0, .default = NULL)))

【讨论】：

感谢您的回答！它适用于玩具示例，但在实际数据中我得到另一个错误：错误：mutate() 输入问题..1。 x 没有适用于“重新编码”的方法应用于“逻辑”类的对象 i 输入 ..1 是 across(...)。
看起来您的正则表达式正在获取一个逻辑列。确认您只匹配您感兴趣的列和/或强制逻辑 to 字符。