---
title: "My assingment_Dashboard"
output: 
  flexdashboard::flex_dashboard:
    #orientation: columns
    #vertical_layout: fill
    theme: lumen #"bootstrap", "cerulean", "cosmo", "darkly", "flatly", "journal", "lumen", "paper", "readable", "sandstone", "simplex", "spacelab", "united", "yeti"
    source_code: embed
    self_contained: true
    social: menu
---

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

## Column1

### Happy New Year!! {#sec-happy-new-year}

![](images/happy-new-year-2026-01.jpg){width="371"}

### Histogram

```{r}
hist(cars$dist, col="darkblue", density=20, border="gold")


```

## Column2

### Sales

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


```

### Gauge Plot

```{r}
Total_sales=150
gauge(Total_sales,
      min=0,max=200,
      label= "Sales vs Target")

```

### Boxplot

```{r}

boxplot(cars, col="lightgreen")
```