有権者投票率の変化を地図化する

2018年の中間選挙では、2014年の中間選挙と比べてほぼすべての州で投票率が上がっていることをすでに確認しました。この演習では、2回の中間選挙間における投票率の変化を地図で可視化します。

turnout データフレーム、dplyr、plotly はすでに読み込まれています。

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

R で学ぶ plotly によるインタラクティブ可視化

コースを見る

演習の手順

mutate() を使って turnout に change 列を追加し、2018年（turnout2018）と2014年（turnout2014）の投票率の差として計算します。
plot_geo() と add_trace() を使って、州ごとの投票率の変化を示すコロプレスマップを作成し、change を z に、state.abbr を locations にマッピングします。
layout() を使って、地図の範囲を 'usa' に制限します。

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

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

# Create a choropleth map of the change in voter turnout from 2014 to 2018
turnout %>%
  ___(___) %>%
  ___(locationmode = 'USA-states') %>%
  ___(___, ___) %>%
  ___(geo = ___)

コードを編集して実行