diff --git a/module3/exo1/analyse-syndrome-grippal.Rmd b/module3/exo1/analyse-syndrome-grippal.Rmd index ad306e422d697c193e016d5b98ec47a5c0dcd588..19db20d8e735c51875b337e2ca125a4681ab0ede 100644 --- a/module3/exo1/analyse-syndrome-grippal.Rmd +++ b/module3/exo1/analyse-syndrome-grippal.Rmd @@ -22,6 +22,7 @@ knitr::opts_chunk$set(echo = TRUE) ## Préparation des données Les données de l'incidence du syndrome grippal sont téléchargés et disponibles au niveau local +```{r} data_local = read.csv("C:/incidence-PAY-3.csv") ``` @@ -42,17 +43,21 @@ 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 + ```{r} data = read.csv("C:/incidence-PAY-3.csv", skip=1) + ``` Regardons ce que nous avons obtenu: + ```{r} head(data) tail(data) ``` Y a-t-il des points manquants dans nos données ? + ```{r} na_records = apply(data, 1, function (x) any(is.na(x))) data[na_records,]