correction

module3/exo1/analyse-syndrome-grippal.Rmd

@@ -11,6 +11,15 @@ knitr::opts_chunk$set(echo = TRUE)
 
 Chargement du document à partir de l'URL: data_url = "https://www.sentiweb.fr/datasets/incidence-PAY-3.csv"
 
+data_file = "syndrome-grippal.csv"
+Là on peut voir les lignes (1) où des données sont manquantes:
+if (!file.exists(data_file)) {
+
+    download.file(data_url, data_file, method="auto")
+lignes_na = apply(data, 1, function(x) any(is.na(x)))
+}
+data[lignes_na,]
+
 
 ```{r}
 library(readr)