diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index 912a8928a03f5a42199feb49f87502b887f477d2..39bc3b02eebd9230493f8682e74de89f91a3e99b 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -43,12 +43,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 + ```{r} -if file.exists("incidence-PAY-3.csv"){ - data = read.csv("incidence-PAY-3.csv", skip=1) } +# Si un fichier du même nom existe déjà localement, le lire. Sinon, le télécharger +# depuis l'URL dans data_url, l'écrire dans un fichier csv, puis continuer +# l'analyse +filename = "incidence-PAY-3.csv" +if file.exists(filename){ + data = read.csv(filename, skip=1) } else { data = read.csv(data_url, skip=1) - write.csv(data, file = "incidence-PAY-3.csv") + write.csv(data, file = filename) } ```