index.Rmd

---
title: "Meu relatório"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
    theme: 
      version: 4
      bg: "#101010"
      fg: "#FDF7F7" 
      primary: "#ED79F9"
      base_font: !expr bslib::font_google("Prompt")
      code_font: !expr bslib::font_google("JetBrains Mono")
---

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

Column {data-width=650}
-----------------------------------------------------------------------

### Chart A

```{r}
library(ggplot2)
dados::dados_starwars |> 
  dplyr::count(sexo_biologico) |> 
  ggplot() +
  aes(x = sexo_biologico, y = n) +
  geom_col() +
  theme_minimal(12)
```

Column {data-width=350}
-----------------------------------------------------------------------

### Chart B

```{r}
dados::dados_starwars |> 
  dplyr::arrange(dplyr::desc(altura)) |> 
  dplyr::slice_head(n = 10) |> 
  DT::datatable()
```

### Chart C

```{r}

```