Update analyse-syndrome-grippal.Rmd

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -23,7 +23,7 @@ knitr::opts_chunk$set(echo = TRUE)
 
 Les données de l'incidence du syndrome grippal sont disponibles du site Web du [Réseau Sentinelles](http://www.sentiweb.fr/). Nous les récupérons sous forme d'un fichier en format CSV dont chaque ligne correspond à une semaine de la période demandée. Nous téléchargeons toujours le jeu de données complet, qui commence en 1984 et se termine avec une semaine récente. L'URL est:
 ```{r}
-data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv"
+data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv" 
 ```
 
 Voici l'explication des colonnes donnée sur le [sur le site d'origine](https://ns.sentiweb.fr/incidence/csv-schema-v1.json):
@@ -45,7 +45,12 @@ La première ligne du fichier CSV est un commentaire, que nous ignorons en préc
 ### Téléchargement
 ```{r}
 data = read.csv(data_url, skip=1)
+setwd("~/Desktop/FUN MOOC 2020/recherche reproductible")
+data1 = read.csv2("etat_grippal.csv") #données téléchargées à la date 16 avril 2020 à comparer avec les données de l'url
+
 ```
+Si data1=data alors ne rien changer au script. mais si data1 est différent de data alors remplacer "data1" par "data" pour n'utiliser que le fichier enregistré le 16 avril 2020.
+
 
 Regardons ce que nous avons obtenu:
 ```{r}