R Markdown渲染PowerPoint时设置knitr选项无法正常渲染循环图表

这个现象不是echo=FALSE选项本身的bug，是knitr的绘图自动捕获逻辑在PowerPoint输出格式下的机制限制：

• 当你使用全局块选项自定义配置时，knitr默认只会捕获代码块最终返回的绘图对象，循环内部生成的中间绘图不会被自动收集，因此仅输出第一张图
• 未手动设置块选项时knitr会启用宽松的自动捕获规则，所以能输出全部图表，但这种模式下无法隐藏源码、告警等冗余输出
• HTML格式的输出规则对多图的容忍度更高，所以不会出现只出第一张的问题，但PowerPoint要求每张图对应独立幻灯片元素，捕获规则更严格

以下两种方案都可以和echo=FALSE、warning=FALSE等块选项完美兼容，不需要放弃冗余内容隐藏的配置：

方案1：循环内显式调用print包裹绘图命令（最稳定，全场景通用） #

knitr对显式print返回的绘图对象会完整捕获，不受输出格式、块选项配置影响，把绘图循环的代码改成如下写法即可：

n <- 7
for(i in 1:n){
  # 所有绘图命令不管是base plot还是ggplot2、lattice，都用print包裹
  print(plot(c(1:i)))
}

这个写法是knitr官方推荐的循环生成输出的标准写法，适配所有R Markdown输出格式，PowerPoint下会自动把每张图放到独立幻灯片页面。

方案2：给代码块添加fig.keep='all'块选项 #

如果不想修改循环内部的代码，可以直接给生成绘图的代码块添加fig.keep='all'参数，强制knitr收集代码执行过程中生成的所有绘图对象：

n <- 7
for(i in 1:n){plot(c(1:i))}

如果要全局生效，也可以直接把这个配置加到全局块选项里：

knitr::opts_chunk$set(echo = FALSE, warning = FALSE, fig.keep = 'all')

• 两种方案同时使用稳定性最高，不会出现漏图、多图叠加的问题
• HTML输出需要把每张图放到独立标签页的需求，可以通过在章节标题后添加{.tabset}属性实现，每张图对应一个二级标题即可自动生成标签页结构

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