ete*_*ler 3 r shiny action-button
我的R Shiny应用程序中有多个选项卡,但还没有发现让操作按钮导航到另一个选项卡的方法。
第一个选项卡以“提交信息”操作按钮结尾,目标是在用户提交后打开“结果”选项卡。如果有人可能使用伪代码来实现此目的,那么任何事情都会非常有帮助。
嗨,您可以使用它updateTabsetPanel来执行此操作,您必须在您的服务器上放置一个ID tabsetPanel(如果使用tabsetPanel),然后将其添加session到服务器函数中:
library("shiny")
ui <- fluidPage(
tabsetPanel(
id = "tabs",
tabPanel(
title = "params",
actionButton(inputId = "submitInfo", label = "submit info")
),
tabPanel(
title = "result",
"result"
)
)
)
server <- function(input, output, session){
observeEvent(input$submitInfo, {
updateTabsetPanel(session = session, inputId = "tabs", selected = "result")
})
}
shinyApp(ui = ui, server = server)
Run Code Online (Sandbox Code Playgroud)
如果您使用navbarPage或shinydashboard它的工作方式相同