Solution exercice proposée par Paul Faye

MOOC-RR.Rproj

+Version: 1.0
+
+RestoreWorkspace: Default
+SaveWorkspace: Default
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+UseSpacesForTab: Yes
+NumSpacesForTab: 2
+Encoding: UTF-8
+
+RnwWeave: Sweave
+LaTeX: pdfLaTeX

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: