---
title: "Dashboard01"
output: 
  flexdashboard::flex_dashboard:
    theme: cerulean
    source_code: embed
    self_contained: true
    social: menu
---

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

## Column1

### Welcome To My Room
![Merry X'mas](images/centa-claus_1000648-550-01.avif){width="300"}

### car Plot

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

## Column2

### Participants

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

### Gauge Plot

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

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