The purpose of this function is to enrich the JHU dataset with additional country-level metadata and then get the data into a form that can be easily written to excel or used as a "wide-format" tabular dataset.

enriched_jhu_data(cols_to_remove = .cols_to_remove, warn = FALSE)

Arguments

cols_to_remove

a character vector of column names from country_metadata() to remove.

warn

logical(1) defaults to FALSE, sent to countrycode::countrycode to determine whether failed matches should be reported.

Value

A list of three data.frames named deaths, confirmed, and recovered.

Examples

res = enriched_jhu_data()
#> Error in curl::curl_fetch_memory(url, handle = handle): Timeout was reached: [restcountries.eu] Failed to connect to restcountries.eu port 443: Connection timed out
colnames(res)
#> Error in is.data.frame(x): object 'res' not found
library(dplyr)
head(res)
#> Error in head(res): object 'res' not found
dplyr::glimpse(res)
#> Error in dplyr::glimpse(res): object 'res' not found