选定变量上的dplyr::recode()

Question

我有一个数据集，其中的列与同一药物在几个月内相关联，在它的列名称中只需更改月份编号，例如。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")中出错:没有适用于"data.frame“类的对象的”recode“方法。

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

谢谢!

Answer 1

您正在将一个数据帧传递给recode函数，该函数会导致错误。我认为你可以在across()中使用mutate()

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