diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index 4e8f54335840d477f6e2958d4b22497a5bc4e699..75724be28163e34f511589ca721a379b4c8c3592 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -58,9 +58,11 @@ filename <- basename(data_url) On peut chercher si le fichier existe déjà dans le répertoire courant avec une fonction basique de R. S'il existe déjà, on le charge, sinon on le charge depuis l'URL. ```{r} -if(file.exists(filename)) { - data = read.csv(filename, skip=1) -} else data = read.csv(data_url, skip=1) +if(!file.exists(filename)) { + download.file(data_url, filename, method = 'auto') +} +data = read.csv(filename, skip=1) + ```