Shiny &引用;选项卡窗格处于活动状态";将navbarmenu用作navbarpage中的第一项时的输出

Shiny &引用;选项卡窗格处于活动状态";将navbarmenu用作navbarpage中的第一项时的输出,shiny,Shiny,如果navbarMenu是navbarPage中的第一项,我将在浏览器中获得“选项卡窗格活动”输出。这是一个众所周知的问题。我找不到解决办法,也找不到解决办法(如果有的话),因此这篇文章。感谢您的帮助 使用0.11.1 shinyUI(navbarPage("Regression", windowTitle = "Regression", navbarMenu("Data", tabPanel("Upload", fluidRow(

如果
navbarMenu
navbarPage
中的第一项,我将在浏览器中获得“选项卡窗格活动”输出。这是一个众所周知的问题。我找不到解决办法,也找不到解决办法(如果有的话),因此这篇文章。感谢您的帮助

使用0.11.1

shinyUI(navbarPage("Regression", windowTitle = "Regression",
    navbarMenu("Data",
        tabPanel("Upload",
            fluidRow(
                column(12,
                       fileInput("csv_file", "Choose CSV Data File to Upload",
                                 accept = c("text/csv",
                                            "text/comma-separated-values",
                                            ".csv"))
                )
            ),
            tags$hr(),
            dataTableOutput("csv_data_table")
        ),
        tabPanel("Summary",
            fluidRow(
                column(4, offset = 4,
                       numericInput("datasummary_numobs_numeric",
                                    "No. of Obs.",
                                    value = NULL) #max = 6.0
                )
            ),
            tags$hr(),
            dataTableOutput("datasummary_data_table")
       )
    )
))