当我运行该应用程序时,我希望tab 2单击 ,这样我就可以先看到它,而不是tab 1。我怎样才能这样做呢?
# USER INTERFACE
ui <- fluidPage(
mainPanel(
tabsetPanel(
tabPanel("tab 1"),
tabPanel("tab 2"),
)
)
)
# SERVER
server <- function(input, output) {
}
shinyApp(ui = ui, server = server)
Run Code Online (Sandbox Code Playgroud)
尝试:
tabSetPanel(tabPanel("tab1"), tabPanel("tab2"), selected="tab2")
Run Code Online (Sandbox Code Playgroud)