如何批量地将数据集中的分类变量设置成因子变量

Question

1.数据框中多个变量是分类变量，但值是1,2,3，读进去的时候是整数格式。手动一个一个设置太浪费时间，有没有好的办法批量设置？
2.尝试了自写函数

fac<-function(x){
  x<-as.factor(x)
}
with(fat, apply(fat[,64:233],2,fac))

结果不行, 设置未成功。有人可以解答吗，万分感谢。

Answer 1

for (i in colnames(data)){
  data[,i]<-as.factor(data[,i])
  }