::: {.cell hash='08_Maps_cache/revealjs/unnamed-chunk-88_7a066391a9b900961206bdcf341c5bdf'}

```{.r .cell-code}
simple_map <- function(geogr) {
  ggplot(geogr) + geom_sf() + theme_bw()
}
world <- ne_countries(scale="small", returnclass = "sf")
```
:::