R Markdown函数绘图fig.height参数不生效问题求助

你遇到的核心问题是：代码块的fig.height选项仅对当前代码块内执行的绘图操作生效，而非绑定到函数本身。你在定义plot1和plot2的代码块里设置的高度参数，只会影响该代码块执行时生成的图（但你的函数定义里并没有即时触发绘图，而是在后续代码块调用函数才完成绘图），所以实际绘图时根本没用到这些预设的尺寸。

解决方案1：拆分绘图代码块（推荐） #

把两个函数的调用分别放到独立的代码块中，给每个代码块单独设置对应的fig.height选项：

# 仅定义函数，不设置绘图尺寸
plot1 <- function(cars) {
  summary(cars)
  plot(cars$dist, cars$speed)
}

# 原函数中x参数被内部覆盖，可简化定义
plot2 <- function() {
  x <- rnorm(100)
  hist(x)
}

# 调用plot1，用高度2绘图
plot1(cars)

# 调用plot2，用高度7绘图
plot2()

这种方式最直观，每个绘图操作的尺寸由所在代码块的选项明确控制，便于维护和调试。

解决方案2：在同一代码块中动态调整选项 #

如果必须在同一个代码块中完成两次绘图，可以用knitr::opts_current$set()临时修改当前代码块的绘图选项，分别控制两幅图的尺寸：

# 绘制第一幅图，设置高度为2
knitr::opts_current$set(fig.height = 2)
plot1(cars)

# 重新设置绘图高度为7，绘制第二幅图
knitr::opts_current$set(fig.height = 7)
plot2()

注意：这种方式依赖knitr的选项动态调整，需要确保两次绘图操作之间选项设置生效，适合必须合并代码块的场景。

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