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


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

## Pour graphe 1
```{r}
plot(A,type="l",col="blue",xlim=c(0,100),ylim=c(0,25),main=NULL,xlab=NULL,ylab=NULL)
```

## Pour graphe 2
```{r}
hist(A,xlim=c(0,25),ylim=c(0,25),col="blue",main=NULL,xlab=NULL,ylab=NULL,border="black")
box()
grid(col="black")
```