Mapa vítězů senátních voleb
V midtermových volbách 2018 bylo v sázce 33 senátních křesel (plus dvě doplňovací volby, které v tomto cvičení ignorujeme). Tvým úkolem je vytvořit choroplethovou mapu, která obarví jednotlivé státy podle politické strany vítězného kandidáta.
K tomu potřebuješ namapovat faktor na barvu výplně. Estetika z ale očekává numerickou proměnnou. Jednoduché řešení je převést party na číselnou proměnnou pomocí as.numeric(party) a pak v add_trace() ručně zadat požadované barvy. Colorbar navíc přestane být užitečný — odstraníš ho přidáním vrstvy hide_colorbar().
Dataframe senate_winners a knihovna plotly jsou již načteny.
Toto cvičení je součástí kurzu
Interaktivní vizualizace dat s plotly v R
Pokyny k cvičení
- Vytvoř choroplethovou mapu, kde barva státu odpovídá vítězné straně.
- V
add_trace()ručně zadej barvy"dodgerblue","mediumseagreen"a"tomato"(v tomto pořadí). - Doplň text popisku při najetí myší o příslušné názvy sloupců.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# 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()