Update analyse-syndrome-grippal.Rmd

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -43,12 +43,17 @@ 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}
-if file.exists("incidence-PAY-3.csv"){
-    data = read.csv("incidence-PAY-3.csv", skip=1) }
+# Si un fichier du même nom existe déjà localement, le lire. Sinon, le télécharger 
+# depuis l'URL dans data_url, l'écrire dans un fichier csv, puis continuer
+# l'analyse
+filename = "incidence-PAY-3.csv"
+if file.exists(filename){
+    data = read.csv(filename, skip=1) }
 else { 
     data = read.csv(data_url, skip=1)
-    write.csv(data, file = "incidence-PAY-3.csv")
+    write.csv(data, file = filename)
 }
 ```