Téléchargement, dépôt et lecture des données (fichier local)

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -18,6 +18,11 @@ header-includes:
 ```{r setup, include=FALSE}
 knitr::opts_chunk$set(echo = TRUE)
 ```
+## Vérification de l'existance des données dans le fichier local
+```{r}
+data = read.csv("incidence-PAY-3.csv")
+```
+On constacte que les données n'existent pas dans le fichier local. Téléchargeons maintenanat les données depuis le site web du Réseau Sentinelles.
 
 ## Préparation des données
 
@@ -47,6 +52,15 @@ La première ligne du fichier CSV est un commentaire, que nous ignorons en préc
 data = read.csv(data_url, skip=1)
 ```
 
+### Depôt des données dans le fichier local
+```{r}
+write.csv(data,"incidence-PAY-3.csv")
+```
+### Lecture des données à partir du fichier local
+```{r}
+data = read.csv("incidence-PAY-3.csv")
+```
+
 Regardons ce que nous avons obtenu:
 ```{r}
 head(data)