Revision 3a8a8e72
Added by Benoit Parmentier over 11 years ago
| climate/research/oregon/interpolation/covariates_production_temperatures.R | ||
|---|---|---|
| 283 | 283 |
pat_str1 <- glob2rx(paste("mean","*",lst_pat,"*",out_suffix_modis,"*.tif",sep=""))
|
| 284 | 284 |
tmp_str1 <- mixedsort(list.files(path=hdfdir_lst_avg,pattern=pat_str1,full.names=TRUE)) |
| 285 | 285 |
#add lines using grep to select tiles... |
| 286 |
|
|
| 286 |
keywords <- list_tiles_modis |
|
| 287 |
#screen for relevant tiles... |
|
| 288 |
tmp_str2 <-unlist(lapply(keywords,grep,tmp_str2,value=TRUE)) |
|
| 289 |
tmp_str1 <-unlist(lapply(keywords,grep,tmp_str1,value=TRUE)) |
|
| 290 |
|
|
| 287 | 291 |
#Format list for mosaicing: mosaic for every month the relevant number of files |
| 288 | 292 |
out_rastnames<-paste("_",lst_pat,"_","nobs",out_suffix,sep="")
|
| 289 | 293 |
list_date_names<-c("jan","feb","mar","apr","may","jun","jul","aug","sep","oct","nov","dec")
|
Also available in: Unified diff
slight modifications, solving issues for covariate brick production