sapor 0.1b1 → 0.2a1

data/spec/unit/denmark_with_p_spec.rb

@@ -0,0 +1,57 @@
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::DenmarkWithP, '#area_code' do
+  it 'returns DK∪{P} as the area code' do
+    expect(Sapor::DenmarkWithP.instance.area_code).to eq('DK∪{P}')
+  end
+end
+
+describe Sapor::DenmarkWithP, '#no_of_seats' do
+  it 'returns 179 as the number of seats' do
+    expect(Sapor::DenmarkWithP.instance.no_of_seats).to eq(175)
+  end
+end
+
+describe Sapor::DenmarkWithP, '#population_size' do
+  it 'returns a population size of 3,518,987' do
+    expect(Sapor::DenmarkWithP.instance.population_size).to eq(3_518_987)
+  end
+end
+
+describe Sapor::DenmarkWithP, '#seats' do
+  it 'calculates the number of seats for the election of 2015 correctly' do
+    Denmark = Sapor::DenmarkWithP.instance
+    results = Denmark.overall_election_results_of_2015
+    seats = Denmark.seats(results)
+    expect(seats['Socialdemokraterne']).to eq(43)
+    expect(seats['Dansk Folkeparti']).to eq(35)
+    expect(seats['Venstre']).to eq(32)
+    expect(seats['Enhedslisten–De Rød-Grønne']).to eq(13)
+    expect(seats['Liberal Alliance']).to eq(12)
+    expect(seats['Alternativet']).to eq(8)
+    expect(seats['Radikale Venstre']).to eq(8)
+    expect(seats['Socialistisk Folkeparti']).to eq(7)
+    expect(seats['Det Konservative Folkeparti']).to eq(6)
+    expect(seats['Nye Borgerlige']).to eq(6)
+    expect(seats['Stram Kurs']).to eq(5)
+    expect(seats['Kristendemokraterne']).to eq(0)
+  end
+end

data/spec/unit/denominators_spec.rb

@@ -1,7 +1,6 @@
-# encoding: utf-8
 #
 # Statistical Analysis of Polling Results (SAPoR)
-# Copyright (C) 2014 Filip van Laenen <f.a.vanlaenen@ieee.org>
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
 #
 # This file is part of SAPoR.
 #
@@ -26,6 +25,13 @@ describe Sapor::DhondtDenominators, '#get' do
   end
 end
 
+describe Sapor::SainteLague12Denominators, '#get' do
+  it 'returns [1.2, 3, 5, 7, 9] as the five first elements' do
+    denominators = Sapor::SainteLague12Denominators.get(5).each.to_a
+    expect(denominators).to eq([1.2, 3, 5, 7, 9])
+  end
+end
+
 describe Sapor::SainteLague14Denominators, '#get' do
   it 'returns [1.4, 3, 5, 7, 9] as the five first elements' do
     denominators = Sapor::SainteLague14Denominators.get(5).each.to_a

data/spec/unit/dichotomies_spec.rb

@@ -1,7 +1,7 @@
 # encoding: utf-8
 #
 # Statistical Analysis of Polling Results (SAPoR)
-# Copyright (C) 2014 Filip van Laenen <f.a.vanlaenen@ieee.org>
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
 #
 # This file is part of SAPoR.
 #

data/spec/unit/dichotomy_spec.rb

@@ -1,7 +1,7 @@
 # encoding: utf-8
 #
 # Statistical Analysis of Polling Results (SAPoR)
-# Copyright (C) 2014 Filip van Laenen <f.a.vanlaenen@ieee.org>
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
 #
 # This file is part of SAPoR.
 #

data/spec/unit/estonia_spec.rb

@@ -0,0 +1,65 @@
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::Estonia, '#area_code' do
+  it 'returns EE as the area code' do
+    expect(Sapor::Estonia.instance.area_code).to eq('EE')
+  end
+end
+
+describe Sapor::Estonia, '#no_of_seats' do
+  it 'returns 101 as the number of seats' do
+    expect(Sapor::Estonia.instance.no_of_seats).to eq(101)
+  end
+end
+
+describe Sapor::Estonia, '#population_size' do
+  it 'returns a population size of 577,910' do
+    expect(Sapor::Estonia.instance.population_size).to eq(577_910)
+  end
+end
+
+describe Sapor::Estonia, '#seats' do
+  it 'calculates the number of seats for the election of 2015' do
+    results = { 'Eesti Reformierakond' => 158_971,
+                'Eesti Keskerakond' => 142_460,
+                'Sotsiaaldemokraatlik Erakond' => 87_190,
+                'Erakond Isamaa ja Res Publica Liit' => 78_697,
+                'Eesti Vabaerakond' => 49_883,
+                'Eesti Konservatiivne Rahvaerakond' => 46_883,
+                'Erakond Eestimaa Rohelised' => 5_193,
+                'Rahva Ühtsuse Erakond' => 2_289,
+                'Eesti Iseseisvuspartei' => 1_047,
+                'Üksikkandidaadid' => 887,
+                'Eestimaa Ühendatud Vasakpartei' => 764 }
+    seats = Sapor::Estonia.instance.seats(results)
+    expect(seats['Eesti Reformierakond']).to eq(30)
+    expect(seats['Eesti Keskerakond']).to eq(27)
+    expect(seats['Sotsiaaldemokraatlik Erakond']).to eq(15)
+    expect(seats['Erakond Isamaa ja Res Publica Liit']).to eq(14)
+    expect(seats['Eesti Vabaerakond']).to eq(8)
+    expect(seats['Eesti Konservatiivne Rahvaerakond']).to eq(7)
+    expect(seats['Erakond Eestimaa Rohelised']).to eq(0)
+    expect(seats['Rahva Ühtsuse Erakond']).to eq(0)
+    expect(seats['Eesti Iseseisvuspartei']).to eq(0)
+    expect(seats['Üksikkandidaadid']).to eq(0)
+    expect(seats['Eestimaa Ühendatud Vasakpartei']).to eq(0)
+  end
+end

data/spec/unit/european_union_27_austria_spec.rb

@@ -0,0 +1,61 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27Austria, '#area_code' do
+  it 'returns EU27[AT] as the area code' do
+    expect(Sapor::EuropeanUnion27Austria.instance.area_code).to eq('EU27[AT]')
+  end
+end
+
+describe Sapor::EuropeanUnion27Austria, '#no_of_seats' do
+  it 'returns 19 as the number of seats' do
+    expect(Sapor::EuropeanUnion27Austria.instance.no_of_seats).to eq(19)
+  end
+end
+
+describe Sapor::EuropeanUnion27Austria, '#population_size' do
+  it 'returns a population size of 3,834,656' do
+    expect(Sapor::EuropeanUnion27Austria.instance.population_size).to \
+      eq(3_834_656)
+  end
+end
+
+describe Sapor::EuropeanUnion27Austria, '#seats' do
+  it 'calculates the number of seats for the election of 2019' do
+    results = { 'Österreichische Volkspartei (EPP)' => 1_305_956,
+                'Sozialdemokratische Partei Österreichs (S&D)' => 903_151,
+                'Freiheitliche Partei Österreichs (ENF)' => 650_114,
+                'Die Grünen–Die Grüne Alternative (Greens/EFA)' => 532_193,
+                'NEOS–Das Neue Österreich und Liberales Forum (ALDE)' => \
+                  319_024,
+                'EUROPA JETZT (*)' => 39_087,
+                'Kommunistische Partei Österreichs (*)' => 30_087 }
+    seats = Sapor::EuropeanUnion27Austria.instance.seats(results)
+    expect(seats['Österreichische Volkspartei (EPP)']).to eq(7)
+    expect(seats['Sozialdemokratische Partei Österreichs (S&D)']).to eq(5)
+    expect(seats['Freiheitliche Partei Österreichs (ENF)']).to eq(3)
+    expect(seats['Die Grünen–Die Grüne Alternative (Greens/EFA)']).to eq(2 + 1)
+    expect(seats['NEOS–Das Neue Österreich und Liberales Forum (ALDE)']).to \
+      eq(1)
+    expect(seats['EUROPA JETZT (*)']).to eq(0)
+    expect(seats['Kommunistische Partei Österreichs (*)']).to eq(0)
+  end
+end

data/spec/unit/european_union_27_croatia_spec.rb

@@ -0,0 +1,60 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27Croatia, '#area_code' do
+  it 'returns EU27[HR] as the area code' do
+    expect(Sapor::EuropeanUnion27Croatia.instance.area_code).to \
+      eq('EU27[HR]')
+  end
+end
+
+describe Sapor::EuropeanUnion27Croatia, '#no_of_seats' do
+  it 'returns 12 as the number of seats' do
+    expect(Sapor::EuropeanUnion27Croatia.instance.no_of_seats).to eq(12)
+  end
+end
+
+describe Sapor::EuropeanUnion27Croatia, '#population_size' do
+  it 'returns a population size of 1,073,954' do
+    expect(Sapor::EuropeanUnion27Croatia.instance.population_size).to \
+      eq(1_073_954)
+  end
+end
+
+describe Sapor::EuropeanUnion27Croatia, '#seats' do
+  it 'calculates the number of seats for the election of 2014' do
+    results = { 'HDZ-ova koalicija (EPP)' => 381_844,
+                'Kukuriku koalicija (S&D)' => 275_904,
+                'Održivi razvoj Hrvatske (—)' => 86_806,
+                'Savez za Hrvatsku (—)' => 63_437,
+                'Hrvatski laburisti–Stranka rada (GUE/NGL)' => 31_363,
+                'Partnership of Croatian Center (—)' => 22_098,
+                'Others (—)' => 60_452 }
+    seats = Sapor::EuropeanUnion27Croatia.instance.seats(results)
+    expect(seats['HDZ-ova koalicija (EPP)']).to eq(6)
+    expect(seats['Kukuriku koalicija (S&D)']).to eq(4)
+    expect(seats['Održivi razvoj Hrvatske (—)']).to eq(1)
+    expect(seats['Savez za Hrvatsku (—)']).to eq(0 + 1)
+    expect(seats['Hrvatski laburisti–Stranka rada (GUE/NGL)']).to eq(0)
+    expect(seats['Partnership of Croatian Center (—)']).to eq(0)
+    expect(seats['Others (—)']).to eq(0)
+  end
+end

data/spec/unit/european_union_27_denmark_spec.rb

@@ -0,0 +1,62 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27Denmark, '#area_code' do
+  it 'returns EU27[DK] as the area code' do
+    expect(Sapor::EuropeanUnion27Denmark.instance.area_code).to \
+      eq('EU27[DK]')
+  end
+end
+
+describe Sapor::EuropeanUnion27Denmark, '#no_of_seats' do
+  it 'returns 14 as the number of seats' do
+    expect(Sapor::EuropeanUnion27Denmark.instance.no_of_seats).to eq(14)
+  end
+end
+
+describe Sapor::EuropeanUnion27Denmark, '#population_size' do
+  it 'returns a population size of 2,800,029' do
+    expect(Sapor::EuropeanUnion27Denmark.instance.population_size).to \
+      eq(2_800_029)
+  end
+end
+
+describe Sapor::EuropeanUnion27Denmark, '#seats' do
+  it 'calculates the number of seats for the election of 2014' do
+    results = { 'Dansk Folkeparti (EFDD)' => 605_766,
+                'Socialdemokraterne (S&D)' => 434_894,
+                'Venstre (ALDE)' => 378_772,
+                'Socialistisk Folkeparti (Greens/EFA)' => 248_244,
+                'Det Konservative Folkeparti (EPP)' => 208_067,
+                'Folkebevægelsen mod EU (GUE/NGL)' => 183_493,
+                'Radikale Venstre (ALDE)' => 148_006,
+                'Liberal Alliance (ALDE)' => 65_776 }
+    seats = Sapor::EuropeanUnion27Denmark.instance.seats(results)
+    expect(seats['Dansk Folkeparti (EFDD)']).to eq(4)
+    expect(seats['Socialdemokraterne (S&D)']).to eq(3)
+    expect(seats['Venstre (ALDE)']).to eq(2 + 1)
+    expect(seats['Socialistisk Folkeparti (Greens/EFA)']).to eq(1)
+    expect(seats['Det Konservative Folkeparti (EPP)']).to eq(1)
+    expect(seats['Folkebevægelsen mod EU (GUE/NGL)']).to eq(1)
+    expect(seats['Radikale Venstre (ALDE)']).to eq(1)
+    expect(seats['Liberal Alliance (ALDE)']).to eq(0)
+  end
+end

data/spec/unit/european_union_27_estonia_spec.rb

@@ -0,0 +1,94 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27Estonia, '#area_code' do
+  it 'returns EU27[EE] as the area code' do
+    expect(Sapor::EuropeanUnion27Estonia.instance.area_code).to \
+      eq('EU27[EE]')
+  end
+end
+
+describe Sapor::EuropeanUnion27Estonia, '#no_of_seats' do
+  it 'returns 7 as the number of seats' do
+    expect(Sapor::EuropeanUnion27Estonia.instance.no_of_seats).to eq(7)
+  end
+end
+
+describe Sapor::EuropeanUnion27Estonia, '#population_size' do
+  it 'returns a population size of 332,859' do
+    expect(Sapor::EuropeanUnion27Estonia.instance.population_size).to \
+      eq(332_859)
+  end
+end
+
+describe Sapor::EuropeanUnion27Estonia, '#seats' do
+  it 'calculates the number of seats for the election of 2014' do
+    results = { 'Eesti Reformierakond (ALDE)' => 79_849,
+                'Eesti Keskerakond (ALDE)' => 73_419,
+                'Isamaa ja Res Publica Liit (EPP)' => 45_765,
+                'Sotsiaaldemokraatlik Erakond (S&D)' => 44_550,
+                'INDREK TARAND (Greens/EFA)' => 43_369,
+                'Eesti Konservatiivne Rahvaerakond (NI)' => 13_247,
+                'TANEL TALVE (*)' => 10_073,
+                'SILVER MEIKAR (*)' => 6018,
+                'Eesti Iseseisvuspartei (*)' => 4158,
+                'KRISTIINA OJULAND (*)' => 3024,
+                'KRISTA MULENOK (*)' => 1266,
+                'Erakond Eestimaa Rohelised (Greens/EFA)' => 986,
+                'RENE KUULMANN (*)' => 632,
+                'JEVGENI KRIŠTAFOVITŠ (*)' => 594,
+                'IMRE MÜRK (*)' => 330,
+                'OLGA SÕTNIK (*)' => 328,
+                'Eestimaa Ühendatud Vasakpartei (*)' => 226,
+                'SVETLANA IVNITSKAJA (*)' => 167,
+                'TAIRA AASA (*)' => 126,
+                'ROMAN UBAKIVI (*)' => 96,
+                'DMITRI SILBER (*)' => 	86,
+                'ANDRES INN (*)' => 72,
+                'LANCE GARETH EDWARD BOXALL (*)' => 64,
+                'JOERI WIERSMA (*)' => 48 }
+    seats = Sapor::EuropeanUnion27Estonia.instance.seats(results)
+    expect(seats['Eesti Reformierakond (ALDE)']).to eq(2)
+    expect(seats['Eesti Keskerakond (ALDE)']).to eq(1 + 1)
+    expect(seats['Isamaa ja Res Publica Liit (EPP)']).to eq(1)
+    expect(seats['Sotsiaaldemokraatlik Erakond (S&D)']).to eq(1)
+    expect(seats['INDREK TARAND (Greens/EFA)']).to eq(1)
+    expect(seats['Eesti Konservatiivne Rahvaerakond (NI)']).to eq(0)
+    expect(seats['TANEL TALVE (*)']).to eq(0)
+    expect(seats['SILVER MEIKAR (*)']).to eq(0)
+    expect(seats['Eesti Iseseisvuspartei (*)']).to eq(0)
+    expect(seats['KRISTIINA OJULAND (*)']).to eq(0)
+    expect(seats['KRISTA MULENOK (*)']).to eq(0)
+    expect(seats['Erakond Eestimaa Rohelised (Greens/EFA)']).to eq(0)
+    expect(seats['RENE KUULMANN (*)']).to eq(0)
+    expect(seats['JEVGENI KRIŠTAFOVITŠ (*)']).to eq(0)
+    expect(seats['IMRE MÜRK (*)']).to eq(0)
+    expect(seats['OLGA SÕTNIK (*)']).to eq(0)
+    expect(seats['Eestimaa Ühendatud Vasakpartei (*)']).to eq(0)
+    expect(seats['SVETLANA IVNITSKAJA (*)']).to eq(0)
+    expect(seats['TAIRA AASA (*)']).to eq(0)
+    expect(seats['ROMAN UBAKIVI (*)']).to eq(0)
+    expect(seats['DMITRI SILBER (*)']).to eq(0)
+    expect(seats['ANDRES INN (*)']).to eq(0)
+    expect(seats['LANCE GARETH EDWARD BOXALL (*)']).to eq(0)
+    expect(seats['JOERI WIERSMA (*)']).to eq(0)
+  end
+end

data/spec/unit/european_union_27_finland_spec.rb

@@ -0,0 +1,75 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27Finland, '#area_code' do
+  it 'returns EU27[FI] as the area code' do
+    expect(Sapor::EuropeanUnion27Finland.instance.area_code).to eq('EU27[FI]')
+  end
+end
+
+describe Sapor::EuropeanUnion27Finland, '#no_of_seats' do
+  it 'returns 14 as the number of seats' do
+    expect(Sapor::EuropeanUnion27Finland.instance.no_of_seats).to eq(14)
+  end
+end
+
+describe Sapor::EuropeanUnion27Finland, '#population_size' do
+  it 'returns a population size of 1,830,045' do
+    expect(Sapor::EuropeanUnion27Finland.instance.population_size).to \
+      eq(1_830_045)
+  end
+end
+
+describe Sapor::EuropeanUnion27Finland, '#seats' do
+  it 'calculates the number of seats using the votes of the 2014 election' do
+    results = { 'Kansallinen Kokoomus (EPP)' => 390_376,
+                'Suomen Keskusta (ALDE)' => 339_895,
+                'Perussuomalaiset (EFDD)' => 222_457,
+                'Suomen Sosialidemokraattinen Puolue (S&D)' => 212_781,
+                'Vihreä liitto (Greens/EFA)' => 161_263,
+                'Vasemmistoliitto (GUE/NGL)' => 161_074,
+                'Svenska folkpartiet i Finland (ALDE)' => 116_747,
+                'Kristillisdemokraatit (EPP)' => 90_586,
+                'Piraattipuolue (Greens/EFA)' => 12_378,
+                'Suomen Kommunistinen Puolue (GUE/NGL)' => 5_932,
+                'Itsenäisyyspuolue (—)' => 5_668,
+                'Muutos 2011 (—)' => 4_768,
+                'Köyhien Asialla (—)' => 2_667,
+                'Sinivalkoinen Rintama (—)' => 1_176,
+                'Kristiina Ilmarinen (—)' => 526 }
+    seats = Sapor::EuropeanUnion27Finland.instance.seats(results)
+    expect(seats['Kansallinen Kokoomus (EPP)']).to eq(3 + 1)
+    expect(seats['Suomen Keskusta (ALDE)']).to eq(3)
+    expect(seats['Perussuomalaiset (EFDD)']).to eq(2)
+    expect(seats['Suomen Sosialidemokraattinen Puolue (S&D)']).to eq(2)
+    expect(seats['Vihreä liitto (Greens/EFA)']).to eq(1)
+    expect(seats['Vasemmistoliitto (GUE/NGL)']).to eq(1)
+    expect(seats['Svenska folkpartiet i Finland (ALDE)']).to eq(1)
+    expect(seats['Kristillisdemokraatit (EPP)']).to eq(0)
+    expect(seats['Piraattipuolue (Greens/EFA)']).to eq(0)
+    expect(seats['Suomen Kommunistinen Puolue (GUE/NGL)']).to eq(0)
+    expect(seats['Itsenäisyyspuolue (—)']).to eq(0)
+    expect(seats['Muutos 2011 (—)']).to eq(0)
+    expect(seats['Köyhien Asialla (—)']).to eq(0)
+    expect(seats['Sinivalkoinen Rintama (—)']).to eq(0)
+    expect(seats['Kristiina Ilmarinen (—)']).to eq(0)
+  end
+end

data/spec/unit/european_union_27_ireland_spec.rb

@@ -0,0 +1,72 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27Ireland, '#area_code' do
+  it 'returns EU[IE]@2019 as the area code' do
+    expect(Sapor::EuropeanUnion27Ireland.instance.area_code).to \
+      eq('EU27[IE]')
+  end
+end
+
+describe Sapor::EuropeanUnion27Ireland, '#no_of_seats' do
+  it 'returns 13 as the number of seats' do
+    expect(Sapor::EuropeanUnion27Ireland.instance.no_of_seats).to eq(13)
+  end
+end
+
+describe Sapor::EuropeanUnion27Ireland, '#population_size' do
+  it 'returns a population size of 1,678,003' do
+    expect(Sapor::EuropeanUnion27Ireland.instance.population_size).to \
+      eq(1_678_003)
+  end
+end
+
+describe Sapor::EuropeanUnion27Ireland, '#seats' do
+  it 'calculates the number of seats for the election of 2019' do
+    results = { 'Fine Gael (EPP)' => 496_459,
+                'Green Party (Greens/EFA)' => 190_755,
+                'Independents 4 Change (GUE/NGL)' => 124_085,
+                'Fianna Fáil (RE)' => 277_705,
+                'Sinn Féin (GUE/NGL)' => 196_001,
+                'Labour Party (S&D)' => 52_753,
+                'Solidarity–People Before Profit (GUE/NGL)' => 38_771,
+                'Social Democrats (S&D)' => 20_331,
+                'Renua Ireland (*)' => 6_897,
+                'Workers’ Party (NI)' => 3_701,
+                'Identity Ireland (*)' => 3_685,
+                'Direct Democracy Ireland (*)' => 2_773,
+                'Independents (*)' => 264_087 }
+    seats = Sapor::EuropeanUnion27Ireland.instance.seats(results)
+    expect(seats['Fine Gael (EPP)']).to eq(4 + 1)
+    expect(seats['Green Party (Greens/EFA)']).to eq(2 - 1)
+    expect(seats['Independents 4 Change (GUE/NGL)']).to eq(2 - 1 + 1)
+    expect(seats['Fianna Fáil (RE)']).to eq(1 + 1)
+    expect(seats['Sinn Féin (GUE/NGL)']).to eq(1 - 1 + 1)
+    expect(seats['Labour Party (S&D)']).to eq(0)
+    expect(seats['Solidarity–People Before Profit (GUE/NGL)']).to eq(0)
+    expect(seats['Social Democrats (S&D)']).to eq(0)
+    expect(seats['Renua Ireland (*)']).to eq(0)
+    expect(seats['Workers’ Party (NI)']).to eq(0)
+    expect(seats['Identity Ireland (*)']).to eq(0)
+    expect(seats['Direct Democracy Ireland (*)']).to eq(0)
+    expect(seats['Independents (*)']).to eq(1 + 1)
+  end
+end

data/spec/unit/european_union_27_ireland_with_ia_spec.rb

@@ -0,0 +1,74 @@
+# encoding: utf-8
+#
+# Statistical Analysis of Polling Results (SAPoR)
+# Copyright (C) 2016 Filip van Laenen <f.a.vanlaenen@ieee.org>
+#
+# This file is part of SAPoR.
+#
+# SAPoR is free software: you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation, either version 3 of the License, or (at your option) any later
+# version.
+#
+# SAPoR is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You can find a copy of the GNU General Public License in /doc/gpl.txt
+#
+
+require 'spec_helper'
+
+describe Sapor::EuropeanUnion27IrelandWithIa, '#area_code' do
+  it 'returns EU[IE]@2019∪{IA} as the area code' do
+    expect(Sapor::EuropeanUnion27IrelandWithIa.instance.area_code).to \
+      eq('EU27[IE]∪{IA}')
+  end
+end
+
+describe Sapor::EuropeanUnion27IrelandWithIa, '#no_of_seats' do
+  it 'returns 13 as the number of seats' do
+    expect(Sapor::EuropeanUnion27IrelandWithIa.instance.no_of_seats).to eq(13)
+  end
+end
+
+describe Sapor::EuropeanUnion27IrelandWithIa, '#population_size' do
+  it 'returns a population size of 1,678,003' do
+    expect(Sapor::EuropeanUnion27IrelandWithIa.instance.population_size).to \
+      eq(1_678_003)
+  end
+end
+
+describe Sapor::EuropeanUnion27IrelandWithIa, '#seats' do
+  it 'calculates the number of seats for the election of 2019' do
+    results = { 'Fine Gael (EPP)' => 496_459,
+                'Green Party (Greens/EFA)' => 190_755,
+                'Independents 4 Change (GUE/NGL)' => 124_085,
+                'Fianna Fáil (RE)' => 277_705,
+                'Sinn Féin (GUE/NGL)' => 196_001,
+                'Labour Party (S&D)' => 52_753,
+                'Solidarity–People Before Profit (GUE/NGL)' => 38_771,
+                'Social Democrats (S&D)' => 20_331,
+                'Renua Ireland (*)' => 6_897,
+                'Workers’ Party (NI)' => 3_701,
+                'Identity Ireland (*)' => 3_685,
+                'Direct Democracy Ireland (*)' => 2_773,
+                'Independents (*)' => 264_087,
+                'Independent Alliance (*)' => 264_087 }
+    seats = Sapor::EuropeanUnion27IrelandWithIa.instance.seats(results)
+    expect(seats['Fine Gael (EPP)']).to eq(4 + 1)
+    expect(seats['Green Party (Greens/EFA)']).to eq(2 - 1)
+    expect(seats['Independents 4 Change (GUE/NGL)']).to eq(2 - 1 + 1)
+    expect(seats['Fianna Fáil (RE)']).to eq(1 + 1)
+    expect(seats['Sinn Féin (GUE/NGL)']).to eq(1 - 1 + 1)
+    expect(seats['Labour Party (S&D)']).to eq(0)
+    expect(seats['Solidarity–People Before Profit (GUE/NGL)']).to eq(0)
+    expect(seats['Social Democrats (S&D)']).to eq(0)
+    expect(seats['Renua Ireland (*)']).to eq(0)
+    expect(seats['Workers’ Party (NI)']).to eq(0)
+    expect(seats['Identity Ireland (*)']).to eq(0)
+    expect(seats['Direct Democracy Ireland (*)']).to eq(0)
+    expect(seats['Independents (*)']).to eq(1 + 1 - 1)
+    expect(seats['Independent Alliance (*)']).to eq(1 + 1 - 1)
+  end
+end