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

Column {data-width=60%}
-----------------------------------------------------------------------

### Uma tabela

```{r}
mtcars %>% 
  head(15) %>% 
  knitr::kable()
```

Column {data-width=40%}
-----------------------------------------------------------------------

### Um gráfico

```{r}
hist(mtcars$mpg)
```

### Exercícios

1. O que acontece se aumentarmos o número de linhas da tabela para 30?

2. Com 30 linhas na tabela, o que acontece se mudarmos o `vertical_layout:` no cabeçalho de `fill` para `scroll`?

3. Crie um arquivo chamado `meu-segundo-flexdashboard.Rmd` para criar um *flexdashboard*.

    a. Usando o layout padrão do arquivo criado, divida a primeira coluna do dashboard em **duas seções** (assim como a segunda coluna).

    b. Popule o seu dashboard com tabelas ou gráficos da nossa aula de R Markdown. Não se esqueça de importar a base de dados.

4. O que acontece se tirarmos o `orientation: columns`?

