# NOT RUN {
df <- download_ecdc_covid19_data(silent = TRUE, cached = TRUE)
df %>%
dplyr::filter(iso3c == "ITA", !is.na(cases)) %>%
ggplot2::ggplot(ggplot2::aes(x = date, y = cases)) +
ggplot2::geom_bar(stat = "identity", fill = "lightblue")
# }
Run the code above in your browser using DataLab