r - 如何在 RMarkdown 中生成带有标题的分页表？

Question

我有一个 data.frame我想以格式化的方式在 RMarkdown 文档(HTML 输出)中打印。我需要 3 个我无法同时获得的功能:

它需要在顶部有一个标题或标题来解释它是什么。

由于它可能很长，我希望它可以滚动或分页

标题和列标题应始终在顶部可见，即使表格已滚动或分页

我可以通过 kableExtra 轻松滚动获得标题:

library(kableExtra)
cars %>%
    kable(caption = 'Cars') %>%
    kable_styling(bootstrap_options = c('striped', 'condensed')) %>%
    scroll_box(width = "500px", height = "200px")

但是当我向下滚动时，标题和列标题也会滚动，并且很难看到每一列是什么。

通过添加 df_print: paged到 YAML header ，我可以从默认打印行为中获得非常漂亮的分页输出(请参阅 R Markdown: The Definitive Guide ):

---
title: "Motor Trend Car Road Tests"
output:
  html_document:
    df_print: paged
---

```{r}
cars
```

但是，据我所知，没有办法在上面加上标题或说明。我可以使用 Markdown 添加标题，但是生成表格的代码会卡在标题和表格之间。我还缺少其他任何选项吗？

Answer 1

我建议尝试 DT::datatable ，它会在 html 输出中生成高度可配置的表格。

以下代码将创建一个带有固定标题的可滚动表格。

DT::datatable(mtcars, 
         extensions = c('FixedColumns',"FixedHeader"),
          options = list(scrollX = TRUE, 
                         paging=FALSE,
                         fixedHeader=TRUE))