#STAGE 6: Assessement of predictions by tiles and regions with mosaicing of predictions and accuracy

#AUTHOR: Benoit Parmentier                                                                        

#CREATED ON: 12/29/2015  

#PROJECT: NCEAS INPLANT: Environment and Organisms                                                                           

## TODO:

#CALLED FROM MASTER SCRIPT:

var<-"TMAX" # variable being interpolated

#interpolation_method<-c("gam_fusion") #other otpions to be added later

#/nobackupp6/aguzman4/climateLayers/out_15x45/1982

#region_names <- c("reg23","reg4") #selected region names, #PARAM2

#region_names <- c("reg1","reg2","reg3","reg4","reg5","reg6") #selected region names, #PARAM2

interpolation_method <- c("gam_CAI") #PARAM4

out_prefix <- "run_global_analyses_pred_12282015" #PARAM5

NA_flag_val <- -9999  #No data value, #PARAM11

num_cores <- 6 #number of cores used #PARAM13

                                          out_dir,create_out_dir_param,CRS_locs_WGS84,

                                             list_year_predicted,file_format,NA_flag_val,num_cores)

                                      "out_dir","create_out_dir_param","CRS_locs_WGS84",

                                      "list_year_predicted","file_format","NA_flag_val","num_cores")

max_mem<-args[11]

#rasterOptions(maxmemory=1e+07,timer=TRUE)

#debug(debug_fun_test)

#debug_fun_test(list_param_raster_prediction)

i <- 1 #this select the first year of list_year_predicted

if (stages_to_run[6]==6){

}

###############   END OF SCRIPT   ###################