我可以在单个mutate_at步骤中在同一列上连续使用多个函数吗,例如:(sqrt(log(x)))
library(dplyr)
head(mtcars) %>%
select(mpg, disp) %>%
mutate_at(vars(mpg,disp)
, funs(sqrt)) %>%
mutate_at(vars(mpg,disp)
, funs(log))
#> mpg disp
#> 1 1.522261 2.537587
#> 2 1.522261 2.537587
#> 3 1.563380 2.341066
#> 4 1.531695 2.776480
#> 5 1.464262 2.943052
#> 6 1.447956 2.708050
Run Code Online (Sandbox Code Playgroud)
我尝试时得到了这个
head(mtcars) %>%
select(mpg, disp) %>%
mutate_at(vars(mpg,disp)
, funs(sqrt,log))
#> mpg disp mpg_sqrt disp_sqrt mpg_log disp_log
#> 1 21.0 160 4.582576 12.64911 3.044522 5.075174
#> 2 21.0 160 4.582576 12.64911 3.044522 5.075174
#> 3 22.8 108 4.774935 10.39230 3.126761 …Run Code Online (Sandbox Code Playgroud)