::: {.cell hash='08_Maps_cache/revealjs/airports_e76f7ca79a5a43ce34d8c87ba0ac8579'}

```{.r .cell-code}
ggplot() +
  geom_sf(data=st_transform(italy, 
                            aea)) +
  geom_sf(data=close_cities,
          size=0.1) +
  geom_sf(data=italian_airports,
          shape=23,
          fill="yellow")
```
:::