mutate_if()多重条件

Question

mpg |>
  dplyr::mutate_if(is.character, as.factor) |>
  dplyr::mutate_if(is.logical, as.factor) |>
  dplyr::mutate_if(is.integer, as.numeric)

我有上面的密码。有没有一种更简单的方法来编写这段代码而不调用mutate_if三次呢？

Answer 1

如果你检查文档 of mutate_if，它已经被across()取代了。

因此，上面的代码可以写成：

library(dplyr)

mpg %>% 
  mutate(across(where(is.character) | where(is.logical), as.factor),
         across(where(is.integer), as.numeric))