如何用R Markdown生成带动态可更新图号标题的Word文档

方案1：使用bookdown扩展的Word输出格式（最简便） #

bookdown包扩展的word_document2输出格式原生支持生成Word可识别的动态图表标题，操作步骤如下：

• 首先安装未安装的依赖包：install.packages("bookdown")
• 修改Rmd文件头部的YAML配置，将输出格式从默认的rmarkdown::word_document替换为bookdown::word_document2，示例配置：

---
title: "分析报告"
output: 
  bookdown::word_document2:
    reference_docx: "自定义样式模板.docx" # 可选参数，用来统一Word内的字体、段落等样式
---

• 代码块的fig.cap参数无需手动添加编号，直接填写标题内容即可，示例：

{r, fig.width = 7.0, fig.height = 5.0, dpi = 400, echo=FALSE, message = FALSE, warning = FALSE, fig.cap = "Plot Description", fig.align = "center"}
# 绘图代码
plot(1:100)

生成的Word文档中，图表标题会自动生成图 X 标题内容格式的动态编号，属于Word可识别的SEQ域，右键选择「更新域」即可批量重编号，也可以直接插入图表目录。

方案2：使用officer包自定义插入动态标题 #

如果需要更灵活的标题格式控制，可以结合officer包直接调用Word的域接口生成标题：

• 安装依赖包：install.packages(c("officer", "flextable"))
• 关闭代码块的自动标题，在绘图代码后插入动态域标题，示例：

{r, fig.width = 7.0, fig.height = 5.0, dpi = 400, echo=FALSE, message = FALSE, warning = FALSE, fig.cap=NULL, fig.align = "center"}
library(officer)
# 绘图代码
plot(1:100)
# 插入动态图标题
cat("<w:p><w:pPr><w:pStyle w:val=\"图标题\"/></w:pPr><w:r><w:fldSimple w:instr=\" SEQ Figure \\* ARABIC \"><w:r><w:t>图 </w:t></w:r></w:fldSimple><w:r><w:t>：Plot Description</w:t></w:r></w:p>")

注意事项 #

• 生成Word文档后如果编号未更新，全选文档内容按F9即可批量更新所有域的编号
• 可提前在自定义模板Word中预设「图标题」「表标题」的样式，生成时会自动套用，无需后续手动调整
• 表格的动态编号同理，使用tab.cap参数配合word_document2即可实现

内容的提问来源于stack exchange，提问作者Michelle