始める無料で始める

ヘッダーの設定

動画では、ヘッダーはレストランの看板やフロントに例えられていました。

ヘッダーでは、shinydashboard のタイトルを定義し、さらに要素を追加できます。特に、さまざまな種類のドロップダウンリストと、その中に含めるさまざまなアイテムを見ました。

この演習では、世界的なサッカー大会の各種統計をすでに分析したと想定します。これらの結果を提示するためにダッシュボードを作成したいと考えています。まずはヘッダーを設定しましょう。

shiny と shinydashboard パッケージはすでに読み込まれています。

この演習はコースの一部です

shinydashboard で作るダッシュボード

コースを見る

演習の手順

  • title を "Analysis results for global soccer tournament" に設定します。
  • タイトル幅を 400 に設定します。
  • type が "messages" のドロップダウンリストを 1 つ作成し、メッセージアイテムを 1 つ含めます。
  • type が "notifications" のドロップダウンリストをもう 1 つ追加し、通知アイテムを 1 つとタスクアイテムを 1 つ含めます。

実践的なインタラクティブ演習

このサンプルコードを完成させて、この演習に挑戦してみましょう。

header <- dashboardHeader(
  # Set the title as "Analysis results for global soccer tournament"
  ___,
  # Set the title width to 400
  ___,
  # Add a dropdown menu containing two messages
  dropdownMenu(type = ___,
       ___("Colleague", "Hello world!")),
  # Add another dropdown menu containing two other items
  ___(___,
       ___("Have you rested today?"),
       ___("Dashboard completion", value = 20)))
sidebar <- dashboardSidebar(); body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body); server <- function(input, output){}
shinyApp(ui, server)
コードを編集して実行