将方程渲染为图像，并使用 R Markdown 将其包含在 Word/PowerPoint 输出文档中

我无偿地交叉发布这个来自 R Studio 社区页面 https://community.rstudio.com/t/rendering-equations-as-images-for-microsoft-output/13862因为这有点深奥。

有没有办法让 Knir 将 R Markdown 中的方程渲染为图像，然后将生成的图像粘贴到我的最终文档中？我想到的用例是克服 MSFT 方程编辑器在编织到 Word/PowerPoint 时的一些缺点。如果方程只是一个图像，那么我可以在我的 MSFT 文档中拥有 LaTeX 质量方程，这将是非常棒的！

我发现的最接近的是using latex2exp https://cran.r-project.org/web/packages/latex2exp/vignettes/using-latex2exp.html并放入一个 R 代码块，生成一个图形，该图形实际上是渲染的 LaTeX 公式。我有点喜欢这种黑客，但是latex2exp有一些限制。

正如评论中提到的，webtex 是一个简单的解决方案。潘多克的--webtex当定位 docx 时，开关不起作用。但是，使用 Lua 过滤器可以达到相同的效果。

local mediabag = require 'pandoc.mediabag'
local utils = require 'pandoc.utils'

local function url_encode(str)
  local encode_char = function(c)
    return ("%%%02X"):format(string.byte(c))
  end
  return str
    :gsub("\n", "\r\n")
    :gsub("([^%w%-%_%.%~])", encode_char)
end

local function webtex_url(formula)
  return 'https://latex.codecogs.com/png.latex?' .. url_encode(formula)
end

function Math(el)
  local filename = utils.sha1(el.text) .. '.png'
  local mime, contents = mediabag.fetch(webtex_url(el.text), '.')
  mediabag.insert(filename, mt, contents)
  local img = pandoc.Image({}, filename)
  return el.mathtype == 'DisplayMath'
    and {pandoc.LineBreak(), img, pandoc.LineBreak()}
    or img
end

将其保存到文件中并通过以下方式将文件传递给 pandoc--lua-filter选项。它将通过 webtex 将所有方程转换为 png 图像。