如何在 R Shiny 的 navbarPage 布局中移动导航选项卡？答案

【问题标题】：How do I move the navigation tabs in the navbarPage layout in R Shiny?如何在 R Shiny 的 navbarPage 布局中移动导航选项卡？
【发布时间】：2023-04-06 18:48:01
【问题描述】：

我在 R 方面经验丰富，但在任何类型的 Web 开发方面都没有。我正在尝试使用闪亮。

我只是对其进行测试，并为 UI 提供以下内容：

shinyUI(navbarPage("This is some awesome testing!!!",
                   tabPanel("Plot"),
                   tabPanel("Summary" ),
                   navbarMenu("More",
                              tabPanel("Table"),
                              tabPanel("About")
                   )
))

这会生成一个带有如下导航栏的页面，但请注意导航选项卡位于页面中间。有没有办法把它移到左边？所以它会一直靠在页面的左侧？

我刚刚注意到调整窗口大小会使其移动一些并有助于将其更多地向左移动，但是有没有办法让它“粘”在窗口的左侧？

我想有一些方法可以通过一些 css 或 html 或其他东西来强制它，但我什至不确定这些术语是否正确。同样，我在 Web 开发方面的经验为零。

谢谢！！

【问题讨论】：

标签： r shiny

【解决方案1】：

我认为你需要开始使用 css 来有效地修改默认的闪亮输出。在这里，看起来唯一需要修改的div 是第一个container。由于没有太多的css，用tags添加就相当容易了，

shinyApp(
    shinyUI(
        navbarPage("This is some awesome testing!!!",
                   tabPanel("Plot"),
                   tabPanel("Summary" ),
                   navbarMenu("More",
                              tabPanel("Table"),
                              tabPanel("About")
                              ),
                   tags$head(tags$style('
                       nav .container:first-child {
                           margin-left:10px; width: 100%;
                       }'))
                   )),
    shinyServer(function(input, output) {})
)

【讨论】：

太棒了。谢谢！