将滚动条添加到 DataTable 的一侧(封装 DT)

Add Scroll to Side of DataTable (Package DT)

我已经通过 RMarkdown 创建了一个 flexdashboard。在我的 Rmarkdown 文档中,我想从 DT 包中添加一个 datatable,它可以使您的 table 具有交互性。我遇到的问题是,当我创建它时,侧面没有滚动条可以上下滚动 table。我知道我需要实现此 link 中提供的 javascript 但我不确定如何使用 RMarkdown 实现 javascript:https://datatables.net/examples/basic_init/scroll_xy.html

我尝试使用 scrollY,但是当我这样做时 header 对齐完全关闭。

下面是示例代码,完全可以重现,因为我也在使用 mtcars 数据集。

---
title: "Morning Reportab"
date: "`r format(Sys.time(), '%d %B, %Y')`"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
---

```{r setup, include=FALSE}
library(flexdashboard)
library(DT)
```

Row
-----------------------------------------------------------------------

### AGORA {data-height=170}

```{r}
datatable(mtcars)
```

Row
-----------------------------------------------------------------------


### Chart B {data-height=170}

```{r}
datatable(mtcars)
```

Row
-----------------------------------------------------------------------


### Chart C

```{r}
datatable(mtcars)
```

这是输出截图:

如何在此 rmarkdown 中的每个 table 的侧面添加滚动条?

任何帮助都会很棒,谢谢!

如果您安装了最新版本的软件包 DT (>= 0.2),则默认情况下应添加滚动条。 如果不是这种情况,您可以通过

全局编辑选项fillContainer
options(DT.fillContainer = T)

如果您只想编辑特定的表格,您可以按照

datatable(myData, fillContainer = T)