Похоже, у вас есть непреднамеренный пробел после нового разделителя слайдов после пустого содержимого как "---". Удалите это пространство, и оно будет распознано как настоящий разделитель слайдов:
---
title: "map test"
output:
xaringan::moon_reader:
css: ["default"]
nature:
highlightLines: true
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
## blank page
content
---
leaflet page
```{r}
library(leaflet)
leaflet() %>%
addTiles()
```
---