---
title: "module2exo3"
author: "Flavie Derouin Tochon"
date: "7 avril 2020"
output: html_document
---

# charchement des données
 le fichier data.txt est hebergé sur mon ordinateur `C:\Users\fderouin\Desktop\MOOC_reproductibilité`
```{r data}

data2<-read.table("data.txt", header=T)
```

# sequence plot des donnees
```{r}
plot(data2$data, type="l", col="blue", xlab="", ylab="", ylim=c(0,25))

```

## histogramme des données
```{r histo}
my_breaks=seq(min(data2$data),max(data2$data),length.out = 11)
hist(data2$data, col="blue", xlim=c(0,25), ylim=c(0,25), breaks = my_breaks, main="", xlab="", ylab="")
```