Question

这是我处理导航栏的UI代码

# ui.R

shinyUI(

navbarPage(theme = "bootstrap.min.css", "My Application",
tabPanel("Engine"),
navbarMenu("Models", tabPanel("Model 1"),
tabPanel("Model 2")),
tabPanel("Summary Stats"),

主要标签项应为＆＃34;引擎＆＃34;，＆＃34;模型＆＃34;和＆＃34;摘要统计＆＃34;。模型选项卡应下拉2个选项，模型1和模型1.

当我点击＆＃34;模特＆＃34;什么都没发生。

Answer 1

    library(shiny)

shinyUI(

  navbarPage(theme = "bootstrap.css", "My Application",
             tabPanel("Engine"),
             navbarMenu("Models", tabPanel("Model 1"),
                        tabPanel("Model 2")),
             tabPanel("Summary Stats")
  )
)

似乎对我有用

使用R Shiny App的bootstrap在下拉列表中无法使用下拉菜单

1 个答案: