---
title: 'Example keep with next'
---

```{r include=FALSE}
library(knitr)
library(officedown)
library(flextable)

opts_chunk$set(echo = FALSE)
table_caption <- 'airquality dataset'
```


```{r table1, tab.cap = table_caption}
qflextable(mtcars)
```


```{r table2, tab.cap = table_caption}
qflextable(mtcars)
```

blop

blop

blop

blop

blop

blop

blop

```{r table3, tab.cap = table_caption}
qflextable(head(mtcars)) |> 
  keep_with_next(part = "all", value = TRUE)
```


