5

現在、shinydashboard を使用していますが、本体のコンテンツに関連付けられたさまざまなサイドバー メニューを使用したいと考えています。これはshinydashboardで可能ですか?

例えば：

私はこのようなものを持っていたいと思い ます https://gallery.shinyapps.io/CDCPlot/

ナビゲーション バーのオプションをクリックすると、サイドバー メニューと本文がどのように変化するかをご覧ください。

それはshinydashboardで可能ですか？私は光沢のあるダッシュボードのルック アンド フィールが好きで、むしろ光沢のあるダッシュボードには戻りたくありません。

基礎となるコードはこちら: https://github.com/NLMichaud/WeeklyCDCPlot/blob/master/ui.R

タブパネルとナビゲーションバーを使用します。シャイニーダッシュボードに似たようなものはありますか?

コードの例はありますか?

ありがとうございました！

4

2 に答える 2

3

Shinydashboard では、最上位のナビゲーション コントロールが dashboardSidebar (左側) 内にあり、コンテンツが dashboardBody (右側) 内に含まれているため、あなたが求めていることはトリッキーであり、不可能な場合があります。dashboardBody 内に navMenu を配置する場合、それは特定のサイドバー アイテムに属している必要があり、後で別のサイドバー アイテムをクリックすると消えてしまいます。

これを達成する方法を変更する必要があるかもしれません。やりたいことに応じて、次のことを試してください。

通常はトップメニューに表示されるメニュー項目を含むダッシュボードサイドバーを作成し、そのメニューのすべてのコントロールを関連付けられた tabItem の下に配置できます。renderMenu()in server.Rを使用して、すべてを動的にすることもできます。

output$menu <- renderMenu({
   sidebarMenu(id = "sidebMenu",
       menuItem("Load Data", tabName = "loadData", icon = icon("database"),
          actionButton("press", "Press me")
   )
})

これの欠点はおそらく、サイドバー メニュー内に配置できるコントロールの数が制限されていることです。しかし、これがダッシュボードの作り方です。

また

dashboardSidebar(disable = TRUE)あなたが言及した例と同様の方法で、サイドバーなしでフルスクリーンのダッシュボードを使用し、ナビゲーションメニューを使用します。Shinydashboard のサイドバーはなく、例のように独自のサイドバーを作成する必要があります。このようにして、通知、ボックス、スキン、ステータス ボックスなど、shinydashboard が提供する他の機能を引き続き楽しむことができます。ただし、これは単なる提案であり、あなた次第です。

お役に立てれば。

于 2016-04-21T05:53:30.430 に答える