Install packages from working versions

src-install-packages.r

install_dependencies <- function(){
  
  package_url_logger <- 'https://cran.rstudio.com/bin/macosx/el-capitan/contrib/3.6/logger_0.1.tgz'
  package_url_h2o <- 'https://cran.rstudio.com/bin/macosx/el-capitan/contrib/3.6/h2o_3.30.0.1.tgz'
  package_url_cluster <- 'https://cran.rstudio.com/bin/macosx/el-capitan/contrib/3.6/cluster_2.1.0.tgz'
  package_url_dplyr <- 'https://cran.rstudio.com/bin/macosx/el-capitan/contrib/3.6/dplyr_0.8.5.tgz'
  package_url_tidyverse <- 'https://cran.rstudio.com/bin/macosx/el-capitan/contrib/3.6/tidyverse_1.3.0.tgz'
  
  log_debug('logger CRAN URL: {package_url_logger}')
  log_debug('h2o CRAN URL: {package_url_h2o}')
  log_debug('cluster CRAN URL: {package_url_cluster}')
  log_debug('dplyr CRAN URL: {package_url_dplyr}')
  log_debug('tidyverse CRAN URL: {package_url_tidyverse}')
  
  packages_urls <- c(
    package_url_logger,
    package_url_dplyr,
    package_url_cluster,
    package_url_tidyverse,
    package_url_h2o
  )
  
  for(url in packages_urls)
  {for(package_url in url)
    log_info('Installing {} package')
    {install.packages(package_url, repos=NULL, type='source')}
    log_info('Package {package_url} installation finished')
  }
}

log_info('Start installing dependencies')
install_dependencies()
log_info('Dependencies installed')

packageVersion_logger <- packageVersion('logger')[1]
packageVersion_h2o <- packageVersion('h2o')[1]
packageVersion_cluster <- packageVersion('cluster')[1]
packageVersion_dplyr <- packageVersion('dplyr')[1]
packageVersion_tidyverse <- packageVersion('tidyverse')[1]

log_debug('logger Version: {packageVersion_logger}')
log_debug('h2o Version: {packageVersion_h2o}')
log_debug('cluster Version: {packageVersion_cluster}')
log_debug('dplyr Version: {packageVersion_dplyr}')
log_debug('tidyverse Version: {packageVersion_tidyverse}')


log_info('Loading packages')
packages <- c(
  "logger",
  "h2o",
  "cluster",
  "dplyr",
  "tidyverse")
invisible(lapply(packages, library, character.only = TRUE))
log_info('Packages loaded')


session_info_base_packages <- sessionInfo()$basePkgs
log_info('Session Info Base Packages: {session_info_base_packages}')

session_info_loaded_packages <- sessionInfo()$loadedOnly
log_debug('Session Info Loaded Packages: {session_info_loaded_packages}')