从 navbarPage 闪亮布局中删除多余的空白行

Question

我正在开发一个同时使用 navbarPage 和 sidebarPanel 布局的 Shiny 应用程序。但是，一个额外的空行一直附加在导航栏的正下方（见下图）。在 HTML 文件中，我可以清楚地看到罪魁祸首：

<div class="row">&nbsp;</div>

但是，我似乎无法弄清楚我的 R 代码的哪一部分导致创建了额外的行。作为参考，下面是说明问题的最少 ui.R 代码：

shinyUI(fluidPage(
  navbarPage('Minimum Example',
    tabPanel('Tab1',
      sidebarLayout(
        sidebarPanel(br()),
        mainPanel(br())
      )
    )
)))    

Answer 1

我不知道如何删除它，但将下面的样式信息添加到您的 css 文件将使导航栏和页面其他部分之间的差距整体变小。

.navbar {
  margin-bottom: 0px;
}

Answer 2

这个问题实际上是由于额外的   被默认添加到 header，如 here 所示。使用 navbarPage(header = "") 是一种避免这种情况的解决方法。

解决方案的全部功劳归于 wch and jjallaire in the Shiny development team. More details can be found here。