add option to use a local copy of the dataset

module3/exo1/analyse-syndrome-grippal.Rmd

 ---
 title: "Analyse de l'incidence du syndrôme grippal"
-author: "Konrad Hinsen"
+author: "David Pinaud"
 output:
   pdf_document:
     toc: true
@@ -43,8 +43,15 @@ 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}
-data = read.csv(data_url, skip=1)
+Le téléchargement se fait s'il n'existe pas une copie locale du fichier téléchargé :
+```{r}
+if(file.exists("incidence-PAY-3.csv"))
+{ 
+    data = read.csv("incidence-PAY-3.csv")
+  } else {
+    data = read.csv(data_url, skip=1, na.strings = "-")
+    write.csv(data, "incidence-PAY-3.csv", row.names=FALSE)
+}
 ```
 
 Regardons ce que nous avons obtenu: