#AUTHOR: Benoit Parmentier                                                                        

#CREATED ON: 01/01/2016  

#PROJECT: NCEAS INPLANT: Environment and Organisms                                                                           

#First source these files:

script_path <- "/nobackupp8/bparmen1/env_layers_scripts" #path to script

function_mosaicing_functions <- "global_run_scalingup_mosaicing_function_08222016.R"

#function_mosaicing_functions <- "global_run_scalingup_mosaicing_function_07052016.R" #PARAM12

source(file.path(script_path,function_mosaicing)) #source all functions used in this script 

source(file.path(script_path,function_mosaicing_functions)) #source all functions used in this script 

num_cores <- 6 #PARAM 8, arg 8

max_mem = 1e+07 #param 9, arg 9

mosaicing_method <- "use_edge_weights" #PARAM10, arg 10

#metric_name <- "mae"

#day_start <- "19990701" #PARAM 12 arg 12

#df_assessment_files_name <- "/nobackupp6/aguzman4/climateLayers/out/reg5/assessment/output_reg5_1991/df_assessment_files_reg5_1991_reg5_1991.txt"  # data.frame with all files used in assessmnet, PARAM 15

#df_assessment_files_name <- "/nobackupp6/aguzman4/climateLayers/out/reg5/assessment/output_reg5_1985/df_assessment_files_reg5_1985_reg5_1985.txt"

algorithm <- "python" #PARAM 16 #if R use mosaic function for R, if python use modified gdalmerge script from Alberto Guzmann

#layers_option <- c("ac_training") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred

#layers_option <- c("res_training") # #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred

#layers_option <- c("res_testing") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred

tmp_files <- FALSE #arg 18, param 18, keep temp files if TRUE

data_type <- "Int16" #, param 19, use int32 for output layers mosaiced

scaling <- 100 #, param 20, if null use 1

NA_flag_val <- -32768 #should be here