R 在每个章节标题上方添加一个HTML块

我发现我们可以使用

---
output:
  bookdown::html_book:
    includes:
      in_header: style.css
---

并且在正文前和正文后也有

，如下所述：

但我不确定如何在HTML输出的每个章节标题的正上方插入一些文本或div。例如，我想要一个警告框，上面写着“警告：早期草稿”，并带有警告符号和指向其他页面的链接

同样，如何在每个部分（即html页面）的文本底部直接插入div

我可以使用
包含：
还是需要修改某种模板？我在bookdown pkg（）中看到提到了模板，但是如果这是我需要编辑的，那么我希望有一个与我的bookdown Rmd文件一起存在的模板来跟进，我与包作者确认了这个模板是硬编码的。他好心地建议我如何改变这一点，所以我选择了bookdown套餐。现在我们可以使用
\u output.yml
在每个章节标题上方插入文本和HTML，如下所示：

bookdown::gitbook:
  includes:
    before_body: xxxx.html

其中
xxx.html
是一个html文件，包含要插入标题上方的内容