# share-initialize.R gc() rm(list=ls()) options(datatable.print.nrows=10000) options(scipen = 999) options(digits = 3) # options(error = stop()) # options(warn = 2) closeAllConnections() setwd('C:/SHARE/R') source('share-libraries.R') source('share-functions.R') source('share-functions-stat.R') source('share-function-country.R') memory.limit(size=20000)