knitr::opts_chunk$set(echo = TRUE, message = FALSE, warning = FALSE, results = TRUE, comment = FALSE, fig.width = 5, fig.height = 5) devtools::load_all()
library(coronabr)
dados <- get_corona_br(by_uf = TRUE)
plot_corona_br(df = dados, log = FALSE)
plot_corona_br(df = dados, tipo = "aumento")
plot_uf(df = dados, n = 7)
plot_uf(df = dados, prop_pop = FALSE, n = 7)
plot_uf(df = dados, tipo = "obitos", prop_pop = FALSE, n = 7)
plot_uf(df = dados, tipo = "obitos", prop_pop = TRUE, n = 7)
plot_uf(df = dados, tipo = "casos", prop_pop = TRUE, estados = c("AM", "CE", "PE", "SP"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.