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%"
)
```
# covidmodeldata

<!-- badges: start -->
<!-- badges: end -->

The goal of covidmodeldata is to download and format data

## Installation

``` r
remotes::install_github("nset-ornl/covidmodeldata")
```

## Download and Format New York Times Data

The fields ending in `_mdl` are the modeled data. The fields not ending with `mdl` 
match the originally reported values. If a state is skiped such as Rhode Island, the `_mdl` values for that
state will match the original values while values for other states will be the modeled values.

```{r example-run, echo=FALSE, message=FALSE, warning=FALSE}
library(covidmodeldata)
library(tidyverse)

df <- get_nyt() %>%
  format_nyt(
    skip_assignment = c("44") # don't assign Rhode Island cases
    )
```

```{r example, eval=FALSE}
library(covidmodeldata)
library(tidyverse)

df <- get_nyt() %>%
  format_nyt(
    skip_assignment = c("44") # don't assign Rhode Island cases
    )

glimpse(df)
```

```{r example-table, echo=FALSE}
glimpse(df)
```

## ACS data and Geometries
```{r}
glimpse(acs_data)
```


## Landscan USA Population Data
```{r}
glimpse(landscan_usa)
```