Update analyse-syndrome-grippal.Rmd

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -43,8 +43,13 @@ Voici l'explication des colonnes donnée sur le [sur le site d'origine](https://
 
 La première ligne du fichier CSV est un commentaire, que nous ignorons en précisant `skip=1`.
 ### Téléchargement
+```r
 ```{r}
-data = read.csv(data_url, skip=1)
+local_file <- "incidence-PAY-3.csv"
+if (!file.exists(local_file)) {
+  download.file(data_url, destfile = local_file, mode = "wb")
+}
+data <- read.csv(local_file, skip = 1)
 ```
 
 Regardons ce que nous avons obtenu: