#DATE: 03/27/2013                                                                                 

#PROJECT: NCEAS INPLANT: Environment and Organisms --TASK#568--     

#

# TO DO:

# 1) modidy to make it general for any method i.e. make call to method e.g. gam_fus, gam_cai etc.

# 2) simplify and bundle validation steps, make it general--method_mod_validation

# 3) solve issues with log file recordings

# 4) output location folder on the fly???

  #9 parameters used in the data preparation stage and input in the current script

  #1)list_param_data_prep: used in earlier code for the query from the database and extraction for raster brick

  #2)infile_monthly:

  #3)infile_daily

  #4)infile_locs:

  #5)infile_covariates: raster covariate brick, tif file

  #6)covar_names: covar_names #remove at a later stage...

  #7)var: variable being interpolated-TMIN or TMAX

  #8)out_prefix

  #9)CRS_locs_WGS84

  #

  #6 parameters for sampling function

  #10)seed_number

  #11)nb_sample

  #12)step

  #13)constant

  #14)prop_minmax

  #15)dates_selected

  #

  #6 additional parameters for monthly climatology and more

  #16)list_models: model formulas in character vector

  #17)lst_avg: LST climatology name in the brick of covariate--change later

  #18)n_path

  #19)out_path

  #20)script_path: path to script

  #21)interpolation_method: c("gam_fusion","gam_CAI") #other otpions to be added later

  library(gdata) #Nesssary to use cbindX

  #Sourcing in the master script to avoid confusion on the latest versions of scripts and functions!!!

  #source(file.path(script_path,"sampling_script_functions_03122013.R"))

  #source(file.path(script_path,"GAM_fusion_function_multisampling_03122013.R"))

  #source(file.path(script_path,"GAM_fusion_function_multisampling_validation_metrics_03182013.R"))

  #MAKE IT GENERAL: for any method

  #SIMPLIFY THIS PART: one call