Revision 1ebcd23b
Added by Benoit Parmentier over 8 years ago
| climate/research/oregon/interpolation/global_run_scalingup_mosaicing.R | ||
|---|---|---|
| 331 | 331 |
|
| 332 | 332 |
if(layers_option=="ac_training" | layers_option=="ac_testing"){
|
| 333 | 333 |
|
| 334 |
out_suffix_str <- paste(layers_option,"_",out_suffix,sep="") |
|
| 335 |
|
|
| 334 | 336 |
list_param_accuracy_metric_raster <- list(lf,df,metric_name,pred_mod_name,y_var_name,interpolation_method, |
| 335 | 337 |
days_to_process,num_cores_tmp,NA_flag_val,file_format,out_dir_str,out_suffix_str) |
| 336 | 338 |
names(list_param_accuracy_metric_raster) <- c("lf","tb","metric_name","pred_mod_name","y_var_name","interpolation_method",
|
| ... | ... | |
| 377 | 379 |
#days_to_process <- day_to_mosaic |
| 378 | 380 |
|
| 379 | 381 |
#out_suffix_str <- paste("data_day_v_",out_suffix,sep="")
|
| 380 |
out_suffix_str <- paste(layers_option,var_pred,out_suffix,sep="")
|
|
| 382 |
out_suffix_str <- paste(layers_option,"_",var_pred,"_",out_suffix,sep="")
|
|
| 381 | 383 |
#browser() |
| 382 | 384 |
df_tile_processed$path_NEX <- as.character(df_tile_processed$path_NEX) |
| 383 | 385 |
df_tile_processed$reg <- basename(dirname(df_tile_processed$path_NEX)) |
Also available in: Unified diff
debugging function to generate accuracy layers by tiles