如何从闪亮的应用程序中调用闪亮的应用程序

Question

我想构建一个仪表板。每个标签项都会调用一个闪亮的应用。 我看到网上有一些建议，包括模块和iframe。

但是，这在我目前的框架中不起作用。我的仪表板主体使用uioutput。

body <- dashboardBody(
        shinyjs::useShinyjs(),
        tags$head(tags$link (rel = "stylesheet", type = "text/css", href = "custom.css")),
        uiOutput("sideTabs"))

所以在我的服务器上.R。我写这样的代码：

output$sideTabs <- renderUI({ tabItems( tabItem(tabName="dashboard",h2("adsf")), tabItem(tabName="gold",source(file.path("apps", "xxx", "ui.R"), local = TRUE)$value) )

但它不起作用。对于小应用程序，我使用闪亮图库（https://shiny.rstudio.com/gallery/kmeans-example.html）中的示例代码。

任何人都可以提供一些想法吗？我好几天都对这个问题感到困惑。