diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index 771e78faac371f23c921f7f7aecc87f2100e9059..9e5cbda2704d744abcc1671c306162e7cf096d12 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -43,8 +43,19 @@ 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 + +On indique le working directory pour le téléchargement en local puis si aucun fichier `incidence-PAY-3.csv` n'est trouvé en local, le fichier est récupéré avec l'url puis téléchargé sans la première ligne +Sinon il est importé depuis le local, en sachant que la première ligne a été supprimée, et en indiquant la colonne de noms de lignes. ```{r} -data = read.csv(data_url, skip=1) +setwd("") + +if (length(list.files(pattern = "incidence-PAY-3.csv")) == 0){ + data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv" + write.csv(read.csv(data_url, skip=1), "incidence-PAY-3.csv") + data = read.csv("incidence-PAY-3.csv", row.names = 1) +}else{ + data = read.csv("incidence-PAY-3.csv", row.names = 1) +} ``` Regardons ce que nous avons obtenu: