有没有办法让 actionButton() 导航到 R Shiny 应用程序中的另一个选项卡？

【问题标题】：Is there any way for an actionButton() to navigate to another tab within a R Shiny application?有没有办法让 actionButton() 导航到 R Shiny 应用程序中的另一个选项卡？
【发布时间】：2016-12-07 00:18:49
【问题描述】：

我的 R Shiny 应用程序中有多个选项卡，但还没有找到让我的操作按钮导航到另一个选项卡的方法。

第一个选项卡以“提交信息”操作按钮结束，目标是在用户提交后打开“结果”选项卡。如果有人可能有一些可以实现这一点的伪代码，那么任何东西都会非常有帮助。

【问题讨论】：

先分享你的代码/解决方法。

标签： r shiny action-button

【解决方案1】：

您好，您可以使用updateTabsetPanel 来执行此操作，您必须在您的tabsetPanel 中添加一个ID（如果您使用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)

如果您使用navbarPage 或shinydashboard，它的工作方式相同

【讨论】：

这段代码最终成功了！非常感谢您的帮助！