From 4380af2f712ac7dcff8d192acb1d4f573dd352e1 Mon Sep 17 00:00:00 2001 From: Paul Date: Mon, 24 May 2021 18:55:17 +0200 Subject: [PATCH] =?UTF-8?q?Solution=20exercice=20propos=C3=A9e=20par=20Pau?= =?UTF-8?q?l=20Faye?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- MOOC-RR.Rproj | 13 +++++++++++++ module3/exo1/analyse-syndrome-grippal.Rmd | 7 ++++++- 2 files changed, 19 insertions(+), 1 deletion(-) create mode 100644 MOOC-RR.Rproj diff --git a/MOOC-RR.Rproj b/MOOC-RR.Rproj new file mode 100644 index 0000000..8e3c2eb --- /dev/null +++ b/MOOC-RR.Rproj @@ -0,0 +1,13 @@ +Version: 1.0 + +RestoreWorkspace: Default +SaveWorkspace: Default +AlwaysSaveHistory: Default + +EnableCodeIndexing: Yes +UseSpacesForTab: Yes +NumSpacesForTab: 2 +Encoding: UTF-8 + +RnwWeave: Sweave +LaTeX: pdfLaTeX diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index 24f9463..b03f640 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -46,7 +46,12 @@ La première ligne du fichier CSV est un commentaire, que nous ignorons en préc ```{r} library(readr) setwd("C:/Users/Paul Faye/Desktop/MOOC-RR/module3/exo1/") -data = read_csv("incidence_PAY_3.csv", skip = 1) +donnees = "incidence_PAY_3.csv" +if (!file.exists(donnees)) { + download.file(data_url, donnees, method="auto") +} + +data = read_csv(donnees, skip = 1) ``` Regardons ce que nous avons obtenu: -- 2.18.1