r - 使用 kable 在表格下方添加另一个标题

Question

在 R markdown 中，编织成 PDF，kable 允许包含一个“标题”(实际上是一个表格标题)，但我想在下方添加另一个标题 较小字体的表格。任何想法如何做到这一点？ (我不想只在主 Markdown 文档中添加下面的文本，因为它是数字而不是表格 float 的一部分)。

下面是一些代码示例:

library(knitr)
name <- c('Na~2~O', 'Ca', 'Ba')
value <- c(2,3,5)
data <- data.frame(name, value)
rownames(data) <- data[,1]
data$name <- NULL
kable(data, format = "pandoc", caption = 'some title')

Answer 1

使用 kable 函数，以下是如何从该页面执行此操作:https://haozhu233.github.io/kableExtra/awesome_table_in_html.html

该页面通常只是一个很好的资源。以下是他们对脚注的看法:

There are four notation systems in footnote, namely general, number, alphabet and symbol. The last three types of footnotes will be labeled with corresponding marks while general won’t be labeled. You can pick any one of these systems or choose to display them all for fulfill the APA table footnotes requirements.

kable(dt, align = "c") %>% 
kable_styling(full_width = F) %>%
footnote(general = "Here is a general comments of the table. ",
       number = c("Footnote 1; ", "Footnote 2; "),
       alphabet = c("Footnote A; ", "Footnote B; "),
       symbol = c("Footnote Symbol 1; ", "Footnote Symbol 2"))