Project

General

Profile

« Previous | Next » 

Revision 8d7c9e6a

Added by Benoit Parmentier over 8 years ago

generating accuracy mosaics with different options for two days in 1999

View differences:

climate/research/oregon/interpolation/master_script_stage_7.R
14 14

  
15 15
#AUTHOR: Benoit Parmentier                                                                        
16 16
#CREATED ON: 01/01/2016  
17
#MODIFIED ON: 06/09/2016  
17
#MODIFIED ON: 06/12/2016  
18 18
#PROJECT: NCEAS INPLANT: Environment and Organisms                                                                           
19 19

  
20 20
#First source these files:
......
65 65

  
66 66
#script_path <- "/home/parmentier/Data/IPLANT_project/env_layers_scripts"
67 67
script_path <- "/nobackupp8/bparmen1/env_layers_scripts" #path to script
68
function_mosaicing_functions <- "global_run_scalingup_mosaicing_function_06112016.R" #PARAM12
69
function_mosaicing <-"global_run_scalingup_mosaicing_06112016d.R"
68
function_mosaicing_functions <- "global_run_scalingup_mosaicing_function_06122016.R" #PARAM12
69
function_mosaicing <-"global_run_scalingup_mosaicing_06122016.R"
70 70
source(file.path(script_path,function_mosaicing)) #source all functions used in this script 
71 71
source(file.path(script_path,function_mosaicing_functions)) #source all functions used in this script 
72 72

  
......
107 107
num_cores <- 6 #PARAM 8, arg 8         
108 108
max_mem = 1e+07 #param 9, arg 9
109 109
mosaicing_method <- "use_edge_weights" #PARAM10, arg 10
110
metric_name <- "rmse" # "mae", "r" for MAE, R etc.; can also be ns or nv? #PARAM 11, arg 11
111
#metric_name <- "n"
110
#metric_name <- "rmse" # "mae", "r" for MAE, R etc.; can also be ns or nv? #PARAM 11, arg 11
111
metric_name <- "n"
112 112
#metric_name <- "mae"
113 113

  
114 114
#day_start <- "19990701" #PARAM 12 arg 12
......
120 120
algorithm <- "python" #PARAM 16 #if R use mosaic function for R, if python use modified gdalmerge script from Alberto Guzmann
121 121
#layers_option <- c("var_pred") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
122 122
layers_option <- c("ac_training") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
123
# #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
124
#layers_option <- c("res_training") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
123
#layers_option <- c("res_training") # #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
124
#layers_option <- c("res_testing") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
125 125
#layers_option <- c("ac_testing") #arg 17 ,param 17, options are:#res_training, res_testing,ac_training, ac_testing, var_pred
126 126

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

Also available in: Unified diff