inst/scripts/output_all_country_summaries.r

In ecohealthalliance/gains-summary: Simple summaries of GAINS data.

library(rmarkdown)
load_all()
countries <- unique(all_gains$Country)
for (country in countries) {
  cat(paste0(country, "\n"))
  output_country_summary(country, quiet = TRUE, output_dir = "inst/out/")
}