如何在R插入符号中使rfe运行得更快

Question

我有102个虚拟变量和50000个数据实例的数据。来自插入包的rfe函数花费了太多时间来运行特征选择。

#define the control using a random forest selection function
control <- rfeControl(functions=rfFuncs, method="cv", number=5)
# run the RFE algorithm
results <- rfe(Set[,c(1:9,11:13)], Set[,10], sizes=c(1:9,11:13), 
  rfeControl=control)
# summarize the results
 print(results)
# list the chosen features
 predictors(results)
# plot the results
 plot(results, type=c("g", "o"))

我等了差不多2-3天但没完成所以不得不打断它。有没有办法让它更快？ 提前致谢