如何在R的officer包block_caption中添加希腊符号至Word文档？

问题原因 #

officer::block_caption() 传入纯字符串时，Word会直接输出文本内容，不会解析LaTeX语法的\sigma命令，导致符号无法渲染。

方案1：直接使用Unicode希腊字符 #

Word原生支持Unicode希腊字符，直接替换成σ即可：

officer::block_caption("σ",
                       style = "Figure",
                       autonum = officer::run_autonum(seq_id = 'suppfig', 
                                                      bkm = 'test',
                                                      pre_label = "Supplementary Figure ",
                                                      start_at=NULL))

方案2：用run_eq()生成Word公式对象 #

如果需要更规范的公式格式（或复杂公式场景），使用officer::run_eq()生成Word支持的OMML公式：

# 构建包含公式的标题文本
caption_content <- officer::fpar(officer::run_eq("\\sigma"))

officer::block_caption(caption_content,
                       style = "Figure",
                       autonum = officer::run_autonum(seq_id = 'suppfig', 
                                                      bkm = 'test',
                                                      pre_label = "Supplementary Figure ",
                                                      start_at=NULL))

方案3：适配officedown的RMarkdown工作流 #

利用officedown的原生图标题语法，在代码块参数中设置fig.cap，同时在YAML中配置自动编号：

修改后的YAML：

title: 'Test'
output:
  officedown::rdocx_document:
    fig_caption: true
    autonum:
      seq_id: 'suppfig'
      pre_label: "Supplementary Figure "
  html_document:
    df_print: paged
includeline-num: true

代码块：

plot(1:10) # 替换为你的绘图代码

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