From fe1af59d1b0e15a5639998118027de3d3381f040 Mon Sep 17 00:00:00 2001 From: Dorian Goepp Date: Wed, 23 Nov 2022 13:52:30 +0100 Subject: [PATCH] download the data if it is not there already, to avoid repeated downloads, and allow offline work --- module3/exo1/analyse-syndrome-grippal.Rmd | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index a9f5a0a..d3f82c5 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -45,8 +45,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 + +Si le fichier n'existe pas déjà sur l'ordinateur, on le télécharge depuis la source indiquée plus haut. Cette vérification nous évite des téléchargements répétés et inutiles, et nous permet de travailler sans connexion internet (si le fichier existe). + ```{r} -data = read.csv(data_url, skip=1) +library(fs) + +file_name = "incidence_stats.csv" +if (!file_exists(file_name)) { + download.file(url=data_url, destfile=file_name, method="auto") +} +data = read.csv(file_name, skip=1) ``` Regardons ce que nous avons obtenu: -- 2.18.1