get_germany_regional_cases: Get German daily cases by Bundeslander or Landkreis

In epiforecasts/NCoVUtils: Data Extraction Tools for the Covid-19 Outbreak

Description

Fetches COVID case counts by region in Germany. This data is sourced from the Robert Koch Institute: https://npgeo-corona-npgeo-de.hub.arcgis.com/datasets/dd4580c810204019a7b8eb3e0b329dd6_0

Usage

get_germany_regional_cases(geography = "states")

Arguments

geography

Character string indicating the geographic level to return.

Value

A dataframe of case and death counts in German regions

Examples

## Not run: 
country <- rnaturalearth::ne_countries(scale="large",
                                        country = "Germany",
                                        returnclass = 'sf')

regions <- rnaturalearth::ne_states("Germany", returnclass = "sf")

data <- get_germany_regional_cases() %>%
  dplyr::filter(date == max(date))

regions_with_data <- regions %>%
  dplyr::left_join(data,
                  by = c("name" = "state"))

ggplot2::ggplot(regions_with_data) +
  ggplot2::geom_sf(ggplot2::aes(fill = cases))


## End(Not run)

epiforecasts/NCoVUtils documentation built on June 26, 2020, 1:20 a.m.