我有几个闪亮的应用程序,现在我想为这些应用程序创建一个仪表板。我不想更改原始应用程序。只想创建另一个ui.R和server.R。并将其他应用程序集成到其中。像下面的结构一样。
#ui.R
ui <- dashboardPage(
dashboardHeader(title = "App User Analyse"),
dashboardSidebar(
sidebarMenu(
menuItem("Dashboard", tabName = "dashboard", icon = icon("dashboard")),
menuItem("Widgets", tabName = "widgets", icon = icon("th"))
)
),
dashboardBody(
tabItems(
# First tab content
tabItem(tabName = "Dashboard",
***app1***
),
# Second tab content
tabItem(tabName = "widgets",
***app2***
)
)
)
)
我是闪亮而闪亮的服务器新手。我不确定是否有办法实现这一目标。如果是的话,任何人都可以给我一个小例子吗?谢谢!
答案 0 :(得分:1)
我的第一直觉是你不能简单地将所有应用程序代码复制到一个地方并希望它能够正常工作,你必须做一些工作才能将它们整合在一起。例如,如果您的两个应用程序的输入字段ID为“foo”,那么您不能在一个shinydashboard应用程序中更改它们,因为您不能拥有多个具有相同ID的元素。这只是一个非常简单的例子,说明为什么你不能简单地将所有代码连接在一起。