Sieger im Senat kartieren
Bei den Midterms 2018 standen 33 Senatssitze zur Wahl (plus zwei Sonderwahlen, die wir in dieser Übung ignorieren). Deine Aufgabe ist es, eine Choroplethenkarte zu erstellen, in der der Bundesstaat entsprechend der Partei des siegreichen Kandidaten eingefärbt wird.
Dafür musst du einen Faktor auf die Füllfarbe abbilden. Die z-Ästhetik erwartet jedoch eine numerische Variable. Eine einfache Lösung ist, party mit as.numeric(party) in eine numerische Variable umzuwandeln und die gewünschten Farben dann in add_trace() manuell festzulegen. Außerdem ist die Farbskala hier nicht mehr besonders hilfreich und kann entfernt werden, indem du die Ebene hide_colorbar() hinzufügst.
Der Data Frame senate_winners und plotly wurden bereits für dich geladen.
Diese Übung ist Teil des Kurses
Interaktive Datenvisualisierung mit plotly in R
Anleitung zur Übung
- Erstelle eine Choroplethenkarte, bei der die Farbe des Bundesstaats die siegreiche Partei darstellt.
- Gib in
add_trace()die Farben"dodgerblue","mediumseagreen"und"tomato"(in dieser Reihenfolge) manuell an. - Vervollständige den Hover-Info-Text mit den passenden Spaltennamen.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
# 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()