Update analyse-syndrome-grippal.Rmd

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -43,8 +43,19 @@ 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
+
+On indique le working directory pour le téléchargement en local puis si aucun fichier `incidence-PAY-3.csv` n'est trouvé en local, le fichier est récupéré avec l'url puis téléchargé sans la première ligne
+Sinon il est importé depuis le local, en sachant que la première ligne a été supprimée, et en indiquant la colonne de noms de lignes.
 ```{r}
-data = read.csv(data_url, skip=1)
+setwd("") 
+
+if (length(list.files(pattern = "incidence-PAY-3.csv")) == 0){
+  data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv"
+  write.csv(read.csv(data_url, skip=1), "incidence-PAY-3.csv")
+  data = read.csv("incidence-PAY-3.csv", row.names = 1)
+}else{
+  data = read.csv("incidence-PAY-3.csv", row.names = 1)
+}
 ```
 
 Regardons ce que nous avons obtenu: