Fill scale for binned gradient between two parties

Fill scale for binned gradient between two parties

scale_fill_party_binned(...)

Arguments

...	passed on to scale_*_gradient2

Examples

library(dplyr)
electoral_votes_2016 %>%
mutate(diff = perc_rep - perc_dem, party = ifelse(perc_dem > perc_rep, "Dem", "Rep")) %>%
ggsnake(order = diff, fill = diff, label = state_district, color = party, size = electoral_votes) + 
scale_fill_party_binned() + scale_color_party()