我正在编写一个Flexdashboard,其中包含带有DataTable(DT)选项卡的数据框。当在DT和普通Flexdashboard选项卡上使用“ fillContainer=T”时,我可以获得所需的结果:我的数据表填满整个容器但不超出其范围。
Shinyapps.io : Flexdashboard Tabs with DT's fillContainer=T
我现在正在尝试使用由shiny动态生成的选项卡(使用
Flexdashboard Tabs with DT::FillContainer
======================
Column {.tabset .tabset-fade}
-----------------------------------------------------------------------
### iris
```{r}
DT::datatable(
iris,
fillContainer = T,
rownames = F)
```
### mtcars
```{r}
DT::datatable(
mtcars,
fillContainer = T,
rownames = F)
```
我现在正在尝试使用由shiny动态生成的选项卡(使用
tabsetPanel
)来代替flexdashboard选项卡。我尝试了有和没有使用fillContainer=T
两种方式,但是数据表格无法完全填充容器,要么太高要么非常短(少于2行)。在这两种情况下,分页选项显示在最后一行下面而不是容器底部。Shinyapps.io : Shiny Tabs with DT's fillContainer=T。Shiny Tabs with DT::fillContainer
======================
Column {.tabset .tabset-fade}
-----------------------------------------------------------------------
### Tabs container with fillContainer
```{r}
library(shiny)
tabsetPanel(
tabPanel("iris",
DT::datatable(
iris,
fillContainer = T,
rownames = F)),
tabPanel("mtcars",
DT::datatable(
mtcars,
fillContainer = T,
rownames = F))
)
```
Shinyapps.io : 不使用DT的fillContainer=T的Shiny标签页
Shiny Tabs without DT::fillContainer
======================
Column {.tabset .tabset-fade}
-----------------------------------------------------------------------
### Tabs container without fillContainer
```{r}
library(shiny)
tabsetPanel(
tabPanel("iris",
DT::datatable(
iris,
fillContainer = F,
rownames = F)),
tabPanel("mtcars",
DT::datatable(
mtcars,
fillContainer = F,
rownames = F))
)
```
有没有关于如何正确填充容器的想法? 非常感谢。