'''
    2.3 - Setup

    Please run this script before doing anything else with this project.
'''
# Import rpy2
from rpy2 import robjects

# Create a method that allows users to execute R code on the fly
r = robjects.r

r('''
    if(!require("caret")) install.packages("caret", dependencies=c("Depends", "Suggests"))
    
    # Dependencies for script 6.0
    if(!require("tidyverse")) install.packages("tidyverse")
    if(!require("raster")) install.packages("raster")
    if(!require("shapefiles")) install.packages("shapefiles")
    if(!require("rgdal")) install.packages("rgdal")
    if(!require("rlang")) install.packages("rlang")
    if(!require("rgeos")) install.packages("rgeos")
    if(!require("sf")) install.packages("sf")
    if(!require("Rtools")) install.packages("Rtools")
    if(!require("devtools")) install.packages("devtools")
    
    
    # Extra caret dependencies
    if(!require("lazyeval")) install.packages("lazyeval")
    if(!require("ModelMetrics")) install.packages("ModelMetrics")
    if(!require("RcppRoll")) install.packages("RcppRoll")
    if(!require("backports")) install.packages("backports")
    if(!require("ddalpha")) install.packages("ddalpha")
    if(!require("DEoptimR")) install.packages("DEoptimR")
    if(!require("dimRed")) install.packages("dimRed")
    if(!require("gower")) install.packages("gower")
    if(!require("spmod")) install.packages("spmod")
    
    
    # Load these additional libraries depending on methods used
    if(!require("C50")) install.packages("C50")
    if(!require("class")) install.packages("class")
    if(!require("Cubist")) install.packages("Cubist")
    if(!require("deepnet")) install.packages("deepnet")
    if(!require("earth")) install.packages("earth")
    if(!require("elasticnet")) install.packages("elasticnet")
    if(!require("foba")) install.packages("foba")
    if(!require("kernlab")) install.packages("kernlab")
    if(!require("kknn")) install.packages("kknn")
    if(!require("klaR")) install.packages("klaR")
    if(!require("MASS")) install.packages("MASS")
    if(!require("mboost")) install.packages("mboost")
    if(!require("nnet")) install.packages("nnet")
    if(!require("party")) install.packages("party")
    if(!require("pls")) install.packages("pls")
    if(!require("plyr")) install.packages("plyr")
    if(!require("randomForest")) install.packages("randomForest")
    if(!require("rpart")) install.packages("rpart")
    if(!require("xgboost")) install.packages("xgboost")
     
''')