上院選の勝者を地図で可視化
2018年の中間選挙では、上院の改選議席は33（この演習では無視する特別選挙が2つあります）でした。あなたのタスクは、各州を勝利した候補者の政党に応じた色で塗り分けるコロプレスマップを作成することです。
このタスクでは、カテゴリ（factor）を塗り（fill）色にマッピングする必要があります。ただし、z 対応の美的属性は数値変数を期待します。簡単な回避策として、party を as.numeric(party) で数値に変換し、add_trace() で希望する色を手動指定します。さらに、カラーバーは有用性が低くなるため、hide_colorbar() のレイヤーを追加して削除できます。
senate_winners データフレームと plotly はすでに読み込まれています。
この演習はコースの一部です
R で学ぶ plotly によるインタラクティブ可視化
演習の手順
- 各州の色が勝利政党を表すコロプレスマップを作成します。
add_trace()で、色をこの順序で手動指定します："dodgerblue"、"mediumseagreen"、"tomato"。- ホバー情報のテキストを、適切な列名で完成させてください。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Create a choropleth map displaying the Senate results
senate_winners %>%
plot_geo(locationmode = ___) %>%
add_trace(___, ___,
___ = ___(___, ___, ___),
hoverinfo = "text",
text = ~paste("Candidate:", ___, "
",
"Party:", ___, "
",
"% vote:", round(___, 1))
) %>%
layout(geo = list(scope = 'usa')) %>%
hide_colorbar()