README.Rmd

---
output: github_document
---

<!-- README.md is generated from README.Rmd. Please edit that file -->

```{r, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)
```

# coronavirusbrazil

<!-- badges: start -->
[![lifecycle](https://img.shields.io/badge/lifecycle-experimental-orange.svg)](https://www.tidyverse.org/lifecycle/#experimental)
[![License: MIT](https://img.shields.io/badge/License-MIT-blue.svg)](https://opensource.org/licenses/MIT)
[![GitHub commit](https://img.shields.io/github/last-commit/mralbu/coronavirusbrazil)](https://github.com/mralbu/coronavirusbrazil/commit/master)
<!-- badges: end -->

The coronavirusbrazil package provides a tidy format dataset of the 2019 Novel Coronavirus COVID-19 (2019-nCoV) epidemic for Brazil. The datasets were obtained from [RamiKrispin/coronavirus](https://github.com/RamiKrispin/coronavirus), [Ministerio da Saúde](https://covid.saude.gov.br/), [brasil.io](https://brasil.io/dataset/covid19/caso) and [Secretaria de Saúde - RJ](http://painel.saude.rj.gov.br/monitoramento/covid19.html).

This repository was inspired by the [RamiKrispin/coronavirus](https://github.com/RamiKrispin/coronavirus) package repository.


## Installation

You can install the released version of coronavirusbrazil from [CRAN](https://CRAN.R-project.org) with:

``` r
# install.packages("devtools")
devtools::install_github("mralbu/coronavirusbrazil")
```

## Usage

The package contains the following datasets:

```{r example}
library(coronavirusbrazil)
library(ggplot2)


data("coronavirus_br")
head(coronavirus_br) 
```

```{r, warning=FALSE, message=FALSE}
plot_coronavirus(coronavirus_br, xaxis = "date", yaxis = "cases", log_scale = F, linear_smooth = F)
```

```{r, warning=FALSE, message=FALSE}
data("coronavirus_br_states")
head(coronavirus_br_states) 
```

```{r, warning=FALSE, message=FALSE}
plot_coronavirus(coronavirus_br_states, yaxis = "percent_case_increase", color = "state", filter_variable = "state", facet = "state", filter_values = c("RJ", "SP", "DF", "CE", "RS", "MG"), log_scale = TRUE, linear_smooth = TRUE)
```


```{r}
data("coronavirus_br_cities")
head(coronavirus_br_cities) 
```

There are also geospatial datasets avaiable:

```{r}
dplyr::glimpse(spatial_br_states)
ggplot2::ggplot(spatial_br_states, ggplot2::aes(color=cases, size=cases)) + ggplot2::geom_sf()
```

```{r, message=FALSE, warning=FALSE}
dplyr::glimpse(spatial_br_cities)
ggplot2::ggplot(spatial_br_cities, ggplot2::aes(color=cases, size=cases)) + ggplot2::geom_sf()
```

# Data Sources

- Countries: [RamiKrispin/coronavirus](https://github.com/RamiKrispin/coronavirus)
- States: [Ministerio da Saúde](https://covid.saude.gov.br/)
- Cities: [brasil.io](https://brasil.io/dataset/covid19/caso)
- Rio de Janeiro: [Secretaria de Saúde - RJ](http://painel.saude.rj.gov.br/monitoramento/covid19.html)