Upload exercice_fr.Rmd

module2/exo4/exercice_fr.Rmd

+---
+title: "Exercice d'analyse de données"
+author: "Nicolas Roelandt"
+date: "2020-06-08"
+output: html_document
+---
+
+
+```{r setup, include=FALSE}
+knitr::opts_chunk$set(echo = TRUE, warning = FALSE)
+```
+
+```{r load-libraries, echo=FALSE}
+library(tidyverse)
+```
+
+# Données et résumé
+
+### Taille du jeu de donnée
+
+Le jeu de donnée contient `r nrow(data)` lignes et `r ncol(data)` colonnes.
+
+```{r load-data, echo=FALSE}
+data <- read_csv(file = "data.csv")
+```
+
+## Contrôle des données
+
+```{r data-head}
+head(data)
+```
+
+
+```{r data-tail}
+tail(data)
+```
+
+
+
+### Statistiques
+
+Le jeu de données comprend `r nrow(data)` observations. 
+La moyenne des observations est de `r mean(data$valeur)`
+La médiane est de `r median(data$valeur)`, les données allant de `r min(data$valeur)` à `r max(data$valeur)`.
+Soit une amplitude de `r max(data$valeur) -  min(data$valeur)`.
+
+# Graphiques
+
+### Courbes
+
+Visualisation des données sous forme d'une courbe.
+
+```{r}
+plot(data, type = 'l', col = 'blue')
+```
+
+
+### Histogramme
+
+Visualisation sous forme du nombre d'incidence des valeurs.
+
+```{r}
+hist(data$valeur, col = 'blue', main = "Répartition des observations", xlab = "Valeur", ylab = "Quantité")
+```
+