---
title: "Votre titre"
author: "Votre nom"
date: "La date du jour"
output: html_document
---


## Module 2 exo 3

```{r}
plot(x, type = "l", col = "blue", lwd = 2,grid = TRUE, ylim = c(0, 25),xaxs = "i")
abline(h = seq(0, 25, by = 5), col = "gray", lty = 2)  # lignes horizontales
abline(v = seq(1, length(x), by = 10), col = "gray", lty = 2)  # lignes verticales
```

```{r}
hist(x,col = "blue",ylim=c(0,25))
abline(h = seq(0, 25, by = 5), col = "gray", lty = 2)  # lignes horizontales
abline(v = seq(1, length(x), by = 5), col = "gray", lty = 2)  # lignes verticales
```