Robert Myles McDonnell

1 minute read

This post got lost mysteriously when I transitioned to Netlify ā€“ just reposting. It was originally from June 2017.

This post is a quickie to show how we can visualize the UK election results with just a few lines of R code. (Really, very few). 1

We can load in our usual tidyverse tools, along with a handy little data package, parlitools.


Thanks to this R Bloggers post, we have the data (the UK Electoral Commission must have it up by now anyway), so visualizing it is very easy:

results <- read_csv("/Users/robert/Downloads/EconomistUK2017.csv")

uk <- west_hex_map

res <- inner_join(results, uk, by = c("Constituency.ID" = "gss_code")) %>% 
  filter(! %>% 

ggplot(res) +
  geom_sf(aes(fill = win), size = 0.2) +
  theme_minimal() +
  guides(fill = guide_legend(title = "party")) +
  scale_fill_manual(values = c("#006BA4", "#800B05", "#349B3A", "#888888", "#DB434E",
                    "#E8B335", "#98B3D1", "#60B031", "#8DDC64","#FCDD02"))

Bam! Easy, quick and lovely šŸ˜„.

  1. Iā€™m using the dev version of ggplot2 here, we need it for geom_sf().ā†©

comments powered by Disqus