Markdown 交互式标题R标记

我想在降价文档中添加交互式标题

假设我们有以下降价文件：

---
title: "Non-interactive header"
output: 
   html_document:
      toc: true
---

## 1 plot
```{r, echo=FALSE}
plot(1, 1)
```

## 2 plot
```{r, echo=FALSE}
plot(1, 1)
```

这将创建一个包含两个标题的html文档，分别称为“1打印”和“2打印”。每个标题后面都有绘图。但是，我希望基于变量以交互方式创建标题。根据此处的建议（）我提出了以下建议：

---
title: "Interactive header"
output: 
   html_document:
      toc: true
---

```{r, echo=FALSE, results = 'asis'}
for (i in paste(1:10, "plot")) {
  cat(paste("##", i), sep = "\n")
}
```

乍一看，这很有效。html文档由10个标题组成，称为1plot、2plot等。不幸的是，一旦我将代码添加到标题中，绘图仅显示在第二个标题之后，后续标题不再显示为标题

---
title: "Interactive header"
output: 
   html_document:
      toc: true
---

```{r, echo=FALSE, results = 'asis'}
for (i in paste(1:10, "plot")) {
  cat(paste("##", i), sep = "\n")
  plot(1, 1)
}
```

---

所以问题是：如何在每个交互标题中添加r代码？

我发现在绘图后添加两个换行符可以实现这一点

---
title: "Interactive header"
output: 
   html_document:
      toc: true
---

```{r, echo=FALSE, results = 'asis'}
for (i in 1:10) {
  cat(paste("## Plot", i), sep = "\n")
  plot(i, 1)
  cat("\n\n")
}
```