使用R+officedown生成Word文档：图表编号及标题位置问题

使用R Markdown结合officedown生成Word文档时，遇到以下问题：

• 图表无法自动编号，也无法实现交叉引用
• 已在YAML中设置plots: topcaption: true确保图表标题位于上方，但编号失效问题未解决

尝试将生成的docx文件移至Windows机器，按Ctrl+A再F9更新域，仍无法解决编号问题。

1. 修正YAML配置，启用编号规则 #

在输出配置中明确添加图表和表格的编号规则，确保officedown生成可识别的域：

---
output:  
  officedown::rdocx_document: 
    fig_caption: true  # 必须启用，否则caption功能不生效
    plots:
      topcaption: true  # 强制图表标题位于上方
    tables:
      topcaption: true  # 可选，设置表格标题位于上方
    caption:
      table:
        prefix: "表 "  # 表格编号前缀
        sep: ": "
      figure:
        prefix: "图 "  # 图表编号前缀
        sep: ": "
---

2. 规范图表代码块设置 #

• 代码块标签需唯一（如myfigure1），确保编号与图表一一对应
• 避免在ggplot中使用labs(title=...)，因为fig.cap会生成Word级别的标题，内部标题会导致重复，修改后的图表代码示例：

{r myfigure1, fig.cap="2022年共同资助援助的主要国家援助目标", echo=FALSE, fig.width=6, fig.height=3.7}
ggplot(data = cofinancing_objective_sel,
       aes(x = expenditure, y = fct_rev(top_objective))) +
    geom_bar(position="dodge", stat="identity", alpha=1, color="black") +
    scale_y_discrete(labels = wrap_format(20))+    
    xlab("国家援助支出（百万欧元）")+
    ylab(NULL)

3. 表格编号与引用设置 #

若需要表格编号，不要使用常规的knitr::kable，改用officedown的body_add_table函数自动生成带编号的表格：

{r scoreboard, echo=FALSE, eval=TRUE}
body_add_table(
  cofinancing_objective_sel,
  caption = "共同资助国家援助目标支出明细",
  style = "table_template"  # 可自定义样式，或使用Word内置表格样式
)

4. Linux下无需Windows即可更新域的方法 #

使用LibreOffice命令行工具批量更新Word文档的域，无需切换系统：

libreoffice --headless --invisible --convert-to docx --outdir ./output your_document.docx

该命令会重新生成文档并自动更新所有域，包括图表和表格的编号。

5. 排查常见问题 #

• 确保officedown和officer包为最新版本：install.packages(c("officedown", "officer"))
• 检查Word文档的内置样式，确保Figure Caption和Table Caption样式未被删除或修改
• 交叉引用图表时使用\@ref(fig:myfigure1)格式，生成的引用会自动关联编号

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