Generate all country factsheet
Arguments
- year
Numeric value of the year (for instance 2020)
- region
Bureau that covers all the countrie factsheet to generate
- lag
Number of year to used as comparison base
- folder
folder within your project where to put the generated report. Folder will be created if it does not exist
Examples
# template_RegPrez(year = 2022, region = "Americas", lag = 10, folder = "Report")
# # Generate for a specific region
# region <- "Americas"
# year <- 2022
# library(tidyverse)
# ## get all countries with more than 1000 Reported individuals
# ctr <- dplyr::left_join( x= ForcedDisplacementStat::end_year_population_totals_long,
# y= ForcedDisplacementStat::reference,
# by = c("CountryAsylumCode" = "iso_3")) |>
# filter(Year == year &
# UNHCRBureau == region ) |>
# group_by( CountryAsylumName, CountryAsylumCode ) |>
# summarise(Value = sum(Value) ) |>
# ungroup() |>
# filter( Value > 1000 )
#
# for ( i in (1:nrow(ctr))) {
# # i <- 1
# country_asylum_iso3c = as.character(ctr[i ,2 ])
# cat(paste0(country_asylum_iso3c, "\n"))
# unhcrdatapackage::template_CtryPrez(year = 2022,
# country_asylum_iso3c = country_asylum_iso3c,
# folder = "Report")
# }