如何在R中使用tabPanel作为输入？

如果用户单击特定的

选项卡面板

，是否可以执行操作

例如，如果用户点击

选项卡面板（“A”，…）

，则会显示一个弹出窗口，显示

您正在查看选项卡“A”

tabsetPanel（）

将返回分配给活动

选项卡面板（）

的值。如果您只想更新另一个输出，可以执行以下操作：

用户界面

服务器.R

library(shiny)

shinyServer(function(input, output) {

    output$text <- renderText({paste0("You are viewing tab \"", input$tabs, "\"")})

})

库（闪亮）
shinyServer（功能（输入、输出）{
输出$text如果您使用的是闪亮的仪表板，
input$tabBox\u id
将找到活动选项卡名称。请参阅此处：
示例不起作用…未定义值！您的意思是输入$tabs而不是值$tabValue吗？对不起，这是我以前版本的答案遗留下来的。我已经更正了它。非常感谢您给出了清晰的答案。它是帮我解决了这个问题。
library(shiny)

shinyServer(function(input, output) {

    output$text <- renderText({paste0("You are viewing tab \"", input$tabs, "\"")})

})