---
title: "Dashboard-tutorial"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
    theme: journal
    source_code: embed
    self_contained: true
    social: menu
---

```{r setup, include=FALSE}
library(flexdashboard)
```

## Column1 {data-width="550"}

### Welcome

![Merry Chirstmas](images/neon-merry-christmas-sign-on-a-christmas-tree-free-photo.jpg){width="460"}

### Cars

```{r}
plot(cars)
```

## Column2 {data-width="350"}

### Participants

```{r}
valueBox(50, caption = "Total Particiants", icon="fa-users", color="grey")
```

### Gauge Plot

```{r}
Train_access= 50
gauge(Train_access, min=0, max=60, label= "Trainging Success")
```

### 

```{r}
hist(cars$speed, col = "goldenrod", density = 20, border = "black")
```