::: {.cell hash='08_Maps_cache/revealjs/unnamed-chunk-60_ccf1fbba33b5a37f606927d1d0a7e87a'}

```{.r .cell-code}
italian_lakes <- 
  st_intersection(lakes, italy)
italian_rivers <- 
  st_intersection(rivers, italy)
```
:::