フォーマットでdashboardを指定する
---
format: dashboard
---Quartoでは、文書、プレゼンテーションに加えて、ダッシュボードを作成することができます。ダッシュボードとは、数値や統計の結果などを一覧として表示するためのHTMLを指す言葉で、通常は動的なデータ(例えば特定の株式会社の株価や毎日のプロ野球の試合の結果など)を表示するのに用いられます。ダッシュボードの例として、以下のようなものがQuartoのGallaryに示されています。
ダッシュボードには数値やグラフが表示されます。この数値やグラフの値がいつも同じなら(例えば、いつ見ても同じ日の株価が表示されていれば)、誰もそのダッシュボードに興味を抱かないでしょう。したがって、何らかの方法で表示される値やグラフが変化する、動的な仕組みが必要です。
Quartoに動的な仕組みを持ち込む方法には、以下のようなものがあります。
leafletやplotly、htmlwidgetsなどの動的なライブラリを利用するShinyについては47章で説明しています。また、plotlyに関しては27章、leafletに関しては45章で説明しています。この章では主にダッシュボードの構造とObservableについて説明します。
ダッシュボードの構造は基本的にはHTMLの構造に準じますが、ページのレイアウトについては通常のHTMLとはかなり異なります。
ダッシュボードを作成する場合には、YAMLにformat: dashboardを指定します。
フォーマットでdashboardを指定する
---
format: dashboard
---ダッシュボードのレイアウトは、2種類のヘッダー(## Rowと## Column)で指定します。## Rowは横方向に長く、縦に並べた構造、## Columnは縦方向に長く、横に並べた構造を取るのに用います。
まずは## Rowについて説明します。## Rowでは、それぞれの行に示したい内容をヘッダー以下に示します。
Rowのレイアウト
## Row
contents1
## Row
contents2また、## Row以下に## Columnを指定することで、以下のように1つの行に横並びにレイアウトを行うこともできます。
Columnのレイアウト
## Row
contents1
## Row
## Column
contents2
## Column
contents3また、ヘッダーの後ろに{width=XX%}、{height=XX%}を付け加えることで、RowやColumnの幅や高さを指定することができます。
上記のようにMarkdownを書くだけの場合には、要素(カード(cards)と呼びます)ごとの区切りとしてヘッダー(## Row、## Column)を明確に示す必要がありますが、コードブロックや後で説明するValue boxは1つのカードとして評価され、ヘッダーを間に置かなくてもカードとして評価されます。
コードブロックをカードとする
## Row
```{r}
plot(cars)
```
## Column
```{r}
plot(iris)
```
```{r}
knitr::kable(iris |> head(5))
```タブで複数の要素を表示する場合には、ヘッダーの後ろに{.tabset}を追加します。通常のQuartoのように:::は必要ありません。
タブでデータを表示する
## Row {.tabset}
```{r}
plot(cars)
```
```{r}
plot(iris)
```また、メニューバー(navbar)にタブを設定することもできます。メニューバーには、# header1で記載した要素がタブとして示されます。
navbarにページを表示する
# Cars
```{r}
plot(cars)
```
# Iris
```{r}
plot(iris)
```カードのタイトルは、chunk optionとしてtitleに設定します。
カードのタイトルを表示する
```{r}
#| title: cars
plot(cars)
```
```{r}
#| title: iris
plot(iris)
```また、以下のように{.card}を用いてカードを設定することもできます。この{.card}を用いる場合、titleをブランケット({})の中に書くことで指定できます。
カードを作成する
:::{.card title="独立したカード"}
カードの中身
:::value boxとは、特定の値などを大きく表示する場合に用いるもので、以下の図のようなものです。
value boxを表示する場合、以下のようにchunkにcontent: valueboxを設定します。value boxの値はリストで設定し、名前をvalueとします。value boxにはiconを表示させることができます。iconはbootstrap iconsから選択して指定します。value boxの色はcolorを指定することもでき、primary、secondaryなどから選択、もしくはカラーコードを指定します。
value boxを使用する
```{r}
#| content: valuebox
#| title: "人口(千人)"
list(
icon = "buildings",
color = "primary",
value = pop
)
```動的なウェブサイトを作成する場合、上に記載した通りShinyなどのWebアプリケーションを用いるのが一般的です。Webアプリケーションとは、ウェブサイトで入力した内容に従い、サーバーと呼ばれるコンピュータで演算を行うことで、表示させるウェブページを動的に変化させることができるようにする仕組みを指します(詳しくは47章で説明します)。
Quartoでは、Shinyを用いて動的なHTMLを作成することができます。ただし、Shinyを用いた場合、サーバーで演算を行う必要があります。Shiny専用のサーバーとしてShinyapps.ioというものを無料で用いることができますが、無料だけにサーバーの計算能力は低く、あまりレスポンスのいいものではありません。
そもそもQuartoは静的なHTML、つまりサーバーの演算能力を必要としないHTMLを作成することを前提として作成されています。ですので、できればサーバーの演算能力を用いず、動的に見えるHTMLを作成したいところです。
動的に見えるHTMLとしては、上で紹介したように27章で説明したplotly、45章で説明するleafletがあります。これらを用いることでサーバーで演算を行うことなく動的なHTMLを作成することができます。
動的に見えるHTMLを作成する別の方法として、Observableがあります。ObservableはD3.jsを開発したDr. Mike Bostockが開発している一連のツールで、Jupiter notebook風のObservable Notebooks、ダッシュボード風のObservable Canvasesの2つを提供しているWebサービスです。ObservableはD3.jsのグラフを比較的簡単な手順で描画できる、Javascriptベースのサービスとなっており、Rユーザーでも比較的簡単にJavascriptを使い、グラフを作成できるようになっています。
具体的には私が作成したノートやチュートリアル、グラフのギャラリーを参考にしてください。
Quartoでは、このObservableのチャンクを作成し、(動的に見える)静的なダッシュボードや文書を作成することができます。Observableのチャンクは以下のような形で、ojsを指定して作成します。
Observableのチャンク
```{ojs}
// ココにJavascriptのコードを書く(//はコメントアウト)
irisc = FileAttachment("iris.csv").csv({ typed: true })
```Observableは真の意味でのサーバーレスで動的なコンテンツを作成できる、なかなか良いサービスだと思います。ただし、このObservableを使っている人は日本にも世界にもあまりいません。他のサービス(RxJS)にObservableというのがあるようで、そちらばかりが検索に引っ掛かります。
なぜQuartoの開発チームがObservableに興味を持ったのかは謎ですが、データを表示・共有する場合にはなかなか良さそうなサービスですし、うまく使えばAPIなどを利用した動的なコンテンツも作れそうです。流行りのサービスになれるかどうかは疑わしいですが、興味がある方はObservable Notebooksから触り始めてみるとよいでしょう。
Observableのチャンクでは、上記と同じような形(FileAttachment)でCSVを読み込むことができます。
Observable:ファイルの読み込み
```{ojs}
irisc = FileAttachment("iris.csv").csv({ typed: true })
```また、以下のような形でarrowパッケージ(Richardson et al. 2025)のwrite_feather関数を用いて、RからObservableにデータを渡すこともできます。
write_feather
```{r}
arrow::write_feather(
data.frame(time = Nile |> time(), flow = Nile |> as.vector()),
"data.nile",
compression = "uncompressed"
)
```Observableでは以下のようにしてRのオブジェクトを受け取ります。ただし、この形で受け取ったオブジェクトの構造は複雑なので、取り扱いはやや難しめです。
ObservableでRのデータを受け取る
```{ojs}
nile = FileAttachment("data.nile").arrow()
```Observableでグラフを作成する場合には、以下のようにPlot.plot関数を用います。この関数の利用方法はObservableのReferenceに記載されていますが、Plot Galleryを参考にした方がわかりやすいかもしれません。また、事前にObservable Notebooksでコードを書き、動作を確かめておくと作成しやすいでしょう。
グラフの描画
```{ojs}
Plot.plot({
marks:[
Plot.lineY(nile, {x: "time", y: "flow"})
]
})
```Observableでは、チェックボックスやラジオボタン、選択ボックスやスライダーなどの、様々なインプットのアイテムを表示させることができます。このインプットの結果を変数に代入し、その変数を利用して動的なコンテンツを作成することができます。以下の例では、year、sex、select_prefの各変数にそれぞれ選択した値が代入されます。
インプットの作成:スライダー
```{ojs}
viewof year = Inputs.range([1920, 2020], {label: "Year", step: 1})
```インプットの作成:ラジオボタン
```{ojs}
viewof sex = Inputs.radio(["male", "female"], {label: "性別", value: "male"})
```インプットの作成:選択ボックス
```{ojs}
viewof select_pref = Inputs.select(["北海道","青森県","岩手県","宮城県","秋田県","山形県","福島県","茨城県"], {label: "都道府県"})
```データを取り込み、入力からオブジェクトを作成したら、入力オブジェクトに従いデータを選択する必要があります。データの選択には、dplyrと同じようにfilterメソッドを用います。Rを使っていると以下の表現はやや迂遠な感じを受けるかもしれませんが、特に難しいことなくデータを選択することができます。
ただし、このfilterメソッドはarqueroというJavascriptのライブラリに設定されている関数ですので、Rのライブラリと同様に読み込む必要があります。
データのフィルタリング
```{ojs}
import { aq, op } from "@uwdata/arquero" // ライブラリの読み込み
d_pop_year = d_pop
.filter((d) => d.year == year)
```Quartoでは、通常コードは上から下に、順に実行されます。下で定義したオブジェクトは上のコードでは利用できません。
ただし、このObservableを用いる場合、.qmd上でのコードの順序は全く意味がなくなり、下で定義した値を上で用いることができます。Observableでは、変更があった値を観察(Observe)しており、変更があった値を含むコードをすべて即時に実行するという仕組みになっています。ですので、上記のようにデータのフィルタリングをしたとき、フィルタリングを実行したコードより上の行にそのデータを利用したグラフ描画のコードがあれば、そのコードが実行され、新しいデータに従いグラフが再描画されます。
この仕組みはShinyにも似ており、ダッシュボードを作成する際には利点がある仕組みとなっています。ただし、コードの順序と実行の順序が一致しないため、コードの可読性は低めです。
より詳しいObservableの使い方については、Observableのチュートリアルをご参照ください。
また、RstudioではObservableのコードをRstudio上で実行することはできず、Renderしないと結果を確認できません。また、作成されたHTMLはデプロイしないと中身を確認できません(Terminalでquarto previewを実行すると動くので、サーバー環境でのみ使えるようになっているようです)。Observable Notebooksでは即時にコードが実行されるため、あらかじめObservable Notebooksでコードを書いておくと、Quartoに持ち込む際に役に立つでしょう。
プレビューを表示するquarto previewコマンドコマンド
quarto preview ojs.qmd # ojs.qmdがRenderされ、プレビューが表示される