File:HallamGraph.png

Original file(944 × 519 pixels, file size: 116 KB, MIME type: image/png)

Captions

Captions

Add a one-line explanation of what this file represents

Summary edit

Description
English: Election results for Sheffield Hallam constituency from its creation in 1885 to the 2017 general election. © Jeremy Atherton 2017. Graph drawn with R
Date 17 August 2005 (original upload date)
Source Transferred from en.wikipedia to Commons by Sreejithk2000 using CommonsHelper.
Author The original uploader was JeremyA at English Wikipedia.
File:HallamGraph.svg is a vector version of this file. It should be used in place of this PNG file when not inferior.

File:HallamGraph.png → File:HallamGraph.svg

For more information, see Help:SVG.

In other languages
Alemannisch  Bahasa Indonesia  Bahasa Melayu  British English  català  čeština  dansk  Deutsch  eesti  English  español  Esperanto  euskara  français  Frysk  galego  hrvatski  Ido  italiano  lietuvių  magyar  Nederlands  norsk bokmål  norsk nynorsk  occitan  Plattdüütsch  polski  português  português do Brasil  română  Scots  sicilianu  slovenčina  slovenščina  suomi  svenska  Tiếng Việt  Türkçe  vèneto  Ελληνικά  беларуская (тарашкевіца)  български  македонски  нохчийн  русский  српски / srpski  татарча/tatarça  українська  ქართული  հայերեն  বাংলা  தமிழ்  മലയാളം  ไทย  한국어  日本語  简体中文  繁體中文  עברית  العربية  فارسی  +/−
New SVG image

Notes edit

The Background colour indicates the party of the sitting MP at any given year.

Elections held in 1895, 1900, 1916 (by-election) and 1918 do not appear on this graph, at each of these elections a single candidate was elected unopposed (Conservative in 1895, 1900, and 1918, Liberal in 1916). Gaps indicate the missing elections.

Statistics gathered from:

Parties:

Data Used:

Year Conservative Labour Liberal Other
1885.96 54.4 45.6
1886.57 57.8 42.2
1892.57 54.3 45.7
1895.6 unopp
1900.81 unopp
1906.61 50.4 49.6
1910.11 50.9 49.1
1910.97 50.9 49.1
1916 unopp
1918.95 unopp
1922.87 59.4 40.6
1923.93 57.7 23.9 23.4
1924.83 63.7 36.3
1928 53.7 30.8 15.5
1929.41 60.9 39.1
1931.82 77.5 22.5
1935.87 67.3 32.7
1939 61.7 38.3
1945.51 47.1 38.5 7.7 6.7
1950.15 65.1 26.5 8.4
1951.82 70.76 29.24
1955.4 66.23 33.77
1959.77 62.76 26.06 11.18
1964.79 54.95 26.96 18.09
1966.25 51.34 32.49 16.17
1970.46 61.32 31.43 7.25
1974.16 48.95 27.2 23.85
1974.78 49 28.97 22.03
1979.34 54.94 28.84 15.7 0.52
1983.44 50.62 19.72 28.42 1.24
1987.44 46.29 20.38 32.51 0.83
1992.27 45.52 20.15 33.09 1.24
1997.33 33.1 13.5 51.3 2
2001.43 31 12.4 55.4 1.1
2005.34 29.7 12.6 51.1 6.7
2010.35 23.5 16.1 53.4 6.8
2015.35 13.6 35.8 40 10.6
2017.44 23.8 38.4 34.6 3.1

Code:

The graph was produced with R. The following code will reproduce the graph using the data on this page.

library(tidyverse)
library(htmltab)

hallam <- htmltab("https://commons.wikimedia.org/wiki/File:HallamGraph.png",2, rm_nodata_cols = F)
hallam <- as_tibble(hallam)

tidy_hallam <- gather(hallam, "Party", "Votes", 2:5)
tidy_hallam$Year <- as.numeric(tidy_hallam$Year)
tidy_hallam$Party <- as.factor(tidy_hallam$Party)
tidy_hallam$Votes <- as.numeric(tidy_hallam$Votes)

hallam_victor <- tidy_hallam %>% filter(is.na(Votes) == FALSE) %>% group_by(Year) %>% summarize(Party = Party[which(Votes == max(Votes))])
hallam_victor <- hallam_victor %>%
  add_row(Year = 1895.6, Party = "Conservative") %>%
  add_row(Year = 1900.81, Party = "Conservative") %>%
  add_row(Year = 1916, Party = "Liberal") %>%
  add_row(Year = 1918.95, Party = "Conservative") %>%
  arrange(Year)
hallam_victor$start_year <- hallam_victor$Year
hallam_victor$end_year <- c(hallam_victor$Year[-1], 2019)
hallam_victor[1,3] <- 1885

party_colours <- c("#0087DC", "#D50000", "#FDBB30", "dark grey")
names(party_colours) <- levels(tidy_hallam$Party)

ggplot(tidy_hallam) +
  geom_rect(data = hallam_victor,
            aes(xmin = start_year,xmax = end_year, ymin = -Inf, ymax = Inf, fill = Party),
            alpha = 0.35,
            show.legend = F) +
  geom_line(aes(x = Year, y = Votes, colour = Party), size = 0.703) +
  geom_point(aes(x = Year, y = Votes, colour = Party)) +
  geom_hline(yintercept = 100, colour = "black", size = 1.5) +
  geom_vline(xintercept = 2019, colour = "black", size = 1.5) +
  scale_colour_manual(values = party_colours, labels = c("Conservative", "Labour", "Liberal", "Other")) +
  scale_fill_manual(values = party_colours) +
  theme(text = element_text(colour = "black", size = 14),
        axis.text = element_text(colour = "black", size = 11),
        axis.line.x = element_line(colour = "black", size = 0.703),
        axis.ticks.x = element_line(colour = "black", size = 0.703),
        axis.line.y = element_line(colour = "black", size = 0.703),
        axis.ticks.y = element_line(colour = "black", size = 0.703),
        axis.ticks.length = unit(5, "points"),
        panel.grid.major = element_line(colour = "blue", size = 0.5, linetype = 3),
        panel.grid.minor = element_blank(),
        panel.background = element_blank(),
        legend.position = c(.98, .97),
        legend.text = element_text(colour = "black", size = 11),
        legend.title=element_blank(),
        legend.justification = c("right", "top"),
        legend.box.just = "right",
        legend.key = element_blank(),
        legend.background = element_rect(fill = "white", colour = "black"),
        legend.margin = margin(0, 4, 4, 4)) +
  scale_x_continuous(expand = c(0, 0), limits = c(1885,2019), breaks = seq(1890, 2010, 10)) +
  scale_y_continuous(expand = c(0, 0), limits = c(0, 100), breaks = seq(0, 100, 20)) +
  labs(x = "Year", y = "Percentage Vote")

ggsave("HallamGraph.png", device = "png", units = "cm", width = 20, height = 11, dpi = 120)

Licensing edit

w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license. Subject to disclaimers.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
This licensing tag was added to this file as part of the GFDL licensing update.
GNU head Permission is granted to copy, distribute and/or modify this document under the terms of the GNU Free Documentation License, Version 1.2 or any later version published by the Free Software Foundation; with no Invariant Sections, no Front-Cover Texts, and no Back-Cover Texts. A copy of the license is included in the section entitled GNU Free Documentation License. Subject to disclaimers.

Original upload log edit

The original description page was here. All following user names refer to en.wikipedia.
  • 2010-05-07 15:04 JeremyA 945×520× (76489 bytes)
  • 2005-11-28 01:55 JeremyA 945×520× (23661 bytes) another test of background colours
  • 2005-11-28 01:05 JeremyA 945×520× (23331 bytes) testing new background colour
  • 2005-11-28 00:45 JeremyA 945×520× (22261 bytes) minor alterations to graph
  • 2005-11-25 03:33 JeremyA 945×520× (23836 bytes) updated to include all results since 1885
  • 2005-11-04 05:39 JeremyA 945×520× (21367 bytes) Results back to 1931
  • 2005-10-08 00:49 JeremyA 589×337× (22286 bytes) Add 1950 result, cleanup a little
  • 2005-09-05 19:31 JeremyA 589×337× (9915 bytes) Update party colours to better match those used elsewhere on wikipedia
  • 2005-08-21 17:11 JeremyA 589×337× (9906 bytes) correct a minor mistake
  • 2005-08-21 16:43 JeremyA 589×337× (9871 bytes)
  • 2005-08-17 02:24 JeremyA 589×337× (8602 bytes) {{GFDL}}

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current04:07, 13 June 2017Thumbnail for version as of 04:07, 13 June 2017944 × 519 (116 KB)JeremyA (talk | contribs)Re-create graph with open source software (R)
15:32, 9 June 2017Thumbnail for version as of 15:32, 9 June 2017945 × 520 (74 KB)JeremyA (talk | contribs)2017 results added
15:50, 8 May 2015Thumbnail for version as of 15:50, 8 May 2015945 × 520 (76 KB)JeremyA (talk | contribs)update with 2015 election
08:01, 5 June 2010Thumbnail for version as of 08:01, 5 June 2010945 × 520 (75 KB)File Upload Bot (Magnus Manske) (talk | contribs) {{BotMoveToCommons|en.wikipedia|year={{subst:CURRENTYEAR}}|month={{subst:CURRENTMONTHNAME}}|day={{subst:CURRENTDAY}}}} {{Information |Description={{en|Election results for Sheffield Hallam constituenc

There are no pages that use this file.

File usage on other wikis