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

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

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

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

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

在输入数据时，数据中有两个变量：年级1和年级2，两个变量的取值都是0和1，在做回归分析时将这两个变量选入自变量中就可以了。（这些在logistic回归中其实就一步完成了，但是在线性回归中就按照上面说的，比较麻烦。）不知道我是否说明白了

你好，这个问题你解决了吗