Question

假设您有一个带有这样的导航栏的用户界面：

shinyUI(navbarPage("Shiny APP",
      tabPanel("Welcome",
               p("Welcome!")),
      navbarMenu("Kapitel 1",
                 tabPanel("PANEL 1",withMathJax(),
                          h3("Topic 1"),
                          fluidRow(column(4),column(8)),
                          fluidRow(column(12))
                 ),
                 tabPanel("PANEL 2",withMathJax(),
                          h3("Topic 2"),
                          fluidRow(column(4) ,column(8))
                 ))                 
)

显然，在＆＃34; Panel 1＆＃34;和＆＃34;第2小组＆＃34;我会显示不同的输出。如何在server.R中执行代码，具体取决于哪个Panel处于活动状态？

假设我有两个不同的情节。如果Panel 1处于活动状态，则R应该只执行第一个Panel / Plot的所有代码。如果Panel 2处于活动状态，则R应该只执行第二个Panel / Plot的所有代码。

我希望我说清楚：/

Answer 1

我有类似的问题，我可以写if(navbarMenu==1)（例如）。要实现这一点，您应该为每个tabPanel tabPanel("PANEL 1",value=1, ...)

撰写

根据活动的tabPanel在server.R中执行代码？

1 个答案: