R条件循环

Question

我想自动转换我的变量以达到决策树的目的（因子的32个级别似乎是极限）。我尝试了以下循环：

for(i in 1:39) {
if length(unique(dane.df[,1]))<32 {
as.factor(dane.df[,1])
}  else  length(unique(dane.df[,1]))>32 
{as.numeric(dane.df[,1])} 
}

因为数据框中有39个变量名为dane.df 我已经使用R两个星期，所以我是一个新手。如果你能指出错误，我真的很感激（R说括号有些麻烦，虽然在第一行宣布但我找不到）

Answer 1

尝试类似：

dane.df <- data.frame(lapply(dane.df,
  function(x) (if (length(unique(x)) > 32) as.numeric else factor)(x)))