Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_structuraltimeseries.wasp
Title produced by softwareStructural Time Series Models
Date of computationFri, 04 Dec 2009 09:36:20 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Dec/04/t12599446265csguk8a9p9gf2d.htm/, Retrieved Sun, 28 Apr 2024 00:32:38 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=63874, Retrieved Sun, 28 Apr 2024 00:32:38 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact92
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [data set] [2008-12-01 19:54:57] [b98453cac15ba1066b407e146608df68]
- RMP   [Structural Time Series Models] [] [2009-11-27 15:02:30] [b98453cac15ba1066b407e146608df68]
- R PD      [Structural Time Series Models] [WS 9 ADC3] [2009-12-04 16:36:20] [51118f1042b56b16d340924f16263174] [Current]
-   PD        [Structural Time Series Models] [ws9 forcasting3] [2009-12-04 20:39:23] [95cead3ebb75668735f848316249436a]
Feedback Forum

Post a new message
Dataseries X:
100
96.21064363
96.31280765
107.1793443
114.9066592
92.56060184
114.9995356
107.1236185
117.7765394
107.3650971
106.2970187
114.5072908
98.0031578
103.0649206
100.2879168
104.6066685
111.1544534
104.9874617
109.9284852
111.5352466
132.4974459
100.3436426
123.0983561
114.2379493
104.569518
109.0833101
106.9843039
133.6769759
124.8537197
122.5132349
116.8013374
116.0118882
129.7575926
125.1973623
143.7912139
127.9465032
130.2962757
108.4424631
129.3675118
143.6797622
131.8844618
117.6186496
118.9560695
104.8202842
134.624315
140.401226
143.8005015
153.4317823
153.2924677
127.3149438
153.5525216
136.9276493
131.7730101
144.3391845
107.4208229
113.6249652
124.2221603
102.0618557
96.36853348
111.6838488




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 2 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63874&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63874&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63874&T=0

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135







Structural Time Series Model
tObservedLevelSlopeSeasonalStand. Residuals
1100100000
296.2106436397.5373664216195-0.143860738292253-0.681713868392448-0.310174879296508
396.3128076596.6760509472387-0.182276624682697-0.144890115938404-0.104994466129451
4107.1793443102.1250013175250.004317750958574342.959809377688690.941466825970646
5114.9066592109.3265754640910.1561700547277442.752775198395071.24356833811129
692.56060184101.4305667520150.0252577203837679-5.66563470086604-1.40104564217902
7114.9995356107.5623503348380.1146620069867204.99959670820291.06408405220087
8107.1236185108.0075386467370.119328933509450-1.01595020090550.0576107766798939
9117.7765394113.0964560501710.1883590289892582.694645676486840.866223746173037
10107.3650971110.6739473804980.152550876628292-2.26567070631723-0.455090770842998
11106.2970187108.1132521377450.115808853761867-0.732036952416045-0.472946361965449
12114.5072908111.1184666375220.1544295968750192.234100316051720.503668723013701
1398.0031578106.4728887857630.414337131190102-6.45891247343987-0.982996154118947
14103.0649206104.7932905733140.384711891470705-1.00189560057220-0.341894201405566
15100.2879168103.2654178503620.332871414993055-2.35600891534035-0.303056727939821
16104.6066685103.1587617800150.3229879672649271.60098536129036-0.0736046776521629
17111.1544534104.5202245766550.3393723307820166.256757639579540.179007298202614
18104.9874617108.5183297577630.381587089940069-4.880952553800010.636389304796465
19109.9284852107.4839068799000.3679564841284342.96942262879167-0.246870615250935
20111.5352466110.5921027398250.392634153969483-0.073613182278020.477967006690232
21132.4974459119.8372321492120.4715863433330929.375171635515741.54419184670030
22100.3436426112.4709614525590.402403526426611-9.21849160530255-1.36727296540452
23123.0983561117.5090071418910.4382678307244933.867526612612860.808537090003388
24114.2379493114.7270622661860.4298860693308140.711360168868876-0.562282210151758
25104.569518112.5516688362310.470105710817692-6.98151023549014-0.477190049090728
26109.0833101110.9151731696240.457697890339571-1.07565709961084-0.359892618309900
27106.9843039109.9831909093140.434290852352844-2.52689959933962-0.229175799060881
28133.6769759120.8612469940740.6142374648546239.19863485313751.75790143069973
29124.8537197121.6456085775950.616593834122693.147493097715580.0292558078729798
30122.5132349124.5693375863400.641096411599984-2.890627201041750.40073672140986
31116.8013374120.8732368680020.603558851863338-2.49373761979692-0.756001444435605
32116.0118882119.7420129378500.590103457234771-3.09761354982556-0.302711668609346
33129.7575926118.8376361378100.57911077668470211.4652107637988-0.260852507739305
34125.1973623126.9181932947080.629649392723849-4.458938626820251.30918637823193
35143.7912139133.4478119650660.6586287318548288.187770168893641.02927781592778
36127.9465032131.0825788538650.656420039702151-2.02734274814574-0.528788945849175
37130.2962757133.9565473008110.645690061002581-4.483482735286400.393540209390653
38108.4424631123.3609601136570.598266384917787-10.8729771123176-1.93772917178489
39129.3675118128.6179602950390.652702167793489-0.8703365822692160.78432292370667
40143.6797622132.2142351077050.69256542937140210.43936042019090.49877130129205
41131.8844618131.3342467914440.6734833205873881.10783648963995-0.270291521121996
42117.6186496125.4676010756130.608359721831748-5.49990446070787-1.13463224923134
43118.9560695122.8342851595250.581681911463347-2.70625237973415-0.564789576711221
44104.8202842115.8812804151650.527876482405619-8.32920641147409-1.31489170196049
45134.624315120.4057211713600.5533026657641312.76785286425870.697746654075396
46140.401226133.5033943510870.6203456641616382.341432324726842.18952252820420
47143.8005015135.6313046912550.6256663543650057.621167176006590.263049380675878
48153.4317823145.5094942853970.6336161763190474.550455853678621.61736831017654
49153.2924677150.9351973545660.6298604583579610.6048278159543460.840666907504257
50127.3149438147.0165323440070.612005981142804-18.0664934715461-0.785919297864018
51153.5525216150.9578974580980.6416202062883581.422891572879780.566753374934996
52136.9276493139.3002277951950.5069274332977311.94534276917646-2.09631850488088
53131.7730101132.7419248005450.4320889421047531.53592589784868-1.21531374933431
54144.3391845139.1694828680790.487359611715283.022555797812561.03945457243554
55107.4208229125.1875954456650.374528298462071-12.5518191970416-2.51970021396263
56113.6249652123.7937137690370.362771627241023-9.52929085096324-0.308552980171308
57124.2221603120.5003140420970.3421353272138395.04593022686359-0.638265185866724
58102.0618557111.4086808276110.299890062570385-5.92800102403571-1.64646165455361
5996.36853348101.8723866124290.271006811103152-1.93685180440652-1.71630925625182
60111.6838488103.9162541186270.2733601737724357.123832903620360.309605310926179

\begin{tabular}{lllllllll}
\hline
Structural Time Series Model \tabularnewline
t & Observed & Level & Slope & Seasonal & Stand. Residuals \tabularnewline
1 & 100 & 100 & 0 & 0 & 0 \tabularnewline
2 & 96.21064363 & 97.5373664216195 & -0.143860738292253 & -0.681713868392448 & -0.310174879296508 \tabularnewline
3 & 96.31280765 & 96.6760509472387 & -0.182276624682697 & -0.144890115938404 & -0.104994466129451 \tabularnewline
4 & 107.1793443 & 102.125001317525 & 0.00431775095857434 & 2.95980937768869 & 0.941466825970646 \tabularnewline
5 & 114.9066592 & 109.326575464091 & 0.156170054727744 & 2.75277519839507 & 1.24356833811129 \tabularnewline
6 & 92.56060184 & 101.430566752015 & 0.0252577203837679 & -5.66563470086604 & -1.40104564217902 \tabularnewline
7 & 114.9995356 & 107.562350334838 & 0.114662006986720 & 4.9995967082029 & 1.06408405220087 \tabularnewline
8 & 107.1236185 & 108.007538646737 & 0.119328933509450 & -1.0159502009055 & 0.0576107766798939 \tabularnewline
9 & 117.7765394 & 113.096456050171 & 0.188359028989258 & 2.69464567648684 & 0.866223746173037 \tabularnewline
10 & 107.3650971 & 110.673947380498 & 0.152550876628292 & -2.26567070631723 & -0.455090770842998 \tabularnewline
11 & 106.2970187 & 108.113252137745 & 0.115808853761867 & -0.732036952416045 & -0.472946361965449 \tabularnewline
12 & 114.5072908 & 111.118466637522 & 0.154429596875019 & 2.23410031605172 & 0.503668723013701 \tabularnewline
13 & 98.0031578 & 106.472888785763 & 0.414337131190102 & -6.45891247343987 & -0.982996154118947 \tabularnewline
14 & 103.0649206 & 104.793290573314 & 0.384711891470705 & -1.00189560057220 & -0.341894201405566 \tabularnewline
15 & 100.2879168 & 103.265417850362 & 0.332871414993055 & -2.35600891534035 & -0.303056727939821 \tabularnewline
16 & 104.6066685 & 103.158761780015 & 0.322987967264927 & 1.60098536129036 & -0.0736046776521629 \tabularnewline
17 & 111.1544534 & 104.520224576655 & 0.339372330782016 & 6.25675763957954 & 0.179007298202614 \tabularnewline
18 & 104.9874617 & 108.518329757763 & 0.381587089940069 & -4.88095255380001 & 0.636389304796465 \tabularnewline
19 & 109.9284852 & 107.483906879900 & 0.367956484128434 & 2.96942262879167 & -0.246870615250935 \tabularnewline
20 & 111.5352466 & 110.592102739825 & 0.392634153969483 & -0.07361318227802 & 0.477967006690232 \tabularnewline
21 & 132.4974459 & 119.837232149212 & 0.471586343333092 & 9.37517163551574 & 1.54419184670030 \tabularnewline
22 & 100.3436426 & 112.470961452559 & 0.402403526426611 & -9.21849160530255 & -1.36727296540452 \tabularnewline
23 & 123.0983561 & 117.509007141891 & 0.438267830724493 & 3.86752661261286 & 0.808537090003388 \tabularnewline
24 & 114.2379493 & 114.727062266186 & 0.429886069330814 & 0.711360168868876 & -0.562282210151758 \tabularnewline
25 & 104.569518 & 112.551668836231 & 0.470105710817692 & -6.98151023549014 & -0.477190049090728 \tabularnewline
26 & 109.0833101 & 110.915173169624 & 0.457697890339571 & -1.07565709961084 & -0.359892618309900 \tabularnewline
27 & 106.9843039 & 109.983190909314 & 0.434290852352844 & -2.52689959933962 & -0.229175799060881 \tabularnewline
28 & 133.6769759 & 120.861246994074 & 0.614237464854623 & 9.1986348531375 & 1.75790143069973 \tabularnewline
29 & 124.8537197 & 121.645608577595 & 0.61659383412269 & 3.14749309771558 & 0.0292558078729798 \tabularnewline
30 & 122.5132349 & 124.569337586340 & 0.641096411599984 & -2.89062720104175 & 0.40073672140986 \tabularnewline
31 & 116.8013374 & 120.873236868002 & 0.603558851863338 & -2.49373761979692 & -0.756001444435605 \tabularnewline
32 & 116.0118882 & 119.742012937850 & 0.590103457234771 & -3.09761354982556 & -0.302711668609346 \tabularnewline
33 & 129.7575926 & 118.837636137810 & 0.579110776684702 & 11.4652107637988 & -0.260852507739305 \tabularnewline
34 & 125.1973623 & 126.918193294708 & 0.629649392723849 & -4.45893862682025 & 1.30918637823193 \tabularnewline
35 & 143.7912139 & 133.447811965066 & 0.658628731854828 & 8.18777016889364 & 1.02927781592778 \tabularnewline
36 & 127.9465032 & 131.082578853865 & 0.656420039702151 & -2.02734274814574 & -0.528788945849175 \tabularnewline
37 & 130.2962757 & 133.956547300811 & 0.645690061002581 & -4.48348273528640 & 0.393540209390653 \tabularnewline
38 & 108.4424631 & 123.360960113657 & 0.598266384917787 & -10.8729771123176 & -1.93772917178489 \tabularnewline
39 & 129.3675118 & 128.617960295039 & 0.652702167793489 & -0.870336582269216 & 0.78432292370667 \tabularnewline
40 & 143.6797622 & 132.214235107705 & 0.692565429371402 & 10.4393604201909 & 0.49877130129205 \tabularnewline
41 & 131.8844618 & 131.334246791444 & 0.673483320587388 & 1.10783648963995 & -0.270291521121996 \tabularnewline
42 & 117.6186496 & 125.467601075613 & 0.608359721831748 & -5.49990446070787 & -1.13463224923134 \tabularnewline
43 & 118.9560695 & 122.834285159525 & 0.581681911463347 & -2.70625237973415 & -0.564789576711221 \tabularnewline
44 & 104.8202842 & 115.881280415165 & 0.527876482405619 & -8.32920641147409 & -1.31489170196049 \tabularnewline
45 & 134.624315 & 120.405721171360 & 0.55330266576413 & 12.7678528642587 & 0.697746654075396 \tabularnewline
46 & 140.401226 & 133.503394351087 & 0.620345664161638 & 2.34143232472684 & 2.18952252820420 \tabularnewline
47 & 143.8005015 & 135.631304691255 & 0.625666354365005 & 7.62116717600659 & 0.263049380675878 \tabularnewline
48 & 153.4317823 & 145.509494285397 & 0.633616176319047 & 4.55045585367862 & 1.61736831017654 \tabularnewline
49 & 153.2924677 & 150.935197354566 & 0.629860458357961 & 0.604827815954346 & 0.840666907504257 \tabularnewline
50 & 127.3149438 & 147.016532344007 & 0.612005981142804 & -18.0664934715461 & -0.785919297864018 \tabularnewline
51 & 153.5525216 & 150.957897458098 & 0.641620206288358 & 1.42289157287978 & 0.566753374934996 \tabularnewline
52 & 136.9276493 & 139.300227795195 & 0.506927433297731 & 1.94534276917646 & -2.09631850488088 \tabularnewline
53 & 131.7730101 & 132.741924800545 & 0.432088942104753 & 1.53592589784868 & -1.21531374933431 \tabularnewline
54 & 144.3391845 & 139.169482868079 & 0.48735961171528 & 3.02255579781256 & 1.03945457243554 \tabularnewline
55 & 107.4208229 & 125.187595445665 & 0.374528298462071 & -12.5518191970416 & -2.51970021396263 \tabularnewline
56 & 113.6249652 & 123.793713769037 & 0.362771627241023 & -9.52929085096324 & -0.308552980171308 \tabularnewline
57 & 124.2221603 & 120.500314042097 & 0.342135327213839 & 5.04593022686359 & -0.638265185866724 \tabularnewline
58 & 102.0618557 & 111.408680827611 & 0.299890062570385 & -5.92800102403571 & -1.64646165455361 \tabularnewline
59 & 96.36853348 & 101.872386612429 & 0.271006811103152 & -1.93685180440652 & -1.71630925625182 \tabularnewline
60 & 111.6838488 & 103.916254118627 & 0.273360173772435 & 7.12383290362036 & 0.309605310926179 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63874&T=1

[TABLE]
[ROW][C]Structural Time Series Model[/C][/ROW]
[ROW][C]t[/C][C]Observed[/C][C]Level[/C][C]Slope[/C][C]Seasonal[/C][C]Stand. Residuals[/C][/ROW]
[ROW][C]1[/C][C]100[/C][C]100[/C][C]0[/C][C]0[/C][C]0[/C][/ROW]
[ROW][C]2[/C][C]96.21064363[/C][C]97.5373664216195[/C][C]-0.143860738292253[/C][C]-0.681713868392448[/C][C]-0.310174879296508[/C][/ROW]
[ROW][C]3[/C][C]96.31280765[/C][C]96.6760509472387[/C][C]-0.182276624682697[/C][C]-0.144890115938404[/C][C]-0.104994466129451[/C][/ROW]
[ROW][C]4[/C][C]107.1793443[/C][C]102.125001317525[/C][C]0.00431775095857434[/C][C]2.95980937768869[/C][C]0.941466825970646[/C][/ROW]
[ROW][C]5[/C][C]114.9066592[/C][C]109.326575464091[/C][C]0.156170054727744[/C][C]2.75277519839507[/C][C]1.24356833811129[/C][/ROW]
[ROW][C]6[/C][C]92.56060184[/C][C]101.430566752015[/C][C]0.0252577203837679[/C][C]-5.66563470086604[/C][C]-1.40104564217902[/C][/ROW]
[ROW][C]7[/C][C]114.9995356[/C][C]107.562350334838[/C][C]0.114662006986720[/C][C]4.9995967082029[/C][C]1.06408405220087[/C][/ROW]
[ROW][C]8[/C][C]107.1236185[/C][C]108.007538646737[/C][C]0.119328933509450[/C][C]-1.0159502009055[/C][C]0.0576107766798939[/C][/ROW]
[ROW][C]9[/C][C]117.7765394[/C][C]113.096456050171[/C][C]0.188359028989258[/C][C]2.69464567648684[/C][C]0.866223746173037[/C][/ROW]
[ROW][C]10[/C][C]107.3650971[/C][C]110.673947380498[/C][C]0.152550876628292[/C][C]-2.26567070631723[/C][C]-0.455090770842998[/C][/ROW]
[ROW][C]11[/C][C]106.2970187[/C][C]108.113252137745[/C][C]0.115808853761867[/C][C]-0.732036952416045[/C][C]-0.472946361965449[/C][/ROW]
[ROW][C]12[/C][C]114.5072908[/C][C]111.118466637522[/C][C]0.154429596875019[/C][C]2.23410031605172[/C][C]0.503668723013701[/C][/ROW]
[ROW][C]13[/C][C]98.0031578[/C][C]106.472888785763[/C][C]0.414337131190102[/C][C]-6.45891247343987[/C][C]-0.982996154118947[/C][/ROW]
[ROW][C]14[/C][C]103.0649206[/C][C]104.793290573314[/C][C]0.384711891470705[/C][C]-1.00189560057220[/C][C]-0.341894201405566[/C][/ROW]
[ROW][C]15[/C][C]100.2879168[/C][C]103.265417850362[/C][C]0.332871414993055[/C][C]-2.35600891534035[/C][C]-0.303056727939821[/C][/ROW]
[ROW][C]16[/C][C]104.6066685[/C][C]103.158761780015[/C][C]0.322987967264927[/C][C]1.60098536129036[/C][C]-0.0736046776521629[/C][/ROW]
[ROW][C]17[/C][C]111.1544534[/C][C]104.520224576655[/C][C]0.339372330782016[/C][C]6.25675763957954[/C][C]0.179007298202614[/C][/ROW]
[ROW][C]18[/C][C]104.9874617[/C][C]108.518329757763[/C][C]0.381587089940069[/C][C]-4.88095255380001[/C][C]0.636389304796465[/C][/ROW]
[ROW][C]19[/C][C]109.9284852[/C][C]107.483906879900[/C][C]0.367956484128434[/C][C]2.96942262879167[/C][C]-0.246870615250935[/C][/ROW]
[ROW][C]20[/C][C]111.5352466[/C][C]110.592102739825[/C][C]0.392634153969483[/C][C]-0.07361318227802[/C][C]0.477967006690232[/C][/ROW]
[ROW][C]21[/C][C]132.4974459[/C][C]119.837232149212[/C][C]0.471586343333092[/C][C]9.37517163551574[/C][C]1.54419184670030[/C][/ROW]
[ROW][C]22[/C][C]100.3436426[/C][C]112.470961452559[/C][C]0.402403526426611[/C][C]-9.21849160530255[/C][C]-1.36727296540452[/C][/ROW]
[ROW][C]23[/C][C]123.0983561[/C][C]117.509007141891[/C][C]0.438267830724493[/C][C]3.86752661261286[/C][C]0.808537090003388[/C][/ROW]
[ROW][C]24[/C][C]114.2379493[/C][C]114.727062266186[/C][C]0.429886069330814[/C][C]0.711360168868876[/C][C]-0.562282210151758[/C][/ROW]
[ROW][C]25[/C][C]104.569518[/C][C]112.551668836231[/C][C]0.470105710817692[/C][C]-6.98151023549014[/C][C]-0.477190049090728[/C][/ROW]
[ROW][C]26[/C][C]109.0833101[/C][C]110.915173169624[/C][C]0.457697890339571[/C][C]-1.07565709961084[/C][C]-0.359892618309900[/C][/ROW]
[ROW][C]27[/C][C]106.9843039[/C][C]109.983190909314[/C][C]0.434290852352844[/C][C]-2.52689959933962[/C][C]-0.229175799060881[/C][/ROW]
[ROW][C]28[/C][C]133.6769759[/C][C]120.861246994074[/C][C]0.614237464854623[/C][C]9.1986348531375[/C][C]1.75790143069973[/C][/ROW]
[ROW][C]29[/C][C]124.8537197[/C][C]121.645608577595[/C][C]0.61659383412269[/C][C]3.14749309771558[/C][C]0.0292558078729798[/C][/ROW]
[ROW][C]30[/C][C]122.5132349[/C][C]124.569337586340[/C][C]0.641096411599984[/C][C]-2.89062720104175[/C][C]0.40073672140986[/C][/ROW]
[ROW][C]31[/C][C]116.8013374[/C][C]120.873236868002[/C][C]0.603558851863338[/C][C]-2.49373761979692[/C][C]-0.756001444435605[/C][/ROW]
[ROW][C]32[/C][C]116.0118882[/C][C]119.742012937850[/C][C]0.590103457234771[/C][C]-3.09761354982556[/C][C]-0.302711668609346[/C][/ROW]
[ROW][C]33[/C][C]129.7575926[/C][C]118.837636137810[/C][C]0.579110776684702[/C][C]11.4652107637988[/C][C]-0.260852507739305[/C][/ROW]
[ROW][C]34[/C][C]125.1973623[/C][C]126.918193294708[/C][C]0.629649392723849[/C][C]-4.45893862682025[/C][C]1.30918637823193[/C][/ROW]
[ROW][C]35[/C][C]143.7912139[/C][C]133.447811965066[/C][C]0.658628731854828[/C][C]8.18777016889364[/C][C]1.02927781592778[/C][/ROW]
[ROW][C]36[/C][C]127.9465032[/C][C]131.082578853865[/C][C]0.656420039702151[/C][C]-2.02734274814574[/C][C]-0.528788945849175[/C][/ROW]
[ROW][C]37[/C][C]130.2962757[/C][C]133.956547300811[/C][C]0.645690061002581[/C][C]-4.48348273528640[/C][C]0.393540209390653[/C][/ROW]
[ROW][C]38[/C][C]108.4424631[/C][C]123.360960113657[/C][C]0.598266384917787[/C][C]-10.8729771123176[/C][C]-1.93772917178489[/C][/ROW]
[ROW][C]39[/C][C]129.3675118[/C][C]128.617960295039[/C][C]0.652702167793489[/C][C]-0.870336582269216[/C][C]0.78432292370667[/C][/ROW]
[ROW][C]40[/C][C]143.6797622[/C][C]132.214235107705[/C][C]0.692565429371402[/C][C]10.4393604201909[/C][C]0.49877130129205[/C][/ROW]
[ROW][C]41[/C][C]131.8844618[/C][C]131.334246791444[/C][C]0.673483320587388[/C][C]1.10783648963995[/C][C]-0.270291521121996[/C][/ROW]
[ROW][C]42[/C][C]117.6186496[/C][C]125.467601075613[/C][C]0.608359721831748[/C][C]-5.49990446070787[/C][C]-1.13463224923134[/C][/ROW]
[ROW][C]43[/C][C]118.9560695[/C][C]122.834285159525[/C][C]0.581681911463347[/C][C]-2.70625237973415[/C][C]-0.564789576711221[/C][/ROW]
[ROW][C]44[/C][C]104.8202842[/C][C]115.881280415165[/C][C]0.527876482405619[/C][C]-8.32920641147409[/C][C]-1.31489170196049[/C][/ROW]
[ROW][C]45[/C][C]134.624315[/C][C]120.405721171360[/C][C]0.55330266576413[/C][C]12.7678528642587[/C][C]0.697746654075396[/C][/ROW]
[ROW][C]46[/C][C]140.401226[/C][C]133.503394351087[/C][C]0.620345664161638[/C][C]2.34143232472684[/C][C]2.18952252820420[/C][/ROW]
[ROW][C]47[/C][C]143.8005015[/C][C]135.631304691255[/C][C]0.625666354365005[/C][C]7.62116717600659[/C][C]0.263049380675878[/C][/ROW]
[ROW][C]48[/C][C]153.4317823[/C][C]145.509494285397[/C][C]0.633616176319047[/C][C]4.55045585367862[/C][C]1.61736831017654[/C][/ROW]
[ROW][C]49[/C][C]153.2924677[/C][C]150.935197354566[/C][C]0.629860458357961[/C][C]0.604827815954346[/C][C]0.840666907504257[/C][/ROW]
[ROW][C]50[/C][C]127.3149438[/C][C]147.016532344007[/C][C]0.612005981142804[/C][C]-18.0664934715461[/C][C]-0.785919297864018[/C][/ROW]
[ROW][C]51[/C][C]153.5525216[/C][C]150.957897458098[/C][C]0.641620206288358[/C][C]1.42289157287978[/C][C]0.566753374934996[/C][/ROW]
[ROW][C]52[/C][C]136.9276493[/C][C]139.300227795195[/C][C]0.506927433297731[/C][C]1.94534276917646[/C][C]-2.09631850488088[/C][/ROW]
[ROW][C]53[/C][C]131.7730101[/C][C]132.741924800545[/C][C]0.432088942104753[/C][C]1.53592589784868[/C][C]-1.21531374933431[/C][/ROW]
[ROW][C]54[/C][C]144.3391845[/C][C]139.169482868079[/C][C]0.48735961171528[/C][C]3.02255579781256[/C][C]1.03945457243554[/C][/ROW]
[ROW][C]55[/C][C]107.4208229[/C][C]125.187595445665[/C][C]0.374528298462071[/C][C]-12.5518191970416[/C][C]-2.51970021396263[/C][/ROW]
[ROW][C]56[/C][C]113.6249652[/C][C]123.793713769037[/C][C]0.362771627241023[/C][C]-9.52929085096324[/C][C]-0.308552980171308[/C][/ROW]
[ROW][C]57[/C][C]124.2221603[/C][C]120.500314042097[/C][C]0.342135327213839[/C][C]5.04593022686359[/C][C]-0.638265185866724[/C][/ROW]
[ROW][C]58[/C][C]102.0618557[/C][C]111.408680827611[/C][C]0.299890062570385[/C][C]-5.92800102403571[/C][C]-1.64646165455361[/C][/ROW]
[ROW][C]59[/C][C]96.36853348[/C][C]101.872386612429[/C][C]0.271006811103152[/C][C]-1.93685180440652[/C][C]-1.71630925625182[/C][/ROW]
[ROW][C]60[/C][C]111.6838488[/C][C]103.916254118627[/C][C]0.273360173772435[/C][C]7.12383290362036[/C][C]0.309605310926179[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63874&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63874&T=1

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Structural Time Series Model
tObservedLevelSlopeSeasonalStand. Residuals
1100100000
296.2106436397.5373664216195-0.143860738292253-0.681713868392448-0.310174879296508
396.3128076596.6760509472387-0.182276624682697-0.144890115938404-0.104994466129451
4107.1793443102.1250013175250.004317750958574342.959809377688690.941466825970646
5114.9066592109.3265754640910.1561700547277442.752775198395071.24356833811129
692.56060184101.4305667520150.0252577203837679-5.66563470086604-1.40104564217902
7114.9995356107.5623503348380.1146620069867204.99959670820291.06408405220087
8107.1236185108.0075386467370.119328933509450-1.01595020090550.0576107766798939
9117.7765394113.0964560501710.1883590289892582.694645676486840.866223746173037
10107.3650971110.6739473804980.152550876628292-2.26567070631723-0.455090770842998
11106.2970187108.1132521377450.115808853761867-0.732036952416045-0.472946361965449
12114.5072908111.1184666375220.1544295968750192.234100316051720.503668723013701
1398.0031578106.4728887857630.414337131190102-6.45891247343987-0.982996154118947
14103.0649206104.7932905733140.384711891470705-1.00189560057220-0.341894201405566
15100.2879168103.2654178503620.332871414993055-2.35600891534035-0.303056727939821
16104.6066685103.1587617800150.3229879672649271.60098536129036-0.0736046776521629
17111.1544534104.5202245766550.3393723307820166.256757639579540.179007298202614
18104.9874617108.5183297577630.381587089940069-4.880952553800010.636389304796465
19109.9284852107.4839068799000.3679564841284342.96942262879167-0.246870615250935
20111.5352466110.5921027398250.392634153969483-0.073613182278020.477967006690232
21132.4974459119.8372321492120.4715863433330929.375171635515741.54419184670030
22100.3436426112.4709614525590.402403526426611-9.21849160530255-1.36727296540452
23123.0983561117.5090071418910.4382678307244933.867526612612860.808537090003388
24114.2379493114.7270622661860.4298860693308140.711360168868876-0.562282210151758
25104.569518112.5516688362310.470105710817692-6.98151023549014-0.477190049090728
26109.0833101110.9151731696240.457697890339571-1.07565709961084-0.359892618309900
27106.9843039109.9831909093140.434290852352844-2.52689959933962-0.229175799060881
28133.6769759120.8612469940740.6142374648546239.19863485313751.75790143069973
29124.8537197121.6456085775950.616593834122693.147493097715580.0292558078729798
30122.5132349124.5693375863400.641096411599984-2.890627201041750.40073672140986
31116.8013374120.8732368680020.603558851863338-2.49373761979692-0.756001444435605
32116.0118882119.7420129378500.590103457234771-3.09761354982556-0.302711668609346
33129.7575926118.8376361378100.57911077668470211.4652107637988-0.260852507739305
34125.1973623126.9181932947080.629649392723849-4.458938626820251.30918637823193
35143.7912139133.4478119650660.6586287318548288.187770168893641.02927781592778
36127.9465032131.0825788538650.656420039702151-2.02734274814574-0.528788945849175
37130.2962757133.9565473008110.645690061002581-4.483482735286400.393540209390653
38108.4424631123.3609601136570.598266384917787-10.8729771123176-1.93772917178489
39129.3675118128.6179602950390.652702167793489-0.8703365822692160.78432292370667
40143.6797622132.2142351077050.69256542937140210.43936042019090.49877130129205
41131.8844618131.3342467914440.6734833205873881.10783648963995-0.270291521121996
42117.6186496125.4676010756130.608359721831748-5.49990446070787-1.13463224923134
43118.9560695122.8342851595250.581681911463347-2.70625237973415-0.564789576711221
44104.8202842115.8812804151650.527876482405619-8.32920641147409-1.31489170196049
45134.624315120.4057211713600.5533026657641312.76785286425870.697746654075396
46140.401226133.5033943510870.6203456641616382.341432324726842.18952252820420
47143.8005015135.6313046912550.6256663543650057.621167176006590.263049380675878
48153.4317823145.5094942853970.6336161763190474.550455853678621.61736831017654
49153.2924677150.9351973545660.6298604583579610.6048278159543460.840666907504257
50127.3149438147.0165323440070.612005981142804-18.0664934715461-0.785919297864018
51153.5525216150.9578974580980.6416202062883581.422891572879780.566753374934996
52136.9276493139.3002277951950.5069274332977311.94534276917646-2.09631850488088
53131.7730101132.7419248005450.4320889421047531.53592589784868-1.21531374933431
54144.3391845139.1694828680790.487359611715283.022555797812561.03945457243554
55107.4208229125.1875954456650.374528298462071-12.5518191970416-2.51970021396263
56113.6249652123.7937137690370.362771627241023-9.52929085096324-0.308552980171308
57124.2221603120.5003140420970.3421353272138395.04593022686359-0.638265185866724
58102.0618557111.4086808276110.299890062570385-5.92800102403571-1.64646165455361
5996.36853348101.8723866124290.271006811103152-1.93685180440652-1.71630925625182
60111.6838488103.9162541186270.2733601737724357.123832903620360.309605310926179



Parameters (Session):
par1 = TRUE ; par2 = 1 ; par3 = 1 ; par4 = 0 ; par5 = 12 ; par6 = 3 ; par7 = 1 ; par8 = 2 ; par9 = 1 ;
Parameters (R input):
par1 = 12 ;
R code (references can be found in the software module):
par1 <- as.numeric(par1)
nx <- length(x)
x <- ts(x,frequency=par1)
m <- StructTS(x,type='BSM')
m$coef
m$fitted
m$resid
mylevel <- as.numeric(m$fitted[,'level'])
myslope <- as.numeric(m$fitted[,'slope'])
myseas <- as.numeric(m$fitted[,'sea'])
myresid <- as.numeric(m$resid)
myfit <- mylevel+myseas
mylagmax <- nx/2
bitmap(file='test2.png')
op <- par(mfrow = c(2,2))
acf(as.numeric(x),lag.max = mylagmax,main='Observed')
acf(mylevel,na.action=na.pass,lag.max = mylagmax,main='Level')
acf(myseas,na.action=na.pass,lag.max = mylagmax,main='Seasonal')
acf(myresid,na.action=na.pass,lag.max = mylagmax,main='Standardized Residals')
par(op)
dev.off()
bitmap(file='test3.png')
op <- par(mfrow = c(2,2))
spectrum(as.numeric(x),main='Observed')
spectrum(mylevel,main='Level')
spectrum(myseas,main='Seasonal')
spectrum(myresid,main='Standardized Residals')
par(op)
dev.off()
bitmap(file='test4.png')
op <- par(mfrow = c(2,2))
cpgram(as.numeric(x),main='Observed')
cpgram(mylevel,main='Level')
cpgram(myseas,main='Seasonal')
cpgram(myresid,main='Standardized Residals')
par(op)
dev.off()
bitmap(file='test1.png')
plot(as.numeric(m$resid),main='Standardized Residuals',ylab='Residuals',xlab='time',type='b')
grid()
dev.off()
bitmap(file='test5.png')
op <- par(mfrow = c(2,2))
hist(m$resid,main='Residual Histogram')
plot(density(m$resid),main='Residual Kernel Density')
qqnorm(m$resid,main='Residual Normal QQ Plot')
qqline(m$resid)
plot(m$resid^2, myfit^2,main='Sq.Resid vs. Sq.Fit',xlab='Squared residuals',ylab='Squared Fit')
par(op)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Structural Time Series Model',6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Observed',header=TRUE)
a<-table.element(a,'Level',header=TRUE)
a<-table.element(a,'Slope',header=TRUE)
a<-table.element(a,'Seasonal',header=TRUE)
a<-table.element(a,'Stand. Residuals',header=TRUE)
a<-table.row.end(a)
for (i in 1:nx) {
a<-table.row.start(a)
a<-table.element(a,i,header=TRUE)
a<-table.element(a,x[i])
a<-table.element(a,mylevel[i])
a<-table.element(a,myslope[i])
a<-table.element(a,myseas[i])
a<-table.element(a,myresid[i])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')