Project

General

Profile

« Previous | Next » 

Revision 1aee0d70

Added by Benoit Parmentier almost 9 years ago

assessment part1a debugging of missing parameter

View differences:

climate/research/oregon/interpolation/global_run_scalingup_assessment_part1a.R
112 112 
  #function looped over i, correspoding to year predicted
113 113
114 114 
  year_predicted <- list_param_run_assessment_prediction$list_year_predicted[i]
115 
  #region_name is not null then restrict the assessment to a specific region
116 
  if(!is.null(region_name)){
117 
    in_dir1 <- file.path(in_dir1,region_name)
118 
  }
119 

  		




  
  120
  
    
  


  		




  115
  121
  
    
  list_outfiles <- vector("list", length=6) #collect names of output files


  		




  116
  122
  
    
  


  		




  117
  123
  
    
  in_dir_list <- list.dirs(path=in_dir1,recursive=FALSE) #get the list regions processed for this run


  		




  118
  124
  
    
  #basename(in_dir_list)


  		




  119
  
  
    
#                       y=in_dir_list) 


  		




  
  125
  
    
  #                       y=in_dir_list) 


  		




  120
  126
  
    
  


  		




  121
  127
  
    
  in_dir_list_all  <- unlist(lapply(in_dir_list,function(x){list.dirs(path=x,recursive=F)}))


  		




  122
  128
  
    
  in_dir_list <- in_dir_list_all


  		












Also available in:  Unified diff