无需渲染整个文档，如何在Word中预览Quarto代码块的ggplot图形？

可以通过以下两种方法实现类似flextable的Word预览效果：

• 借助officer包生成临时Word文档
  officer包支持将ggplot图形直接插入Word文档，结合临时文件实现快速预览：

  library(ggplot2)
  library(officer)
  
  # 创建目标ggplot图形
  p <- ggplot(airquality, aes(x = Temp, y = Ozone)) + geom_point()
  
  # 初始化Word文档并插入图形
  doc <- read_docx()
  doc <- body_add_gg(doc, value = p, width = 6, height = 4)
  # 生成临时Word文件并打开预览
  print(doc, target = tempfile(fileext = ".docx"))
  

  运行代码后，系统会自动打开包含目标图形的临时Word文档，无需处理整个Quarto项目。

• 用ggdocx包简化操作流程
  ggdocx是专门针对ggplot转Word的工具包，代码更简洁：

  library(ggplot2)
  library(ggdocx)
  
  p <- ggplot(airquality, aes(x = Temp, y = Ozone)) + geom_point()
  # 生成临时Word预览文件
  ggsave_docx(p, path = tempfile(fileext = ".docx"))
  

  执行后同样会直接打开仅包含该图形的Word文档，满足快速预览需求。

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