covtype rf 50 trees, use as.factor(X) for formula