---
title: "Module 2 Exo 2"
author: "Votre nom"
date: "septembre 2020"
output: pdf_document
---


```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

Soit l'ensemble de données récupéré sur la page de l'exo et pré traité. Le
retraitement consiste en le remplacement systématique de la chaine `, ` par le
caractère de retour chariot. Ainsi on a un csv d'une colonne.

```{r load}
data <- read.csv("data.csv", header = FALSE)
head(data)
```

On calcule la moyenne :

```{r mean}
mean(data$V1)
```

On calcule l'écart type :

```{r sd}
sd(data$V1)
```

On calcule le min :

```{r min}
min(data$V1)
```

On calcule la médiane :

```{r median}
median(data$V1)
```

On calcule le max :

```{r max}
max(data$V1)
```