# \donttest{
### These examples require an activated Python environment as described in
### Bartz-Beielstein, T., Rehbach, F., Sen, A., and Zaefferer, M.:
### Surrogate Model Based Hyperparameter Tuning for Deep Learning with SPOT,
### June 2021. http://arxiv.org/abs/2105.14625.
PYTHON_RETICULATE <- FALSE
if(PYTHON_RETICULATE){
## The following code was used to evaluate the results in the book
## "Hyperparameter Tuning for Machine and Deep Learning with R - A Practical Guide"
## by Bartz, Bartz-Beielstein, Zaefferer, Mersmann:
##
modelList <- list("dl", "cvglmnet", "kknn", "ranger", "rpart" , "svm", "xgboost")
runNr <- list("100", "Default")
directory <- "../book/data"
for (model in modelList){
for (run in runNr){ score <- evalParamCensus(model = model,
runNr = run,
directory = directory,
prop=2/3,
k=30)
fileName <- paste0(directory, "/", model, run, "Evaluation.RData")
save(score, file = fileName)
}}
}# }
Run the code above in your browser using DataLab