chunk 1

```{r loading}
# load packages
library(tidyverse)

# Loading the Boston city payroll
payroll <- read_csv("data/bostonpayroll2013.csv")
```

Let's look at the data in R Markdown with a package called [`DT`](https://rstudio.github.io/DT/) that uses the Datatables [jquery library](https://datatables.net/).

```{r display_data}
library(DT)
datatable(payroll)
```