gpt4 book ai didi

r - 使用操作按钮转到另一个选项卡

转载 作者:行者123 更新时间:2023-12-04 12:29:33 24 4
gpt4 key购买 nike

我有以下 Shiny 的应用程序:

ui <- fluidPage(
tabsetPanel(
tabPanel("Tab 1",
actionButton("switch_tab", "Go to the second tab")
),
tabPanel("Tab 2", "there!"),
tabPanel("Tab 3", "there!"))

)

server <- function(input, output, session) {

observeEvent(input$switch_tab, {
updateTabsetPanel(session, "inTabset",
selected = "Tab 3")
})

}
shinyApp(ui = ui, server = server)

当我单击“转到第二个选项卡”按钮时,它基本上应该切换选项卡。然而,它不起作用。

关于我可能忽略的任何反馈?

最佳答案

您需要添加 id到tabsetpanel

library(shiny)
ui <- fluidPage(
tabsetPanel(
id="inTabset",
tabPanel("Tab 1",actionButton("switch_tab", "Go to the third tab")
),
tabPanel("Tab 2", "there!"),
tabPanel("Tab 3", "there!"))

)

server <- function(input, output, session) {

observeEvent(input$switch_tab, {
updateTabsetPanel(session, "inTabset",selected = "Tab 3")
})

}
shinyApp(ui = ui, server = server)

关于r - 使用操作按钮转到另一个选项卡,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/49656824/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com