如何解决如何在长flextablermarkdown，word输出的标题之前在每个页面上打印短标题
我有一个很长的 flextable，我把它编织成文字输出。我的 flextable 有一个标题，我想在我的 flextable 标题之前的每一页上打印一个“附加标题”（我的标题的简短版本）。我试图找到解决方案，但我找不到任何有关它的信息。 有什么解决办法吗？
---
output:
word_document
---
```{r}
library(flextable)
ft1 <- flextable(iris)
library(officer)
ft1 <- set_caption(ft1,caption = "My caption",autonum = run_autonum() )
autofit(ft1)
```
解决方法
类似的东西？
---
title: "Untitled"
output: word_document
---
```{r setup,include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
```{r}
library(flextable)
ft1 <- flextable(iris)
library(officer)
ft1 <- add_header_lines(ft1,"a short caption")
ft1 <- align(ft1,i = 1,part = "header",align = "right")
ft1 <- color(ft1,color = "orange")
ft1 <- set_caption(ft1,caption = "My caption",autonum = run_autonum() )
autofit(ft1)
```
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
