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

如果您查看mutate_if的文檔，它已被 cross across()取代。

所以上面的代碼可以寫成：

library(dplyr)

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