R 手术需要多长时间?
我写了这段代码R 手术需要多长时间?,r,rfe,R,Rfe,我写了这段代码 library(caret) set.seed(100) options(warn=-1) subsets <- c(1:5, 10, 15, 18) ctrl <- rfeControl(functions = rfFuncs, method = "repeatedcv", repeats = 5, verbose = FALS
library(caret)
set.seed(100)
options(warn=-1)
subsets <- c(1:5, 10, 15, 18)
ctrl <- rfeControl(functions = rfFuncs,
method = "repeatedcv",
repeats = 5,
verbose = FALSE)
lmProfile <- rfe(x=train_clean[trainIndex,], y=train_clean_price$SalePrice[trainIndex],
sizes = subsets,
rfeControl = ctrl)
库(插入符号)
种子集(100)
选项(警告=-1)
子集首先,当涉及到计算R代码在何处或为何需要时间执行时,有一些指导原则。
阅读Rprof
,这是utils
包中的分析工具。这将准确地显示每个调用(函数)所花费的时间。
然后,您可以尝试使用包microbenchmark
但最后,也可能是最重要的一点,当您发现自己永远在等待完成时,请停止该过程,然后从输入数据的最小子集重新开始。例如,尝试设置迷你列车