相关疑难解决方法(0)

我正在使用该软件包的开发版本开发一个Shiny应用程序,如此处所述.

当我使用navbarPage时tabsetPanel,一切都按预期工作:

library(shiny)

shinyUI(
    navbarPage("Page Title",

        tabPanel("Panel 1")
        tabPanel("Panel 2"),
        tabPanel("Panel 3"))
)

但是,当我添加navbarMenu到其中一个标签时:

library(shiny)

shinyUI(
    navbarPage("Page Title",

        navbarMenu("Menu",
            tabPanel("Panel 1.1"),
            tabPanel("Panel 1.2")),
        tabPanel("Panel 2"),
        tabPanel("Panel 3"))
)

文本"选项卡窗格活动"出现在应用程序的每个选项卡上,即使是不在内部的选项卡navbarMenu.似乎'tab-pane active'是一个CSS类,应该在div标签内,但不知何故,它在页面源代码中显示为纯文本.

有没有人知道造成这种情况的原因,或者如何修复它？

我希望能够创建多个页面,每个页面都有一组小部件下拉,单选按钮和绘制地图的空间.Shiny教程展示了如何创建多个页面

shinyUI(navbarPage("My Application",
  tabPanel("Component 1"),
  tabPanel("Component 2"),
  tabPanel("Component 3")
))

如何在每个页面中添加小部件,例如如何将以下内容添加到组件1？

  sidebarLayout(
    sidebarPanel(
        selectizeInput(
            'id', label = "Year", choices =   NULL,multiple=FALSE,selected="X2015",
            options = list(create = TRUE,placeholder = 'Choose the year')

        ),
        # Make a list of checkboxes
        radioButtons("radio", label = h3("Radio buttons"),
                     choices = list("Choice 1" = 1,
                                   "Choice 2" = 2)

和

     mainPanel(
        plotOutput("distPlot")
    )