Files
ArtStudies/M2/Data Visualisation/tp2/dashboard.Rmd

40 lines
686 B
Plaintext

---
title: "Dashboard des accidents de vélo"
output:
flexdashboard::flex_dashboard:
orientation: columns
vertical_layout: fill
---
```{r setup, include = FALSE}
library(flexdashboard)
library(ggplot2)
library(gapminder)
library(rmarkdown)
```
## column {data-width="650"}
### Graphique 1
```{r}
paged_table(gapminder, options = list(rows.print = 15))
```
## column {data-width="350"}
### Graphique 2
```{r}
ggplot(data = gapminder, aes(x = lifeExp)) +
geom_histogram(aes(y = ..density..), bins = 30) +
geom_density()
```
### Graphique 3
```{r}
ggplot(data = gapminder, aes(x = lifeExp)) +
geom_histogram(aes(y = ..density..), bins = 30) +
geom_density()
```