knitr::opts_chunk$set(echo = TRUE, warning = FALSE) devtools::load_all()
remotes::install_github("liibre/coronabr")
library(coronabr)
Aqui está o exemplo usando a função get_corona_minsaude()
que extrai os dados do portal https://covid.saude.gov.br, usando o csv disponibilizado diariamente na página.
Os dados podem ser procurados para todos os estados, ou para só um, ou para vários, usando o parâmetro uf e o código de duas letras de cada estado (ex. "PI")
todos_estados <- get_corona_minsaude() rj <- get_corona_minsaude(uf = "RJ", filename = "minsaude_RJ") sprj <- get_corona_minsaude(uf = c("SP", "RJ"), filename = "minsaude_SP-RJ")
head(todos_estados) head(rj) unique(rj$estado) head(sprj) unique(sprj$estado)
plot_corona_minsaude(df = todos_estados, log = FALSE, tipo = "numero")
plot_corona_minsaude(df = todos_estados, log = TRUE, tipo = "numero")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.