title: "Analysis of influenza-like illness with a local copy of the data"
author: "PedroMota"

---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

# Download data from *Réseau Sentinelles* and read data stored as `csv` from local files. Best choice to assure permanent access to dataset.

```{r}
setwd("~/ResearchReproductible") # Change working directory name
data_file <- read.csv2("incidence-PAY-3.csv", skip = 1)
```

If the code above has not worked, you can access it directly from the website ** Réseau Sentinelles**. Although the link below may expire and data may have been modified.   

```{r}
data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv"
data <- read.csv(data_url, skip=1)

```