我需要用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
我在这里缺少什么?
答案 0 :(得分:5)
您需要将函数或公式作为第二个参数传递给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)))