Rmarkdown如何将输出的多张图片调整为标签页形式展示

前提说明 #

• 仅支持HTML格式输出（tabset是HTML交互特性，PDF、Word等静态输出格式无法使用）
• 需使用最新版的rmarkdown包，确保支持.tabset属性

方法1：手动编写标签页（适合图片数量少、固定的场景） #

在需要放置标签页的位置写一个带.tabset属性的二级标题，之后每个三级标题对应一个标签页，每个标签页内插入对应图片即可：

## 图片展示 {.tabset}
### 图片1
```{r, echo=FALSE}
knitr::include_graphics("path/图1.png")

图片2 #

knitr::include_graphics("path/图2.png")

{.unnumbered} #

## 方法2：动态生成标签页（适合批量读取本地图片的场景，匹配你现有代码逻辑）
不需要手动编写每个标签页，通过`results='asis'`参数让R代码块直接输出Markdown语法的标题，自动生成所有标签页，完整代码如下：
```markdown
---
title: "标签页展示图片示例"
output: html_document
---

## 批量图片展示 {.tabset}
```{r, echo=FALSE, results='asis'}
# 读取路径下所有png图片，记得替换为你自己的实际路径
hf <- list.files("path/", ".png", full.names = TRUE)
# 遍历所有图片，动态生成标签页
for (i in seq_along(hf)) {
  # 用文件名作为标签名，可根据需求自定义
  tab_name <- basename(hf[i])
  # 输出三级标题，对应一个标签页
  cat("### ", tab_name, "\n\n")
  # 输出图片
  print(knitr::include_graphics(hf[i]))
  # 换行分隔不同标签块
  cat("\n\n")
}

{.unnumbered} #

### 代码说明
- 代码块必须加`results='asis'`参数，才能让R输出的内容被识别为Markdown语法
- 最后加的无内容二级标题`## {.unnumbered}`是为了结束tabset作用域，避免后续的二级标题也被自动纳入标签页系统

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