いくつかの光沢のあるアプリがあり、これらのアプリのダッシュボードを作成したいと考えています。元のアプリを変更したくありません。別の 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***
)
)
)
)
私は光沢のある光沢のあるサーバーが初めてです。これを達成する方法があるかどうかはわかりません。はいの場合、誰かが私に小さな例を教えてくれますか? ありがとうございました!