Update analyse-syndrome-grippal.Rmd

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -26,6 +26,16 @@ Les données de l'incidence du syndrome grippal sont disponibles du site Web du
 data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv"
 ```
 
+
+### Ajout de lignes pour télécharger le fichier à lire, sans passer par le site, afin de prévenir une perte des données (modifications ou autre du site internet par exemple)
+```{r}
+incidence-PAY-3 = "incidence-PAY-3.csv"
+if (!file.exists(incidence-PAY-3)) {
+    download.file(data_url, incidence-PAY-3, method="auto")
+}
+```
+
+
 Voici l'explication des colonnes donnée sur le [sur le site d'origine](https://ns.sentiweb.fr/incidence/csv-schema-v1.json):
 
 | Nom de colonne | Libellé de colonne                                                                                                                |
@@ -42,9 +52,10 @@ Voici l'explication des colonnes donnée sur le [sur le site d'origine](https://
 | `geo_name`   | Libellé de la zone géographique (ce libellé peut être modifié sans préavis)                                                       |
 
 La première ligne du fichier CSV est un commentaire, que nous ignorons en précisant `skip=1`.
-### Téléchargement
+
+### Ajout de lignes pour lire le fichier téléchargé, sans passer par le site
 ```{r}
-data = read.csv(data_url, skip=1)
+data = read.csv(incidence-PAY-3, skip=1)
 ```
 
 Regardons ce que nous avons obtenu: