在Shiny应用中实现Markdown生成的.docx转PDF下载方案咨询

核心思路 #

利用Pandoc配合轻量级LaTeX发行版TinyTeX，在服务器环境下实现无需Word/LibreOffice的docx转PDF，且能最大程度保留原docx的样式一致性。

服务器环境准备 #

• 安装TinyTeX：在服务器上执行一次以下代码，完成轻量级LaTeX环境部署：

  tinytex::install_tinytex()
  

• Pandoc版本确认：rmarkdown包自带适配的Pandoc版本，若单独安装需确保版本≥2.0。

Shiny Server代码修改 #

在原有的docx下载逻辑基础上，新增PDF下载的DownloadHandler，先生成临时docx文件，再通过Pandoc转换为PDF：

# 原docx下载（修正原代码的命名混淆问题）
output$docx_download <- downloadHandler(
  filename = "Test.docx",
  content = function(file) {
    rmarkdown::render("Test.Rmd",
                      output_file = file,
                      envir = new.env(parent = globalenv()))      
  }
)

# 新增PDF下载逻辑
output$pdf_download <- downloadHandler(
  filename = "Test.pdf",
  content = function(file) {
    # 生成临时docx文件
    temp_docx <- tempfile(fileext = ".docx")
    rmarkdown::render("Test.Rmd",
                      output_file = temp_docx,
                      envir = new.env(parent = globalenv()))
    
    # 调用Pandoc将docx转换为PDF，指定xelatex支持复杂字符
    rmarkdown::pandoc_convert(
      input = temp_docx,
      output = file,
      from = "docx",
      to = "pdf",
      options = c("--pdf-engine=xelatex")
    )
    
    # 清理临时文件
    unlink(temp_docx)
  }
)

注意事项 #

• 若文档包含中文、特殊符号或非英文字体，必须指定--pdf-engine=xelatex，TinyTeX默认预装该引擎。
• Pandoc转换会尽可能还原docx的样式（字体、段落间距、列表格式等），相比直接从Markdown生成PDF，样式一致性更符合需求。
• 若存在细微样式差异，可优化Word模板的样式定义，确保Pandoc能识别并转换对应格式。

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