Project

General

Profile

« Previous | Next » 

Revision 159ad9bb

Added by Benoit Parmentier about 9 years ago

checking mosaicing script for South America 1992 predictions

View differences:

climate/research/oregon/interpolation/global_run_scalingup_mosaicing.R
5 5
#Analyses, figures, tables and data are also produced in the script.
6 6
#AUTHOR: Benoit Parmentier 
7 7
#CREATED ON: 04/14/2015  
8
#MODIFIED ON: 07/22/2015            
8
#MODIFIED ON: 10/25/2015            
9 9
#Version: 5
10 10
#PROJECT: Environmental Layers project     
11 11
#COMMENTS: analyses run for reg5 for test of mosaicing using 1500x4500km and other tiles
......
46 46

  
47 47
#### FUNCTION USED IN SCRIPT
48 48

  
49
function_mosaicing <-"global_run_scalingup_mosaicing_function_07012015.R"
49
function_mosaicing <-"global_run_scalingup_mosaicing_function_10052015.R"
50 50

  
51 51
in_dir_script <-"/home/parmentier/Data/IPLANT_project/env_layers_scripts"
52 52
source(file.path(in_dir_script,function_mosaicing))
......
64 64

  
65 65
y_var_name <- "dailyTmax" #PARAM2
66 66
interpolation_method <- c("gam_CAI") #PARAM3
67
region_name <- "reg23" #PARAM 4 #reg4 South America, Africa reg5,Europe reg2, North America reg1, Asia reg3
67
region_name <- "reg5" #PARAM 4 #reg4 South America, Africa reg5,Europe reg2, North America reg1, Asia reg3
68 68
mosaicing_method <- c("unweighted","use_edge_weights") #PARAM5
69
out_suffix <- paste(region_name,"_","mosaic_run10_1500x4500_global_analyses_06292015",sep="") #PARAM 6
69
out_suffix <- paste(region_name,"_","mosaic_run10_1500x4500_global_analyses_10152015",sep="") #PARAM 6
70 70
#PARAM3
71 71
out_dir <- in_dir #PARAM 7
72 72
create_out_dir_param <- TRUE #PARAM 8
......
126 126
                                        file_format=file_format,out_suffix=out_suffix_str,
127 127
                                        out_dir=out_dir)
128 128

  
129
  mosaic_unweighted_obj <- mosaicFiles(lf_mosaic1,mosaic_method="unweighted",
130
                                        num_cores=num_cores,
131
                                        python_bin=NULL,
132
                                        df_points=NULL,NA_flag=NA_flag_val,
133
                                        file_format=file_format,out_suffix=out_suffix_str,
134
                                        out_dir=out_dir)
129
  #mosaic_unweighted_obj <- mosaicFiles(lf_mosaic1,mosaic_method="unweighted",
130
  #                                      num_cores=num_cores,
131
  #                                      python_bin=NULL,
132
  #                                      df_points=NULL,NA_flag=NA_flag_val,
133
  #                                      file_format=file_format,out_suffix=out_suffix_str,
134
  #                                      out_dir=out_dir)
135 135

  
136
  #list_mosaic_obj[[i]] <- list(unweighted=mosaic_unweighted_obj,edge=mosaic_edge_obj)
136 137
  list_mosaic_obj[[i]] <- list(unweighted=mosaic_unweighted_obj,edge=mosaic_edge_obj)
137 138
}
138 139

  

Also available in: Unified diff