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


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

```{r}
library(tidyverse)
a<- as.data.frame(a)
ggplot(data = a, aes(x=a, fill = a)) + 
  geom_histogram(bins = 10, fill = "blue") +
  ylim(0,25) +
  theme_bw()
```