用户定义的函数将变量类型更改为因子

Question

这是一个类，所以我意识到有更简单的方法来完成任务，但我需要它以用户定义的函数的形式。

我创建了以下代码，将所需的变量转换为因子。

转换因子

columns <- c("sex", "medicationUse", "event", "supplementUse")
raw[columns] <- lapply(raw[columns], factor)

但是，我无法想出一个用户定义的函数来完成此操作，返回更新的数据集... 如果有人能给我一些提示，我将不胜感激。我遇到了一个主要障碍。

Answer 1

这有什么理由不适合你吗？

my_fun <- function(data,columns){
   data[columns] <- lapply(data[columns], factor)
   data
}