#STAGE 8: Comparison of predictions across regions and years with figures generation.

#AUTHOR: Benoit Parmentier                                                                        

#CREATED ON: 12/29/2015  

#PROJECT: NCEAS-IPLANT-NASA: Environment Layers                                                                           

#First source these files:

#out_dir <-paste(out_dir,"_",out_prefix,sep="")

create_out_dir_param <- TRUE #param 9, arg 6

out_prefix <- args[4] #param 7, arg 4

out_dir <- args[5] #param 8, arg 5

out_dir <- "/data/project/layers/commons/NEX_data/reg5_assessment"

list_year_predicted <- args[7] # param 10, arg 7, min and max year

#run_figure_by_year <- TRUE # param 10, arg 7

file_format <- ".tif" #format for mosaiced files # param 11

NA_flag_val <- -9999  #No data value, # param 12

max_mem <- args[9] #param 21

max_mem <- 1e+07

#in_dir_list_filename <- args[10] #param 22

#in_dir_list_filename <- "/data/project/layers/commons/NEX_data/reg4_assessment/stage6_reg4_in_dir_list_02072016.txt"

run_figure_by_year <- args[11] # param 10, arg 7, if true will create figures for individual years...

run_figure_by_year <- TRUE # param 10, arg 7, if true will create figures for individual years...