This package is no longer maintained by anyone.
An R package to make training hundreds of machine learning models with a few lines of code.
It is basically a wrapper on top of the caret package.
Before installing, please update your R version and Rstudio version.
To use it, please manually install e1071 package first,
install.packages("e1071")
Also install the devtools package to install automl from github
install.packages("devtools")
Then, install the latest version of the automl packages in Github:
devtools::install_github("edwardcooper/automl")
It takes a while to install all the necessary packages, so go grab a cup of tea or coffee.
This package is still in the early stage of development and currently only support classification problems. But I will add support for regression soon.
If an error occurred when installing, the most likely reason is an old version of R and/or Rstudio. Update R and Rstudio by re-installing them.
The main function is ml_list. Below is an example of how to use it.
# construct the parameter space
params_grid = expand.grid(sampling = c("up","down","rose","smote","ADAS")
,metric = c("ROC","Accuracy")
,preProcess = list(c("zv","nzv","center","scale"),c("center","scale"))
,method = c("rf","LogitBoost")
,search = "random"
,tuneLength = 10
,k = 3,nthread = 3)
# install missing package dependencies.
install_pkg_model_names(params_grid$method)
iris_list = ml_list(data = iris,target = "Species"
,params = params_grid, summaryFunction = multiClassSummary
,save_model ="iris_models")
By assigning save_model option a character value "iris_model", each model is saved to a folder called iris_model.
side notes:
-
The sampling methods in this package contain more than up, down, rose, smote as supported by the caret. The current version also supports ADAS, ANS, BLSMOTE, DBSMOTE, RSLS, SLS. For details on these sampling methods, please see the https://CRAN.R-project.org/package=smotefamily on CRAN.
-
The dataset iris is a multi-class classification problem.
-
Some errors are intentional to showcase how the packages do the error handling.
-
For more detailed information on ml_list and ml_tune. Use
?ml_list
and?ml_tune
in the R console.
This package also has some tools to help with model selection. We separate the model selection functions into two parts. The first part is to select models based on cross-validation results. The second part is to select models based on the development(validation) dataset.
After training the models for a long time, we will need to load all models into the R console.
iris_list = model_list_load(path="./iris_models")
Before we proceed to select the models, we should first visualize the model performance.
ml_bwplot(iris_list)
Then you would notice that there is no meaningful information about what each model is. We should use the assign_model_names
function in the automl packages to give models names based on its names, method, metric, preProcess and sampling methods.
iris_list = assign_model_names(iris_list)
Try visualizing the models again.
ml_bwplot(iris_list)
Then, we want to choose models with a median Kappa value in cross-validation bigger than 0.85 and visualize the end results.
library(magrittr)
iris_list = iris_list %>% ml_cv_filter(metric = "Kappa",min = 0.85,FUN = median) %>% ml_bwplot()
This function also prints out whether each model satisfies the condition or not.
Then, we want to choose models with a minimum of Accuracy in cross-validation bigger than 0.87 and visualize the end results.
iris_list = iris_list %>% ml_cv_filter(metric = "Accuracy",min = 0.87,FUN = min) %>% ml_bwplot()
Last but not the least, we want to select models with a small correlation between models. Let us assume that we want all out models to have correlation no bigger than 0.75.
This could be easily done using the ml_cor_filter
function in the automl package.
iris_list = iris_list %>% ml_cor_filter(cor_level=0.75)
To summarize all the operations above into a line. Always assign model names after loading the models into R console.
iris_list = model_list_load(path="./iris_models") %>% assign_model_names %>% ml_bwplot %>%
ml_cv_filter(metric = "Kappa",min=0.85,FUN=median) %>% ml_bwplot %>%
ml_cv_filter(metric = "Accuracy",min=0.85,FUN=min)%>%ml_bwplot() %>% ml_cor_filter(cor_level = 0.75)
More details are in the file README_with_results.md.
This is part of sessionInfo.
R version 3.4.4 (2018-03-15) Platform: x86_64-pc-linux-gnu (64-bit) Running under: Ubuntu 16.04.4 LTS
Matrix products: default BLAS: /usr/lib/libblas/libblas.so.3.6.0 LAPACK: /usr/lib/lapack/liblapack.so.3.6.0