如何使可格式化的输出表更宽？电阻

问题描述

我似乎无法回答这个问题，

我正在生成一些带有 formattable 的表格，并使用 tabBox() 函数将它们放入我的仪表板中。它们工作正常，但问题是桌子比面板小，而且看起来很奇怪。我怎样才能使桌子更宽？

输出：

期望的输出：

这是我的代码

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

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

# Tab 1

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

### Tab 1 Graph

# Tab 2

Column {data-width=450}
-----------------------------------------------------------------------
### Overview 2020 

```{r}
library(formattable)
top10 <- renderFormattable({formattable(head(mtcars,10))})
bot10 <- renderFormattable({formattable(tail(mtcars,10))})

tabBox(width=18,tabPanel("Tab1",top10),tabPanel("Tab2",bot10)
)
```




### Daily Breakdown



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 (将#修改为@）