-
Notifications
You must be signed in to change notification settings - Fork 0
/
benchmark_data.R
234 lines (228 loc) · 15.8 KB
/
benchmark_data.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
soldiers <- c(1213.16872427984, 1213.16872427984, 0, 0, 0, 0, 0, 1969.42974720753,
1969.42974720753, 1969.42974720753, 1969.42974720753, 1969.42974720753,
1969.42974720753, 1969.42974720753, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 3198.35390946502, 3198.35390946502, 3198.35390946502,
3198.35390946502, 3198.35390946502, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2950, 2950, 3475, 3475, 3475,
3475, 3450, 3450, 3450, 3450, 1475, 1475, 1475, 1475, 875, 875,
875, 875, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 2302.2, 2302.2, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 959.25, 959.25, 959.25, 959.25, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 2302.2, 2302.2, 2302.2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 2302.2, 2302.2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
pop_prior <- ts(c(432203.010546745, 433515.588833139, 434832.803664612, 436154.672907517,
437481.21450074, 438812.446455998, 440148.386858147, 441489.05386549,
442834.465710083, 444184.640698049, 445539.597209884, 446899.353700772,
448263.928700899, 449633.340815766, 451007.608726509, 452386.751190214,
453770.787040237, 455159.735186523, 456553.614615932, 457952.444392557,
459356.243658053, 460765.031631962, 462178.827612038, 463597.650974579,
465021.521174757, 466450.457746945, 467884.48030506, 469323.608542886,
470767.862234419, 472217.2612342, 473671.825477655, 475131.574981436,
476596.52984376, 478066.710244758, 479542.136446813, 481022.828794912,
482508.807716989, 484000.093724281, 485496.707411668, 486998.669458038,
488506.000626629, 490018.721765393, 491536.85380735, 493060.417770943,
494589.434760404, 496123.92596611, 497663.912664949, 499209.416220684,
490312.834955893, 370097.78061538, 376389.442885842, 382788.063414901,
389295.460492954, 395913.483321334, 402644.012537797, 403851.94457541,
405063.500409136, 406278.690910364, 407497.526983095, 407497.526983095,
407497.526983095, 407497.526983095, 407497.526983095, 408720.019564044,
409946.179622736, 411176.018161604, 412409.546216089, 405810.993476632,
399318.017581006, 392928.929299709, 386642.066430914, 387028.708497345,
387415.737205842, 387803.152943048, 388190.956095991, 393470.353098897,
399608.490607239, 405362.852871984, 411443.295665063, 417902.955407005,
425759.530968657, 432614.259417252, 439795.656123578, 447624.018802578,
454159.329477096, 461335.046882834, 469962.012259543, 478280.339876537,
486028.481382537, 488798.843726417, 495250.988463606, 499609.197162086,
492564.7074821, 494633.479253525, 485532.22323526, 481113.880003819,
486454.244071862, 496426.556075335, 506801.871097309, 514860.020847756,
519184.845022878, 525934.248008175, 536852.104017206, 546891.067363437,
555889.088271234, 563716.124811037, 570281.377096413, 578157.278800382,
584483.46282475, 595050.842360345, 601564.017425146, 610324.755516915,
620674.832725001, 633815.728778828, 643445.676180634, 646866.083235305,
655209.904070807, 664045.181914454, 672771.808594347, 679971.002053551,
691069.003551668, 700210.020716578, 709453.372117118, 719637.945808322,
731223.614157709, 744271.019675283, 759418.172101694, 771785.876152989,
779793.636412227, 787591.674657706, 803073.624274757, 821772.153693192,
839905.949737228, 842503.892749989, 849714.456679819, 850387,
857634.360355178, 859631.893118028, 871216.626146634, 885145.587449123,
884519.25411579, 879403.920782457, 876005.587449123, 879135.633941274,
898053.753562437, 918031.306661866, 931672.658214292, 952433.177879293,
967459.240061434, 986435.223971168, 1002211.51368653, 1013710.49821562,
1026219.57155987, 1044951.13277817, 1063256.58605174, 1069296.34074993,
1085454.81149678, 1104670.41823848, 1114561.58631171, 1118423.74651278,
1078708.74651278, 1059820.13003763, 1069440.42934954, 1076952.28481055,
1093194.89280048, 1102468.93428576, 1107476.56907739, 1120488.44494369,
1139656.09236581, 1158693.89707283, 1176409.75980648, 1188672.22850613,
1203903.69913205, 1226776.46466051, 1236807.06999753, 1257294.61462586,
1271028.29330205, 1287335.31145774, 1303277.33867414, 1323099.31158966,
1345230.84902014, 1361843.55986727, 1372077, 1381901, 1383465,
1361824, 1379842, 1393727, 1392367, 1396640, 1409445, 1427804,
1445626, 1463071, 1486136, 1507010, 1527543, 1547724, 1561050,
1578436, 1599279, 1620851, 1636915), start = 1648)
pop_voutilainen <- ts(c(419633.614413632, 420828.517719201, 420565.17585388, 423967.459502586,
429725.401036002, 437702.940132171, 438105.883851584, 436332.297654473,
432013.932201015, 432832.65347919, 433125.543119127, 435266.742112358,
440603.241231291, 440493.920941514, 448387.207050071, 446875.014513435,
441852.373212862, 445024.050430607, 447110.695978242, 451667.869894565,
454953.690957567, 458534.985190372, 461256.201894054, 464193.170592114,
466156.189068351, 474416.91349304, 480218.116209131, 468189.425164686,
452858.529441299, 449826.683675879, 446998.852125613, 447615.099921009,
451844.358324506, 457735.036480177, 462820.046766231, 468161.153536614,
473459.311637653, 478544.379712348, 481869.736925998, 487258.417335613,
487722.392864874, 493808.854844934, 496229.132856587, 495827.776782263,
491788.80727781, 494584.442352106, 492453.186080156, 495617.9917503,
492773.443358144, 405147.123816786, 403908.738713769, 413327.751181776,
418562.332545215, 424481.567799779, 427999.02147484, 429754.142660736,
427139.212147574, 425926.909673722, 428378.503209608, 425002.775596,
428068.726343204, 414373.697391563, 396914.060568074, 398891.333369818,
404335.120520758, 408715.304750649, 406845.616031694, 406036.550794443,
401222.757283208, 396117.523412194, 397512.490697198, 396955.303003893,
396442.935800798, 402422.088380657, 404555.583475738, 411323.033401483,
418093.088250612, 424122.605242828, 429580.751734738, 437295.810232711,
446242.698498546, 453664.219807398, 461167.764139818, 469744.197115931,
474984.726959845, 482162.408987631, 490928.450811761, 498952.091425206,
508710.534610976, 511087.138331689, 517172.48186819, 520097.645063056,
511465.454297212, 511563.116613657, 494766.208527294, 489331.477907413,
496562.734263438, 506591.123686982, 517529.130085665, 525319.545973829,
529968.168824683, 536973.522088633, 545557.256215581, 555842.499230659,
565986.421931683, 577121.633762512, 584900.012993598, 595579.301478305,
603183.52211183, 611674.60393485, 619801.332124713, 629072.044426875,
639931.238140967, 651032.257870248, 659112.499495234, 661576.858873636,
670271.558377242, 677580.246433318, 686200.362593275, 694005.784018241,
705302.729139202, 715243.661952721, 721978.835601871, 730923.1899072,
740112.752656437, 750733.053909948, 764534.569526906, 775754.524426209,
782187.137745318, 787125.665900005, 799480.180846503, 815071.96066563,
829845.492390804, 838035.925095736, 846842.033917921, 850544.630619588,
866997.499486759, 877403.839920268, 889078.466836639, 902179.841604436,
902408.922500234, 896636.482177197, 891153.37683004, 891374.889231957,
907458.475777835, 922576.981890344, 929249.800123901, 944417.998755801,
960059.218823951, 980881.624906601, 996355.216221357, 1006594.79912907,
1015633.68105391, 1030534.13543059, 1047238.19365365, 1050183.68457374,
1063550.40257305, 1080547.85618918, 1094615.75188649, 1100601.56665831,
1064961.55334946, 1035170.61413462, 1049617.5494489, 1053688.08571995,
1069261), start = 1648)
pop_jutikkala <- ts(c(410400, 421537, 429912, 437633, 445327, 450141, 457838, 462562,
470891, 476011, 482910, 491067, 501433, 509020, 511692, 518261,
525219, 532091, 537754, 546503, 553703, 560984, 569010, 578145,
588437, 600391, 610145, 616448, 622585, 634804, 649569, 663887,
665908, 671580, 672077, 678364, 679396, 690010, 702963, 706270,
705088, 705623, 706566, 723269, 741003, 752372, 770831, 783526,
800141, 813526, 822603, 832659, 848906, 864695, 868186, 881763,
898364, 905607, 906787, 874772, 854785, 863301, 1053374, 1069261,
1078332, 1083230, 1095957, 1114705, 1133326, 1150654, 1162648,
1177546, 1199918, 1209729, 1229768, 1243201, 1259151, 1274744,
1294132, 1315779, 1332028, 1372077, 1381901, 1383465, 1361824,
1379842, 1393727, 1392367, 1396640, 1409445, 1427804, 1445626,
1463071, 1486136, 1507010, 1527543, 1547724, 1561050, 1578436,
1599279, 1620851, 1636915), start = 1749)
death_rate_voutilainen <- ts(c(0.0245782348, 0.0223454533, 0.02859672, 0.0310878558, 0.0298812234,
0.0310329813, 0.0433499442, 0.0387439722, 0.0319355356, 0.0346468416,
0.0337340905, 0.0262010495, 0.0249732993, 0.0289712687, 0.0224518471,
0.0375271218, 0.0464728735, 0.0290516249, 0.031550531, 0.0247329611,
0.0308216474, 0.0293778236, 0.0268964596, 0.0269762602, 0.028354051,
0.0267447006, 0.0262016309, 0.0554118033, 0.0601167778, 0.0345899448,
0.0351920541, 0.0321964457, 0.0259566484, 0.0243066862, 0.0282960463,
0.0251896077, 0.0264671854, 0.0241767661, 0.0292810002, 0.0237081474,
0.0293707841, 0.0231317729, 0.0294058314, 0.0366499172, 0.0432855227,
0.0370472218, 0.0408935707, 0.0381123752, 0.058302503, 0.2137983052,
0.0268054065, 0.015484623, 0.0260083016, 0.0259384528, 0.0292205356,
0.0333611851, 0.0426607335, 0.042588221, 0.0344976125, 0.0469645074,
0.0372852523, 0.065940017, 0.07082379, 0.0323816545, 0.0294994983,
0.0262634565, 0.0334205273, 0.0327012407, 0.0406511863, 0.0389340646,
0.0246618787, 0.0269561612, 0.0303355289, 0.0192218424, 0.0298981346,
0.0235913822, 0.0230296258, 0.0225013894, 0.0246101399, 0.0228191798,
0.0219037459, 0.0274052796, 0.0254468999, 0.0244260739, 0.0265291552,
0.0247158809, 0.0249517172, 0.0257491408, 0.0265350366, 0.0396433184,
0.0343063358, 0.0389482028, 0.0572907219, 0.0373671571, 0.0607306251,
0.039333247, 0.0225863731, 0.0213540167, 0.0200964312, 0.0249472011,
0.0310119846, 0.0283940113, 0.0270535398, 0.0273646534, 0.0284096815,
0.0267512173, 0.033197203, 0.029813809, 0.0344822098, 0.0300945241,
0.0301451028, 0.0302742233, 0.0293841165, 0.0278090636, 0.0290243307,
0.0383335719, 0.0309017174, 0.0289535688, 0.0271850192, 0.026642715,
0.0240495082, 0.026467193, 0.0299978218, 0.024486327, 0.0238957697,
0.0212371202, 0.0204721962, 0.0240411106, 0.0292653632, 0.0323794453,
0.0248418878, 0.0221176762, 0.0210805747, 0.0262859536, 0.0285146522,
0.0336779134, 0.024588373, 0.0287165756, 0.0270633878, 0.0263008669,
0.0364982016, 0.0419688781, 0.0425624427, 0.0358452026, 0.0246581381,
0.0268511878, 0.0348589369, 0.0268729296, 0.024672032, 0.0212365964,
0.0248127883, 0.0306893514, 0.0308380802, 0.0262861528, 0.0251097679,
0.0347971483, 0.0276400074, 0.0242384298, 0.0248689115, 0.0332379507,
0.0648625789, 0.0577435844, 0.0250569896, 0.0309724389, 0.0238931374
), start = 1648)
birth_rate_voutilainen <- ts(c(0.0336444326, 0.0251886862, 0.0279387595, 0.0390553087, 0.0431989797,
0.049427676, 0.0442617149, 0.0346384442, 0.0219873119, 0.0365399552,
0.0343986935, 0.0310573261, 0.0371592675, 0.0285626564, 0.040207406,
0.0340854476, 0.0351438305, 0.0361934329, 0.0361767505, 0.0348478005,
0.0380393927, 0.0372013711, 0.032793324, 0.0333151507, 0.032418262,
0.0442405819, 0.0380287506, 0.0295043976, 0.0267950314, 0.0278527096,
0.0288847872, 0.0335302916, 0.0352766687, 0.0371987881, 0.0392782294,
0.0366007434, 0.0376633947, 0.0348362373, 0.0361433946, 0.0348287875,
0.0302448262, 0.0355222153, 0.0342947691, 0.0358074685, 0.0350900559,
0.0427064138, 0.0365558886, 0.0442854278, 0.0364782027, 0.0168944318,
0.0234739928, 0.0384596562, 0.0384940714, 0.0399474137, 0.037464623,
0.0374350341, 0.0365533214, 0.0397296061, 0.0402058194, 0.0390307196,
0.043933418, 0.0325294626, 0.0277505111, 0.0372585967, 0.0429963539,
0.0370279899, 0.0288333445, 0.0306393948, 0.0286434588, 0.0261216861,
0.0281763154, 0.0255525056, 0.0289304096, 0.0341784746, 0.0350481201,
0.0400481134, 0.0392527562, 0.0367395706, 0.0372400954, 0.040413731,
0.0420221566, 0.0437664396, 0.0416803871, 0.0427925358, 0.0375120377,
0.0395518971, 0.0428396523, 0.0417704399, 0.0458947585, 0.0442335688,
0.0461277304, 0.0444506098, 0.040553361, 0.037016786, 0.0272774196,
0.0281815654, 0.0370573366, 0.0411190428, 0.0413469291, 0.0398502882,
0.0397366001, 0.04140126, 0.0427385389, 0.0458799382, 0.0463039617,
0.0461468189, 0.0464202372, 0.0478281757, 0.0470716395, 0.0439871283,
0.0432343618, 0.0449751453, 0.0463507527, 0.0449314293, 0.0413530138,
0.0419799229, 0.0439002897, 0.03971871, 0.0397638214, 0.0378227119,
0.0400983087, 0.0404201865, 0.0392947379, 0.0367214234, 0.0362897053,
0.035318168, 0.03858312, 0.0385763006, 0.0375041644, 0.038553149,
0.0402293599, 0.0412701214, 0.03899651, 0.0360524305, 0.0389592904,
0.037854904, 0.0436777715, 0.0405610547, 0.0401733128, 0.0409297525,
0.0367315104, 0.0355328878, 0.0364284329, 0.0359334608, 0.0424034254,
0.0433497474, 0.0419347321, 0.0429316203, 0.0408663315, 0.0425714514,
0.0404130773, 0.0408747527, 0.0396720956, 0.0407198477, 0.0411858952,
0.0375264445, 0.0401616437, 0.0400099333, 0.0377923323, 0.0381544766,
0.031544286, 0.0292700823, 0.0389099381, 0.0347338333, 0.0385649528
), start = 1648)
death_rate_jutikkala <- ts(c(0.023, 0.0202, 0.0191, 0.0187, 0.0187, 0.0201, 0.0194, 0.0237,
0.022, 0.0218, 0.0211, 0.0207, 0.0208, 0.0222, 0.0255, 0.0352,
0.0284, 0.0319, 0.052, 0.0316, 0.0456, 0.0381, 0.025, 0.0224,
0.0205, 0.0237, 0.0307, 0.0295, 0.0279, 0.0246, 0.0263, 0.0261,
0.0351, 0.0307, 0.0363, 0.0262, 0.0295, 0.0281, 0.0279, 0.0283,
0.0296, 0.041, 0.0331, 0.0297, 0.0286, 0.0291, 0.0258, 0.0283,
0.0302, 0.0261, 0.0239, 0.0215, 0.0215, 0.0256, 0.0305, 0.032,
0.025, 0.0219, 0.0211, 0.0265, 0.0251, 0.0312, 0.0253, 0.0303,
0.0263, 0.0237, 0.0333, 0.0377, 0.0381, 0.0409, 0.025, 0.0256,
0.032, 0.0236, 0.0234, 0.0202, 0.022, 0.0276, 0.0255, 0.0218,
0.0223, 0.0331, 0.025, 0.0212, 0.0219, 0.0292, 0.0605, 0.0592,
0.0246, 0.0308, 0.0241, 0.0271743767, 0.0323144669, 0.0258860521,
0.0231711529, 0.0237848598, 0.024598185, 0.0270658015, 0.0251421176,
0.0227023847, 0.0277210846, 0.0240516911, 0.0271412266, 0.0259055506,
0.0250513044, 0.0213316725, 0.0223943383, 0.0261285799, 0.0247566281,
0.0284477687, 0.0337825677, 0.0468034048, 0.0237889555, 0.0245708091,
0.0318859898, 0.0283201111, 0.022415206, 0.0204439825, 0.0219399762,
0.0222477241, 0.0217315239, 0.0220821362, 0.0216995528, 0.0227811935,
0.0249729349, 0.0231437955, 0.0236887998, 0.0243427681, 0.0262157779
), start = 1722)
birth_rate_jutikkala <- ts(c(0.0302, 0.0338, 0.0347, 0.0331, 0.0337, 0.0358, 0.0382, 0.0398,
0.0386, 0.0396, 0.0357, 0.0365, 0.0395, 0.0399, 0.0417, 0.0409,
0.0416, 0.0407, 0.0379, 0.0358, 0.0272, 0.029, 0.0361, 0.0429,
0.0414, 0.0396, 0.0391, 0.0425, 0.044, 0.0443, 0.0447, 0.0441,
0.0464, 0.0469, 0.0458, 0.0433, 0.0423, 0.0445, 0.0466, 0.0458,
0.0413, 0.043, 0.0457, 0.0429, 0.0415, 0.0407, 0.0429, 0.0424,
0.0409, 0.038, 0.0376, 0.0379, 0.0403, 0.0404, 0.039, 0.0401,
0.0427, 0.0432, 0.0412, 0.0377, 0.0417, 0.04, 0.0427, 0.0398,
0.0399, 0.0404, 0.0361, 0.0342, 0.037, 0.036, 0.0422, 0.0438,
0.0414, 0.0421, 0.0397, 0.0412, 0.0386, 0.0387, 0.0376, 0.0396,
0.0392, 0.0356, 0.0391, 0.0384, 0.0357, 0.0362, 0.0304, 0.0286,
0.0405, 0.0364, 0.0389, 0.0354018985, 0.0366524192, 0.0373171575,
0.038452326, 0.0387028975, 0.0381678593, 0.0359068265, 0.036337434,
0.0409736332, 0.0354608346, 0.039981525, 0.0375852336, 0.0382162266,
0.0373996661, 0.0364275051, 0.0389586701, 0.0384391319, 0.0356860439,
0.0351190136, 0.0344757547, 0.0304679606, 0.0364085163, 0.0340992174,
0.0310909408, 0.0315614618, 0.0316805551, 0.0334807859, 0.0344445936,
0.0337919349, 0.0368781861, 0.0355651256, 0.0347774171, 0.0354611029,
0.0330572371, 0.0337112179, 0.0362794734, 0.0372150185, 0.0355968392
), start = 1722)