投票率が最も高かった州はどこですか？
前の散布図ではホバー情報から投票率が最も高い州を特定できますが、州ごとの投票率を比較するには時間がかかります。この演習では、y 軸に州、x 軸に投票率を置いた散布図を作成します。カテゴリ変数と量的変数を 1 つずつ表示する散布図は一般に「ドットプロット」と呼ばれ、グループ間の比較を素早く行えます。
turnout データセットには、各 state における 2018 年中間選挙で投票した有権者の割合（turnout）が含まれています。
サンプルコードの turnout %>% slice_max(turnout2018, n = 15) は、投票率が最も高い 15 の州を抽出します。
なお、plotly、dplyr、forcats はすでに読み込まれています。
この演習はコースの一部です
R で学ぶ plotly によるインタラクティブ可視化
演習の手順
- 上位 15 州について、x 軸に
turnout2018、y 軸にstateを取り、stateをturnout2018で並べ替えたドットプロット（散布図）を作成します。 - x 軸のタイトルを
"Eligible voter turnout"にします。 - y 軸のタイトルを
"State"にし、そのtypeをcategoryに設定します。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Create a dotplot of voter turnout in 2018 by state ordered by turnout
turnout %>%
slice_max(turnout2018, n = 15) %>%
___(x = ___, y = ~fct_reorder(___, ___)) %>%
___() %>%
layout(___,
___)