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

Question

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

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

Answer 1

嗨，您可以updateTabsetPanel这样做，您必须在您的tabsetPanel（如果您使用 a tabsetPanel）中添加一个 id 并添加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)

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