访问嵌套的输出元素

时间:2014-04-04 16:10:10

标签: r shiny

我正在计划一个更大的Shiny应用程序,我想知道是否有更加结构化的方式来访问shinyServer的输出元素而不是调用唯一的outputId。我的应用程序可能如下所示:

library( shiny )
library( ggplot2 )

runApp( list(

  server = function(input, output) {
    output$explore_pca_main_projection_plot <- renderPlot({
      print( qplot( x = x, y = y, data = data.frame( x = 1:10, y = rnorm(10) ), geom="point" ) )
    })
  },

  ui = navbarPage( "MyApp",
    navbarMenu( "Explore",
      tabPanel( "PCA",
        sidebarLayout(
          sidebarPanel(),
          mainPanel(
            tabsetPanel( id = "explore_pca_main",
              tabPanel( "Projection", plotOutput( outputId = "explore_pca_main_projection_plot" ) ),
              tabPanel( "Loadings" ),
              tabPanel( "Variances" )
  ))))))

))

无法通过它的层次结构访问元素output$explore_pca_main_projection_plot吗?我在考虑像

这样的东西
output$Explore$PCA$Projection$plotOutput[[1]]

与此类似的(工作)解决方案至少可以避免让很多outputId对于自包含的代码都是多余的。

感谢任何帮助。

0 个答案:

没有答案