微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

为什么我的 DT 表不生成 tabBox/tabPanel?

如何解决为什么我的 DT 表不生成 tabBox/tabPanel?

这是一个我似乎无法解决的问题,我不确定它为什么会发生。

我的目标是使用 tabBox 将各种表格放在一个“flexdashboard 区域”中,而使用 {.tabset} 不是一种选择。但似乎当我开始使用 tabPanels 时 - 只有第一个面板会生成我的 DT 表,而第二个不会。表的标题正在生成,但我无法弄清楚为什么实际数据不会。

如有任何帮助,我将不胜感激。

这是我看到的: 表 1

enter image description here

表2

enter image description here

这是我的代码

---
title: "Example Demo Dash"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
runtime: shiny 
---


# Tab 1

```{r setup,include=FALSE}
library(readr)
library(DT)
library(dplyr)
library(rsconnect)
require(flexdashboard)
library(shiny)
library(shinydashboard)
require(plotly)
```

Column 
-----------------------------------------------------------------------

### Tab 1 Graph

# Tab 2

Column {data-width=450}
-----------------------------------------------------------------------

### Cars Tab 1  

```{r}


cars <- datatable(mtcars,rownames = FALSE,options = list(
            dom = 't',paging = FALSE,info = FALSE,scrollY = FALSE,sort = FALSE
            
      )
) 


iris <- datatable(mtcars,sort = FALSE
            
      )
) 
```

```{r}
tabBox(width=18,height = "500px",#Dec 2020
       tabPanel("Cars 1",cars),#Jan 2021
       tabPanel("Iris",iris))
```


### Col 2 Row 2


Column {data-width=200}
-----------------------------------------------------------------------

### Tab 2 Col 2 Graph 1

### Tab 2 Col 2 Graph 1

### Tab 2 Col 2 Graph 3

### Tab 2 Col 2 Graph 3

Column {data-width=350}
-----------------------------------------------------------------------
### Col 3 graph 1

### Col 3 graph 2

# tab 3

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。