dplyr替换多个变量中的值

Question

我需要用80英寸的气缸，齿轮和碳水化合物色谱柱替换非4色谱柱。我尝试了以下操作，但是不起作用。

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)))