---
title: "Charts"
output:
  flexdashboard::flex_dashboard:
    theme: bootstrap
    orientation: columns
    source_code: embed
---
```{r message=FALSE, warning=FALSE}
library(plotly)
```

# Charts

## Column 1

### Chart 1

```{r}
plot_ly(economics, x = ~pop)
```

### Chart 2

```{r}
plot_ly(economics, x = ~date, y = ~pop)
```

### Chart 3

```{r}
plot_ly(z = ~volcano)
```

## Column 2

### Chart 4

```{r}
add_lines(plot_ly(economics, x = ~date, y = ~unemploy/pop))
```

### Chart 5

```{r}
plot_ly(y = ~rnorm(50), type = "box")
```

### Chart 6

```{r}
plot_ly(iris, x = ~Sepal.Width, y = ~Sepal.Length)
```