Quarto转Word文档图片自动缩放，求适配页面空间的解决方案

嘿，刚好我之前也踩过Quarto转Word时图片自动缩放的坑，结合你在用横向页面Lua滤镜的场景，给你几个精准适配的解决方案：

Quarto的Word渲染逻辑和Rmarkdown有差异，旧的Rmarkdown yaml设置（比如fig.width）经常不生效，最靠谱的方式是用Pandoc Lua滤镜直接干预Word输出的图片属性，还能和你现有的横向页面滤镜完美配合。

方案1：自定义图片适配Lua滤镜（推荐） #

创建一个名为docx-image-fit.lua的滤镜文件，自动根据页面方向（纵向/横向）调整图片宽度，填满页面可用空间：

-- docx-image-fit.lua
function Image(img)
  -- 跳过标记为不需要适配的图片（可选）
  if img.classes:includes("no-fit") then
    return img
  end

  -- 获取当前页面方向（从横向滤镜传递的变量读取）
  local orientation = quarto.docx_page_orientation or "portrait"
  -- 自定义页面边距（根据你的Word模板调整，默认1英寸）
  local margin = 1
  local page_width

  -- 根据页面方向计算可用宽度
  if orientation == "landscape" then
    page_width = 11 - 2*margin -- 横向页面总宽11英寸，减去左右边距
  else
    page_width = 8.5 - 2*margin -- 纵向页面总宽8.5英寸，减去左右边距
  end

  -- 设置图片宽度为页面可用宽度，自动保持比例
  img.attributes["width"] = page_width .. "in"
  img.attributes["height"] = nil -- 移除固定高度，避免拉伸变形

  return img
end

配合你的横向页面滤镜 #

需要稍微修改你现有的docx-landscape.lua，添加一个变量传递页面方向，让图片滤镜能识别当前页面是横向还是纵向：

-- 修改后的docx-landscape.lua
function Div(el)
  if el.classes:includes("landscape") then
    el.attributes["custom-style"] = "Landscape"
    -- 传递页面方向变量给图片滤镜
    quarto.docx_page_orientation = "landscape"
    return el
  else
    quarto.docx_page_orientation = "portrait"
    return el
  end
end

在Quarto文档中启用滤镜 #

在你的.qmd文件开头的yaml配置里，同时引用两个滤镜：

format:
  docx:
    lua-filter:
      - docx-landscape.lua
      - docx-image-fit.lua

方案2：单张图片的手动控制（应急用） #

如果只是个别图片需要调整，不需要全局滤镜，可以直接在图片标记里设置out.width为页面可用宽度：

-- 纵向页面图片，填满宽度
![纵向测试图](test.png){out.width="6.5in"}

-- 横向页面图片，填满宽度
::: {.landscape}
![横向测试图](wide_plot.png){out.width="9in"}
:::

（注：6.5=8.5-21，9=11-21，对应前面设置的1英寸边距）

测试验证 #

在文档里插入不同方向的图片，渲染成Word后检查：

• 纵向页面的图片会自动填满纵向页面的可用宽度
• 横向区块里的图片会适配横向页面的宽度
• 给图片加.no-fit类可以跳过自动适配：![不需要缩放的图](small.png){.no-fit}

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