diff --git a/R/download_worldclim_future.R b/R/download_worldclim_future.R index 90d6ade2..6195c354 100644 --- a/R/download_worldclim_future.R +++ b/R/download_worldclim_future.R @@ -81,6 +81,7 @@ download_worldclim_future <- function(dataset, bio_var, filename){ sds_list[[new_var_name]]<-terra::rast(lapply(wc_list, terra::subset,subset=i_var)) names(sds_list[[new_var_name]])<-rep(new_var_name,nlyr((sds_list[[new_var_name]]))) } + browser() wc_sds <- terra::sds(sds_list) terra::writeCDF(wc_sds,filename=filename, compression=9, diff --git a/data-raw/helper_functions/verify_files_by_dataset.R b/data-raw/helper_functions/verify_files_by_dataset.R index 5bd89e02..c63b3148 100644 --- a/data-raw/helper_functions/verify_files_by_dataset.R +++ b/data-raw/helper_functions/verify_files_by_dataset.R @@ -23,3 +23,8 @@ if (any(problem_rows)){ } else { cat("all files are fine") } + + +### There is a problem with how we are renaming variables when downloading future worldclim +# monthly variables (it's not working) +# check line 78