---
title: "Dashboard-01"
output:
flexdashboard::flex_dashboard:
orientation: columns
vertical_layout: fill
theme: sandstone
source_code: embed
---
```{r setup, include=FALSE}
library(flexdashboard)
```
## Column1
### Welcome to CM
{width="333"}
### Car plot
```{r}
plot(cars)
```
## Column2
### Participants
```{r}
valueBox(50,
caption="Total Participant",
icon="fa-users",
color="lightblue")
```
### Gauge Plot
```{r}
Training_access=50
gauge(Training_access,min=0,max=60,
label="Training success")
```
###
```{r}
hist(cars$speed, color="pink", density = 20, border= "black")
```