+
+
+
+
+
+
+Recherche reproductible : principes méthodologique
+Mahugnon Ezékiel HOUNGBO
+17/02/2021
+ +
+
+Mon journal de bord
+
+
+
+
+
+
+Module2
+
+
+Importation des packages
+setwd(“C:/Users/Denis CORNET/mooc-rr/module2”) À utiliser lors du travail en local
+library(tidyverse)## -- Attaching packages --------------------------------------- tidyverse 1.3.0 --## v ggplot2 3.3.2 v purrr 0.3.4
+## v tibble 3.0.4 v dplyr 1.0.2
+## v tidyr 1.1.2 v stringr 1.4.0
+## v readr 1.4.0 v forcats 0.5.0## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
+## x dplyr::filter() masks stats::filter()
+## x dplyr::lag() masks stats::lag()
+
+Importation de la base de donnée
+DonneModule2<- read.csv2("C:/Users/Denis CORNET/mooc-rr/module2/exo4/DonneModule2.csv")
+DonneModule2 <- as.data.frame(DonneModule2)
+head(DonneModule2)## Notes
+## 1 14
+## 2 7.6
+## 3 11.2
+## 4 12.8
+## 5 12.5
+## 6 9.9DonneModule2$Notes <- as.numeric(DonneModule2$Notes)
+head(DonneModule2)## Notes
+## 1 14.0
+## 2 7.6
+## 3 11.2
+## 4 12.8
+## 5 12.5
+## 6 9.9
+
+Statistique descriptive sur la base de donnée
+
+
+Moyenne, écart-type, minimum, médiane et maximum
+DonneModule2.moyenne= mean(DonneModule2$Notes); DonneModule2.moyenne## [1] 14.113DonneModule2.ecarttype= sd(DonneModule2$Notes);DonneModule2.ecarttype## [1] 4.334094DonneModule2.min=min(DonneModule2$Notes);DonneModule2.min## [1] 2.8DonneModule2.médiane=median(DonneModule2$Notes); DonneModule2.médiane## [1] 14.5DonneModule2.max=max(DonneModule2$Notes); DonneModule2.max## [1] 23.4
+
+Grapiques de la statistique descriptive
+
+
+Plot
+plot(DonneModule2$Notes, type="l", ann = FALSE,col="blue", panel.first = grid())
+
+Histogramme
+hist(DonneModule2$Notes, ann = FALSE,col="blue" )