闪亮的 tabsetPanel 占据全宽

【问题标题】：Shiny tabsetPanel take full width闪亮的 tabsetPanel 占据全宽
【发布时间】：2020-01-04 13:48:51
【问题描述】：

是否可以在 Shiny 中有一个 tabset 面板，其中 tabPanels 使用全宽？是否可以将nav-fill 类添加到tabsetPanel？还是不可能，因为 Shiny 是用 Bootstrap 3 构建的？

结果应该类似于https://getbootstrap.com/docs/4.0/components/navs/#fill-and-justify

library(shiny)

ui <- fluidPage(
  tabsetPanel(
    # class = "navlist-fill",
    tabPanel("Tab 1"),
    tabPanel("Tab 2"),
    tabPanel("Tab 3")
  )
)

server <- function(input, output, session) {}

shinyApp(ui, server)

【问题讨论】：

标签： r shiny

【解决方案1】：

您发布的链接很有意义，并且可能是一种更好的方式。我们可以制作一个自定义小部件来执行此操作。目前，这里有一个使用一些简单 css 的解决方法。

这里的 CSS 选择器非常通用，您可能应该更具体，但这里有一个想法。

library(shiny)

ui <- fluidPage(
  tags$head(
    tags$style(HTML("
      .nav li {
        width: 32vw;
      }
    "))),
  tabsetPanel(id = "tab_panel",
    tabPanel("Tab 1"),
    tabPanel("Tab 2"),
    tabPanel("Tab 3")
  )
)

server <- function(input, output, session) {}

shinyApp(ui, server)

【讨论】：