---
title: "Module 2 - Exo 2"
author: "Christian Wiat"
date: "13 Décembre 2020"
output: html_document
---


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

## récupération des données

Les données suivantes ont été mises dans un  fichier csv local 

E:/R/mooc/mooc27exo2.csv

```{r}
#library()
df <- read.csv2("E:/R/mooc/mooc27exo2.csv", header=FALSE, sep=",")
dfn<- as.numeric(df)
```

# moyenne et l'écart-type, le min, la médiane et le max

```{r}
cat("moyenne:" , mean(dfn), " sd:", sd(dfn), " minimum:", min(dfn), " mediane:", median(dfn), " maximum:" , max(dfn))
```