r - Shiny 的 tabsetPanel 不在多个选项卡中显示图

Question

我正在尝试使用多个 tabPanel tabsetPanel 内的控件在 Shiny .假设我使用以下代码从一个选项卡开始:

mainPanel(
    tabsetPanel(
    tabPanel("Plot",plotOutput("distPlot"))
    )

代码运行良好并在选项卡中显示绘图。

但是当我引入另一个选项卡只是为了测试选项卡时，两个选项卡都停止显示任何绘图。我正在使用以下代码:

mainPanel(
    tabsetPanel(
    tabPanel("Plot",plotOutput("distPlot")),
    tabPanel("Plot",plotOutput("distPlot"))
    )

请注意，我试图在两个选项卡中显示相同的图只是为了测试选项卡是否有效。我得到的只是两个空白选项卡(如果我只使用一个选项卡，则绘图正确显示)。

有人能帮我解决这个问题吗？

Answer 1

您分配 "distPlot"至 plotOutput的参数 outputId . “ID”表示这个值在整个 Shiny 的应用程序中必须是唯一的。您可以将相同的图分配给两个不同的 plotOutput虽然:

runApp( list(

  server = function(input, output) {
    df <- data.frame( x = rnorm(10), y = rnorm(10) )
    output$distPlot1 <- renderPlot({ plot( df, x ~ y ) })
    output$distPlot2 <- renderPlot({ plot( df, x ~ y ) })
  },

  ui = fluidPage( mainPanel(
    tabsetPanel(
      tabPanel( "Plot", plotOutput("distPlot1") ),
      tabPanel( "Plot", plotOutput("distPlot2") )
    )
  ))
))