Skip to content
Snippets Groups Projects
Commit 11898687 authored by Azadpour, Elmera's avatar Azadpour, Elmera
Browse files

update fetch steps

parent 757de7bb
No related branches found
No related tags found
1 merge request!90Add raster maps
Hide whitespace changes
Inline Side-by-side
Showing
with 18 additions and 19 deletions
1_fetch.R
+ 18
− 19
View file @ 11898687
...@@ -2,19 +2,21 @@ source("1_fetch/src/fetch_utils.R") ...@@ -2,19 +2,21 @@ source("1_fetch/src/fetch_utils.R")
p1_targets <- list( p1_targets <- list(
##### Vulnerability indicators data ##### ##### Vulnerability indicators data #####
tar_target(p1_out_data,
"1_fetch/out/"),
tar_target(p1_sb_id, tar_target(p1_sb_id,
'63f79d49d34e4f7eda456572'), '63f79d49d34e4f7eda456572'),
##### Vulnerability indicators metadata ##### ##### Vulnerability indicators metadata #####
tar_target(p1_vul_ind_xml, tar_target(p1_vul_ind_xml,
download_from_sb(sb_id = p1_sb_id, sb_initialize_and_download(sb_id = p1_sb_id,
filename = 'Uncertainty_Summary.xml', names = 'Uncertainty_Summary.xml',
dest_dir = '1_fetch/out'), destinations = paste0(p1_out_data, "Uncertainty_Summary.xml")),
format = 'file'), format = 'file'),
##### Uncertainty statistics for the indicators ##### ##### Uncertainty statistics for the indicators #####
tar_target(p1_unc_stats_csv, tar_target(p1_unc_stats_csv,
download_from_sb(sb_id = p1_sb_id, sb_initialize_and_download(sb_id = p1_sb_id,
filename = 'Uncertainty_Summary.csv', names = 'Uncertainty_Summary.csv',
dest_dir = '1_fetch/out'), destinations = paste0(p1_out_data, "Uncertainty_Summary.csv")),
format = 'file'), format = 'file'),
tar_target(p1_unc_stats, tar_target(p1_unc_stats,
readr::read_csv(p1_unc_stats_csv) |> readr::read_csv(p1_unc_stats_csv) |>
...@@ -40,23 +42,20 @@ p1_targets <- list( ...@@ -40,23 +42,20 @@ p1_targets <- list(
filter(group %in% c('CONUS')) |> filter(group %in% c('CONUS')) |>
rmapshaper::ms_simplify(keep = 0.2) |> rmapshaper::ms_simplify(keep = 0.2) |>
filter(NAME %in% p1_census_states)), filter(NAME %in% p1_census_states)),
tar_target(p1_out_data,
"1_fetch/out"),
# raster data for population density # raster data for population density
tar_target(p1_pop_density_raster, tar_target(p1_pop_density_raster_zip,
'1_fetch/in/gpw-v4-population-count-rev11_2020_30_sec_tif/gpw_v4_population_count_rev11_2020_30_sec.tif'), '1_fetch/in/gpw-v4-population-count-rev11_2020_30_sec_tif.zip'),
tar_target(p1_pop_density_raster_tif,
unzip(p1_pop_density_raster_zip, 'gpw_v4_population_count_rev11_2020_30_sec.tif',
exdir = p1_out_data)),
# raster data for impervious surfaces # raster data for impervious surfaces
tar_target(p1_imp_surf_rast,
download_from_sb(sb_id = "664e0da6d34e702fe8744579",
filename = 'Annual_NLCD_FctImp_2022_CU_C1V0.zip',
dest_dir = p1_out_data),
format = 'file'),
tar_target(p1_imp_surf_zip, tar_target(p1_imp_surf_zip,
'1_fetch/out/Annual_NLCD_FctImp_2022_CU_C1V0.zip'), sb_initialize_and_download(sb_id = "664e0da6d34e702fe8744579",
names = 'Annual_NLCD_FctImp_2022_CU_C1V0.zip',
destinations = paste0(p1_out_data, "Annual_NLCD_FctImp_2022_CU_C1V0.zip")),
format = 'file'),
tar_target(p1_imp_surf_tif, tar_target(p1_imp_surf_tif,
unzip(p1_imp_surf_zip, 'Annual_NLCD_FctImp_2022_CU_C1V0.tif', unzip(p1_imp_surf_zip, 'Annual_NLCD_FctImp_2022_CU_C1V0.tif',
exdir = p1_out_data)), exdir = p1_out_data))
tar_target(p1_imp_surf_tif,
"1_fetch/out/Annual_NLCD_FctImp_2022_CU_C1V0/Annual_NLCD_FctImp_2022_CU_C1V0.tif")
) )
\ No newline at end of file
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment