柔性仪表板宽桌卷成边条

Question

我在一个通过显示的中有一个宽桌子。浏览器中有一个滚动条，但是如果您将表滚动到右边，它将进入侧栏。我如何使它隐藏在侧边栏后面，或者把它保存在它的div单元格中？

这是MWE：

---
title: 'TEST'
output: 
  flexdashboard::flex_dashboard:
runtime: shiny
---

```{r}

图书馆(柔性仪表板)

图书馆(ShinyWidgets)

图书馆(闪亮)

图书馆(Shinyjs)

图书馆(弦I)

Inputs {.sidebar  data-width=250} 
-----------------------------------------------------------------------

```{r, echo = FALSE}

fileInput(‘File_ CSV’，标签$b(‘选择CSV文件’)，accept=c('.csv'))

Column{data-width=300}
-----------------------------------------------------------------------
```{r, echo = FALSE}

set.seed(10)

X <-唯一(stringi：：stri_rand_strings(100，3，‘A’))

x2 <- setNames(as.data.frame(矩阵(1:10，10*长度( x)，T)，ncol =length(X))，x)

renderTable(x2)

​

​

Answer 1

我们可以使用使用.sidenav类的自定义css样式来创建自己的侧栏，因为这超出了主体的内容，与.sidebar不同。然后简单地将表的内容推到右边，这样边栏就不会覆盖表的前几列，我们使用.table类中左边的边距来实现这一点。在其他属性中添加背景颜色和宽度，使其看起来像您创建的侧栏。

---
title: 'TEST'
output: 
  flexdashboard::flex_dashboard:
  runtime: shiny
---

```{r}

图书馆(柔性仪表板)

图书馆(ShinyWidgets)

图书馆(闪亮)

图书馆(Shinyjs)

图书馆(弦I)

Inputs {.sidenav data-width=250} 
-----------------------------------------------------------------------

```{r, echo = FALSE}

fileInput(‘File_ CSV’，标签$b(‘选择CSV文件’)，accept=c('.csv'))

Column{data-width=300}
-----------------------------------------------------------------------
```{r, echo = FALSE}

set.seed(10)

X <-唯一(stringi：：stri_rand_strings(100，3，‘A’))

x2 <- setNames(as.data.frame(矩阵(1:10，10*长度( x)，T)，ncol =length(X))，x)

renderTable(x2)

<style type="text/css"> 
  .sidenav { 
    overflow-y: hidden;  
    height: 100%;
    width: 250px;
    position: fixed;
    z-index: 1;
    top: 0;
    left: 0;
    background-color: #dde6f0;
    padding-top: 50px;
    padding-right: 10px;
    padding-left: 10px;
  }

  .table {
    margin-left:250px;
  }

</style>

​

​