File:Haukilahti election results.svg

From Wikimedia Commons, the free media repository
Jump to navigation Jump to search

Original file(SVG file, nominally 512 × 276 pixels, file size: 15 KB)

Captions

Captions

Add a one-line explanation of what this file represents

Summary

[edit]
Description
English: Election results for Haukilahti, Espoo in recent parliament, municipal and EU parliament elections.
Suomi: Espoon Haukilahden vaalitulokset viimeaikaisissa eduskunta-, kunta- ja europarlamenttivaaleissa.
Date
Source

Own work based on:

Author Markus Säynevirta
SVG development
InfoField
 
The source code of this SVG is invalid due to 2 errors.
 
This W3C-invalid chart was created with R.

Licensing

Public domain This work has been released into the public domain by its author, Markus Säynevirta. This applies worldwide.
In some countries this may not be legally possible; if so:
Markus Säynevirta grants anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

R code

[edit]
> h <- read.csv("data.csv", fileEncoding="UTF-8-BOM")
> W1 <- ggplot(h, aes(x=Year,y=val,group=Party, fill=Party))
> W2 <- W1 + geom_area(position="fill", colour="black", size=.4, alpha=.8)
> W3 <- W2 + scale_fill_manual(values=c("#006288", "#FFDD93", "#61BF1A","#E11931","#031F73","#01954B","#fbfbfb"), name="Puolue", breaks = c("1KOK","2RKP","3VIHR","4SDP","5PERUS","6KESK","7MUU"), labels = c("Kok.","RKP","Vihr.","SDP","PS","Kesk.","Muut"))
> W4 <- W3 + scale_x_discrete(limits=c(2007,2009,2011,2013,2015,2017))
> W5 <- W4 + ylab("Osuus") + xlab("Vuosi") + ggtitle("Puolueiden kannatus 2007–2017") + theme(plot.title = element_text(hjust = 0.5, face="bold"))
> ggsave("haukilahti.svg",plot=W5, height=3.23, width=6)

Data

[edit]
Year,val,Party
2007,54.0,1KOK
2007,15.6,2RKP
2007,10.2,3VIHR
2007,7.5,4SDP
2007,2.8,5PERUS
2007,5.3,6KESK
2007,4.6,7MUU

2008,51.4,1KOK
2008,17.6,2RKP
2008,11.1,3VIHR
2008,7.2,4SDP
2008,5.7,5PERUS
2008,3,6KESK
2008,3.4,7MUU

2009,52.8,1KOK
2009,17.0,2RKP
2009,13.7,3VIHR
2009,5.7,4SDP
2009,4.2,5PERUS
2009,4,6KESK
2009,2.6,7MUU

2011,55.8,1KOK
2011,13.6,2RKP
2011,9.3,3VIHR
2011,7.3,4SDP
2011,7.6,5PERUS
2011,2.3,6KESK
2011,4.1,7MUU

2012,48.6,1KOK
2012,20.3,2RKP
2012,11.8,3VIHR
2012,6.0,4SDP
2012,7.1,5PERUS
2012,2.2,6KESK
2012,4.0,7MUU

2014,52.5,1KOK
2014,16.6,2RKP
2014,10.1,3VIHR
2014,4.5,4SDP
2014,5.8,5PERUS
2014,5,6KESK
2014,4.9,7MUU

2015,49.4,1KOK
2015,18.7,2RKP
2015,9.1,3VIHR
2015,5.1,4SDP
2015,8.0,5PERUS
2015,5.4,6KESK
2015,4.3,7MUU

2017,48.5,1KOK
2017,16.3,2RKP
2017,14.4,3VIHR
2017,5.0,4SDP
2017,6.8,5PERUS
2017,3.5,6KESK
2017,5.5,7MUU

File history

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

Date/TimeThumbnailDimensionsUserComment
current00:31, 2 December 2018Thumbnail for version as of 00:31, 2 December 2018512 × 276 (15 KB)Msaynevirta (talk | contribs)smaller version
23:23, 1 December 2018Thumbnail for version as of 23:23, 1 December 2018512 × 310 (15 KB)Msaynevirta (talk | contribs)User created page with UploadWizard

There are no pages that use this file.

File usage on other wikis

The following other wikis use this file:

Metadata