dplyr 替换多个变量中的值

Question

我需要在 cyl、gear、carb 列中将 non-4 替换为 80。我尝试了以下方法，但它不起作用。

mtcars %>% mutate_at(vars(cyl, gear, carb), replace(which(.!=4), 80))

它会抛出以下错误：

Error in replace(which(. != 4), 80) : 
  argument "values" is missing, with no default

我在这里错过了什么？

Answer 1

您需要将函数或公式作为第二个参数传递给mutate_at：

mtcars %>% mutate_at(vars(cyl, gear, carb), ~ replace(., which(.!=4), 80))

或者使用funs创建函数：

mtcars %>% mutate_at(vars(cyl, gear, carb), funs(replace(., which(.!=4), 80)))