diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index fe216c9b4a50fa94a01bebf4cf0e0b12a57cf733..9e95f9f37368d505e607d3578dc9aec01a93f234 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -26,6 +26,15 @@ 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" ``` + +Nous allons faire une sauvegarde locale des données afin de les conserver et d'éviter dele charger depuis le serveur Sentinelle +```{r} +data_file="syndrome-grippal.csv" +if (!file.exists(data_file)) { + download.file(data_url, data_file, 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,17 +51,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 -Avec une condition si qui ne télécharge le fichier que lorsqu'il n'est pas disponible en local -```{r} - -if (file.exists("incidence-PAY-3.csv")==TRUE) - { - data = read.csv("incidence-PAY-3.csv", skip=1) - } else { - download.file(data_url,destfile = "incidence-PAY-3.csv") - data = read.csv("incidence-PAY-3.csv", skip=1)} +### Lecture +```{r} + data = read.csv(data_file, skip=1) ``` Regardons ce que nous avons obtenu: