Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_structuraltimeseries.wasp

Title produced by software

Structural Time Series Models

Date of computation

Sat, 11 Dec 2010 13:09:34 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/11/t1292072871ibd9sy1iwvp0eus.htm/, Retrieved Mon, 06 May 2024 18:57:49 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=108121, Retrieved Mon, 06 May 2024 18:57:49 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

125

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-12 13:32:37] [76963dc1903f0f612b6153510a3818cf]
- R  D  [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-17 12:14:40] [76963dc1903f0f612b6153510a3818cf]
-         [Univariate Explorative Data Analysis] [Run Sequence Plot...] [2008-12-22 18:19:51] [1ce0d16c8f4225c977b42c8fa93bc163]
- RMP       [Univariate Data Series] [Identifying Integ...] [2009-11-22 12:08:06] [b98453cac15ba1066b407e146608df68]
- RMP         [Structural Time Series Models] [Births] [2010-11-30 13:48:59] [b98453cac15ba1066b407e146608df68]
-    D            [Structural Time Series Models] [STSM: Faillisseme...] [2010-12-11 13:09:34] [bff44ea937c3f909b1dc9a8bfab919e2] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	5 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 & 5 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=108121&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]5 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=108121&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=108121&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	5 seconds
R Server	'Gwilym Jenkins' @ 72.249.127.135

Structural Time Series Model
t	Observed	Level	Slope	Seasonal	Stand. Residuals
1	46	46	0	0	0
2	62	47.9109909952398	0.457697990806483	3.2732664441853	1.53740801159490
3	66	52.2181091947632	1.23549467053244	3.11059823021179	1.66340889373574
4	59	54.8085379684848	1.45917282107061	0.885365209157957	0.524695635574755
5	58	56.4533173431123	1.48496120504533	1.09744791255815	0.0712082144066377
6	61	58.3025660066566	1.52862181359353	1.78775491036663	0.143265671402083
7	41	55.5098165849483	1.07341424352759	-3.20527967546787	-1.76638134616308
8	27	49.8660729865789	0.442407654810065	-4.36853300101980	-2.8676301503383
9	58	51.1348726332422	0.512449702602629	4.46984428057707	0.368629103685274
10	70	55.1496258961828	0.782855525330754	4.1921840034356	1.62955096914827
11	49	54.8312529351815	0.70477805531319	-2.32506185403912	-0.532976650346298
12	59	55.9269518611341	0.730405529209196	1.77587094147030	0.196188580476513
13	44	56.3322175718715	0.736551767164163	-10.1266938932362	-0.329507017818823
14	36	53.3161772825258	0.551370851135196	-4.85096872699698	-1.97250971184503
15	72	56.1461430448546	0.678454030087005	9.18232891129205	1.08285304248221
16	45	55.0580889491326	0.58285030399649	-4.74389861543802	-0.862737430640465
17	56	55.4247969873688	0.571809017501688	1.26024583279445	-0.110650260025021
18	54	55.121655007196	0.529781916320623	1.7913244432931	-0.46809716299563
19	53	55.2064826223997	0.509645646754152	-0.661514110110605	-0.247188712475582
20	35	53.2929661513387	0.405995059714273	-9.57646047019087	-1.38962527012726
21	61	54.0446390815115	0.420016801398219	5.67413367370527	0.203654897469071
22	52	53.516129640001	0.383447121500262	2.09151193050818	-0.571991077014357
23	47	53.1837978677296	0.35732766183705	-3.39326960331675	-0.441277084928003
24	51	52.7576108386102	0.331818398229640	1.42353098950672	-0.500327135262522
25	52	53.393667285405	0.334464713935509	-2.91243454034330	0.238016698230939
26	63	55.7506299100905	0.38638105192157	-1.08043725288232	1.33115093069008
27	74	57.4971548438824	0.429789242304816	11.3360004076134	0.836132538702332
28	45	57.0091907078008	0.399552381535283	-8.55575179521326	-0.560666586608115
29	51	56.1634701526185	0.359391328280942	-0.410074478700819	-0.77134350606446
30	64	57.0084644010645	0.37447520059378	5.10111512384537	0.306300014569987
31	36	54.4646481401095	0.287519041872966	-6.88373841602748	-1.87336479220132
32	30	52.3779147597683	0.21965600670457	-12.7918471892073	-1.54833518956462
33	55	51.6827015107932	0.194559197170161	7.06832201189843	-0.605031776510308
34	64	52.8949348380383	0.221277167221656	6.87173219683117	0.681880685163791
35	39	51.8538986252562	0.190131975351364	-7.51371554446141	-0.858516679986867
36	40	50.3170461622272	0.153398183928063	-2.78147007264109	-1.20700649875124
37	63	52.1336680183341	0.172850915525717	2.99194230221404	1.25744345028980
38	45	51.8776996365236	0.165163670186253	-4.98992881429014	-0.303709661346437
39	59	51.3081383160931	0.148939140248051	10.7703334599327	-0.498755239588257
40	55	52.7154226513219	0.178504347188585	-2.91213341571516	0.844384311829116
41	40	51.4607842867597	0.144739891109483	-5.52656594183589	-0.964741535525588
42	64	51.9113099812074	0.151794417157173	10.8111285654316	0.207607035354958
43	27	49.569636349891	0.0959863921279493	-12.0411062303291	-1.70961224487393
44	28	48.1399265740086	0.062982215133594	-13.6297315937725	-1.05622452453552
45	45	46.7736261612595	0.0331938580705787	4.38718216971831	-0.99864912109608
46	57	46.7764793982211	0.0325895571864374	10.3556758144455	-0.0213994993193094
47	45	47.2931297999486	0.0415731598280422	-4.42947123934695	0.345405804996543
48	69	50.4129403149992	0.09094566749257	4.70460948531226	2.23928536291905
49	60	51.5905180742013	0.103646048994531	3.32766272724329	0.817930460757922
50	56	52.9226572106711	0.121202400532406	-2.48904466989071	0.898735338757708
51	58	52.6695761920148	0.114880325275220	6.97612087111293	-0.266788689700409
52	50	52.5872799375226	0.111304197834970	-1.73128769627027	-0.139074697674046
53	51	53.0528115129368	0.117841905695975	-3.58859194197530	0.249708537245788
54	53	51.5548081476913	0.08828433395974	8.48023758748402	-1.14383034506231
55	37	50.8845016112866	0.074707801614123	-10.5605720733483	-0.540234450862252
56	22	48.8797431387795	0.0385570759719390	-17.7030046038042	-1.49067364552621
57	55	48.855315335794	0.0375004495205275	6.42471567921443	-0.0454581979877187
58	70	50.2752416536181	0.0596248123260531	13.5280250958367	1.00508440250233
59	62	52.7882342599294	0.096142318248043	-1.89890031614101	1.80000855050602
60	58	53.4735459799282	0.103874688591409	1.81880755891090	0.43799085902189
61	39	51.8304693207109	0.0847434072077441	-4.66011567788266	-1.31980013724254
62	49	51.5694135624134	0.0805485381092885	-0.976452219488245	-0.257688832278507
63	58	51.4574552413979	0.077901625644829	7.41308611130829	-0.141163896816139
64	47	51.1239732030668	0.0718433881375621	-2.28203160692184	-0.299163295924578
65	42	50.2367277875602	0.0573621991680391	-3.9531025424518	-0.696230570898364
66	62	50.3680812137623	0.0584785151567812	11.3008276782143	0.0538204409745376
67	39	50.1104978807176	0.0537837861268707	-9.69046163350035	-0.23079008958385
68	40	51.0556766264015	0.066694662416012	-15.0810395854609	0.653973747021786
69	72	53.1372293709243	0.0948982810964554	9.71202050467582	1.48589765140273
70	70	54.1771896194629	0.107521723003607	11.5027849270950	0.701013670982159
71	54	54.6367172058021	0.111910649706803	-2.258546771144	0.262945414533897
72	65	55.5498728742939	0.120927455412735	5.72160125878757	0.603880419807055

\begin{tabular}{lllllllll}
\hline
Structural Time Series Model \tabularnewline
t & Observed & Level & Slope & Seasonal & Stand. Residuals \tabularnewline
1 & 46 & 46 & 0 & 0 & 0 \tabularnewline
2 & 62 & 47.9109909952398 & 0.457697990806483 & 3.2732664441853 & 1.53740801159490 \tabularnewline
3 & 66 & 52.2181091947632 & 1.23549467053244 & 3.11059823021179 & 1.66340889373574 \tabularnewline
4 & 59 & 54.8085379684848 & 1.45917282107061 & 0.885365209157957 & 0.524695635574755 \tabularnewline
5 & 58 & 56.4533173431123 & 1.48496120504533 & 1.09744791255815 & 0.0712082144066377 \tabularnewline
6 & 61 & 58.3025660066566 & 1.52862181359353 & 1.78775491036663 & 0.143265671402083 \tabularnewline
7 & 41 & 55.5098165849483 & 1.07341424352759 & -3.20527967546787 & -1.76638134616308 \tabularnewline
8 & 27 & 49.8660729865789 & 0.442407654810065 & -4.36853300101980 & -2.8676301503383 \tabularnewline
9 & 58 & 51.1348726332422 & 0.512449702602629 & 4.46984428057707 & 0.368629103685274 \tabularnewline
10 & 70 & 55.1496258961828 & 0.782855525330754 & 4.1921840034356 & 1.62955096914827 \tabularnewline
11 & 49 & 54.8312529351815 & 0.70477805531319 & -2.32506185403912 & -0.532976650346298 \tabularnewline
12 & 59 & 55.9269518611341 & 0.730405529209196 & 1.77587094147030 & 0.196188580476513 \tabularnewline
13 & 44 & 56.3322175718715 & 0.736551767164163 & -10.1266938932362 & -0.329507017818823 \tabularnewline
14 & 36 & 53.3161772825258 & 0.551370851135196 & -4.85096872699698 & -1.97250971184503 \tabularnewline
15 & 72 & 56.1461430448546 & 0.678454030087005 & 9.18232891129205 & 1.08285304248221 \tabularnewline
16 & 45 & 55.0580889491326 & 0.58285030399649 & -4.74389861543802 & -0.862737430640465 \tabularnewline
17 & 56 & 55.4247969873688 & 0.571809017501688 & 1.26024583279445 & -0.110650260025021 \tabularnewline
18 & 54 & 55.121655007196 & 0.529781916320623 & 1.7913244432931 & -0.46809716299563 \tabularnewline
19 & 53 & 55.2064826223997 & 0.509645646754152 & -0.661514110110605 & -0.247188712475582 \tabularnewline
20 & 35 & 53.2929661513387 & 0.405995059714273 & -9.57646047019087 & -1.38962527012726 \tabularnewline
21 & 61 & 54.0446390815115 & 0.420016801398219 & 5.67413367370527 & 0.203654897469071 \tabularnewline
22 & 52 & 53.516129640001 & 0.383447121500262 & 2.09151193050818 & -0.571991077014357 \tabularnewline
23 & 47 & 53.1837978677296 & 0.35732766183705 & -3.39326960331675 & -0.441277084928003 \tabularnewline
24 & 51 & 52.7576108386102 & 0.331818398229640 & 1.42353098950672 & -0.500327135262522 \tabularnewline
25 & 52 & 53.393667285405 & 0.334464713935509 & -2.91243454034330 & 0.238016698230939 \tabularnewline
26 & 63 & 55.7506299100905 & 0.38638105192157 & -1.08043725288232 & 1.33115093069008 \tabularnewline
27 & 74 & 57.4971548438824 & 0.429789242304816 & 11.3360004076134 & 0.836132538702332 \tabularnewline
28 & 45 & 57.0091907078008 & 0.399552381535283 & -8.55575179521326 & -0.560666586608115 \tabularnewline
29 & 51 & 56.1634701526185 & 0.359391328280942 & -0.410074478700819 & -0.77134350606446 \tabularnewline
30 & 64 & 57.0084644010645 & 0.37447520059378 & 5.10111512384537 & 0.306300014569987 \tabularnewline
31 & 36 & 54.4646481401095 & 0.287519041872966 & -6.88373841602748 & -1.87336479220132 \tabularnewline
32 & 30 & 52.3779147597683 & 0.21965600670457 & -12.7918471892073 & -1.54833518956462 \tabularnewline
33 & 55 & 51.6827015107932 & 0.194559197170161 & 7.06832201189843 & -0.605031776510308 \tabularnewline
34 & 64 & 52.8949348380383 & 0.221277167221656 & 6.87173219683117 & 0.681880685163791 \tabularnewline
35 & 39 & 51.8538986252562 & 0.190131975351364 & -7.51371554446141 & -0.858516679986867 \tabularnewline
36 & 40 & 50.3170461622272 & 0.153398183928063 & -2.78147007264109 & -1.20700649875124 \tabularnewline
37 & 63 & 52.1336680183341 & 0.172850915525717 & 2.99194230221404 & 1.25744345028980 \tabularnewline
38 & 45 & 51.8776996365236 & 0.165163670186253 & -4.98992881429014 & -0.303709661346437 \tabularnewline
39 & 59 & 51.3081383160931 & 0.148939140248051 & 10.7703334599327 & -0.498755239588257 \tabularnewline
40 & 55 & 52.7154226513219 & 0.178504347188585 & -2.91213341571516 & 0.844384311829116 \tabularnewline
41 & 40 & 51.4607842867597 & 0.144739891109483 & -5.52656594183589 & -0.964741535525588 \tabularnewline
42 & 64 & 51.9113099812074 & 0.151794417157173 & 10.8111285654316 & 0.207607035354958 \tabularnewline
43 & 27 & 49.569636349891 & 0.0959863921279493 & -12.0411062303291 & -1.70961224487393 \tabularnewline
44 & 28 & 48.1399265740086 & 0.062982215133594 & -13.6297315937725 & -1.05622452453552 \tabularnewline
45 & 45 & 46.7736261612595 & 0.0331938580705787 & 4.38718216971831 & -0.99864912109608 \tabularnewline
46 & 57 & 46.7764793982211 & 0.0325895571864374 & 10.3556758144455 & -0.0213994993193094 \tabularnewline
47 & 45 & 47.2931297999486 & 0.0415731598280422 & -4.42947123934695 & 0.345405804996543 \tabularnewline
48 & 69 & 50.4129403149992 & 0.09094566749257 & 4.70460948531226 & 2.23928536291905 \tabularnewline
49 & 60 & 51.5905180742013 & 0.103646048994531 & 3.32766272724329 & 0.817930460757922 \tabularnewline
50 & 56 & 52.9226572106711 & 0.121202400532406 & -2.48904466989071 & 0.898735338757708 \tabularnewline
51 & 58 & 52.6695761920148 & 0.114880325275220 & 6.97612087111293 & -0.266788689700409 \tabularnewline
52 & 50 & 52.5872799375226 & 0.111304197834970 & -1.73128769627027 & -0.139074697674046 \tabularnewline
53 & 51 & 53.0528115129368 & 0.117841905695975 & -3.58859194197530 & 0.249708537245788 \tabularnewline
54 & 53 & 51.5548081476913 & 0.08828433395974 & 8.48023758748402 & -1.14383034506231 \tabularnewline
55 & 37 & 50.8845016112866 & 0.074707801614123 & -10.5605720733483 & -0.540234450862252 \tabularnewline
56 & 22 & 48.8797431387795 & 0.0385570759719390 & -17.7030046038042 & -1.49067364552621 \tabularnewline
57 & 55 & 48.855315335794 & 0.0375004495205275 & 6.42471567921443 & -0.0454581979877187 \tabularnewline
58 & 70 & 50.2752416536181 & 0.0596248123260531 & 13.5280250958367 & 1.00508440250233 \tabularnewline
59 & 62 & 52.7882342599294 & 0.096142318248043 & -1.89890031614101 & 1.80000855050602 \tabularnewline
60 & 58 & 53.4735459799282 & 0.103874688591409 & 1.81880755891090 & 0.43799085902189 \tabularnewline
61 & 39 & 51.8304693207109 & 0.0847434072077441 & -4.66011567788266 & -1.31980013724254 \tabularnewline
62 & 49 & 51.5694135624134 & 0.0805485381092885 & -0.976452219488245 & -0.257688832278507 \tabularnewline
63 & 58 & 51.4574552413979 & 0.077901625644829 & 7.41308611130829 & -0.141163896816139 \tabularnewline
64 & 47 & 51.1239732030668 & 0.0718433881375621 & -2.28203160692184 & -0.299163295924578 \tabularnewline
65 & 42 & 50.2367277875602 & 0.0573621991680391 & -3.9531025424518 & -0.696230570898364 \tabularnewline
66 & 62 & 50.3680812137623 & 0.0584785151567812 & 11.3008276782143 & 0.0538204409745376 \tabularnewline
67 & 39 & 50.1104978807176 & 0.0537837861268707 & -9.69046163350035 & -0.23079008958385 \tabularnewline
68 & 40 & 51.0556766264015 & 0.066694662416012 & -15.0810395854609 & 0.653973747021786 \tabularnewline
69 & 72 & 53.1372293709243 & 0.0948982810964554 & 9.71202050467582 & 1.48589765140273 \tabularnewline
70 & 70 & 54.1771896194629 & 0.107521723003607 & 11.5027849270950 & 0.701013670982159 \tabularnewline
71 & 54 & 54.6367172058021 & 0.111910649706803 & -2.258546771144 & 0.262945414533897 \tabularnewline
72 & 65 & 55.5498728742939 & 0.120927455412735 & 5.72160125878757 & 0.603880419807055 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=108121&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]46[/C][C]46[/C][C]0[/C][C]0[/C][C]0[/C][/ROW]
[ROW][C]2[/C][C]62[/C][C]47.9109909952398[/C][C]0.457697990806483[/C][C]3.2732664441853[/C][C]1.53740801159490[/C][/ROW]
[ROW][C]3[/C][C]66[/C][C]52.2181091947632[/C][C]1.23549467053244[/C][C]3.11059823021179[/C][C]1.66340889373574[/C][/ROW]
[ROW][C]4[/C][C]59[/C][C]54.8085379684848[/C][C]1.45917282107061[/C][C]0.885365209157957[/C][C]0.524695635574755[/C][/ROW]
[ROW][C]5[/C][C]58[/C][C]56.4533173431123[/C][C]1.48496120504533[/C][C]1.09744791255815[/C][C]0.0712082144066377[/C][/ROW]
[ROW][C]6[/C][C]61[/C][C]58.3025660066566[/C][C]1.52862181359353[/C][C]1.78775491036663[/C][C]0.143265671402083[/C][/ROW]
[ROW][C]7[/C][C]41[/C][C]55.5098165849483[/C][C]1.07341424352759[/C][C]-3.20527967546787[/C][C]-1.76638134616308[/C][/ROW]
[ROW][C]8[/C][C]27[/C][C]49.8660729865789[/C][C]0.442407654810065[/C][C]-4.36853300101980[/C][C]-2.8676301503383[/C][/ROW]
[ROW][C]9[/C][C]58[/C][C]51.1348726332422[/C][C]0.512449702602629[/C][C]4.46984428057707[/C][C]0.368629103685274[/C][/ROW]
[ROW][C]10[/C][C]70[/C][C]55.1496258961828[/C][C]0.782855525330754[/C][C]4.1921840034356[/C][C]1.62955096914827[/C][/ROW]
[ROW][C]11[/C][C]49[/C][C]54.8312529351815[/C][C]0.70477805531319[/C][C]-2.32506185403912[/C][C]-0.532976650346298[/C][/ROW]
[ROW][C]12[/C][C]59[/C][C]55.9269518611341[/C][C]0.730405529209196[/C][C]1.77587094147030[/C][C]0.196188580476513[/C][/ROW]
[ROW][C]13[/C][C]44[/C][C]56.3322175718715[/C][C]0.736551767164163[/C][C]-10.1266938932362[/C][C]-0.329507017818823[/C][/ROW]
[ROW][C]14[/C][C]36[/C][C]53.3161772825258[/C][C]0.551370851135196[/C][C]-4.85096872699698[/C][C]-1.97250971184503[/C][/ROW]
[ROW][C]15[/C][C]72[/C][C]56.1461430448546[/C][C]0.678454030087005[/C][C]9.18232891129205[/C][C]1.08285304248221[/C][/ROW]
[ROW][C]16[/C][C]45[/C][C]55.0580889491326[/C][C]0.58285030399649[/C][C]-4.74389861543802[/C][C]-0.862737430640465[/C][/ROW]
[ROW][C]17[/C][C]56[/C][C]55.4247969873688[/C][C]0.571809017501688[/C][C]1.26024583279445[/C][C]-0.110650260025021[/C][/ROW]
[ROW][C]18[/C][C]54[/C][C]55.121655007196[/C][C]0.529781916320623[/C][C]1.7913244432931[/C][C]-0.46809716299563[/C][/ROW]
[ROW][C]19[/C][C]53[/C][C]55.2064826223997[/C][C]0.509645646754152[/C][C]-0.661514110110605[/C][C]-0.247188712475582[/C][/ROW]
[ROW][C]20[/C][C]35[/C][C]53.2929661513387[/C][C]0.405995059714273[/C][C]-9.57646047019087[/C][C]-1.38962527012726[/C][/ROW]
[ROW][C]21[/C][C]61[/C][C]54.0446390815115[/C][C]0.420016801398219[/C][C]5.67413367370527[/C][C]0.203654897469071[/C][/ROW]
[ROW][C]22[/C][C]52[/C][C]53.516129640001[/C][C]0.383447121500262[/C][C]2.09151193050818[/C][C]-0.571991077014357[/C][/ROW]
[ROW][C]23[/C][C]47[/C][C]53.1837978677296[/C][C]0.35732766183705[/C][C]-3.39326960331675[/C][C]-0.441277084928003[/C][/ROW]
[ROW][C]24[/C][C]51[/C][C]52.7576108386102[/C][C]0.331818398229640[/C][C]1.42353098950672[/C][C]-0.500327135262522[/C][/ROW]
[ROW][C]25[/C][C]52[/C][C]53.393667285405[/C][C]0.334464713935509[/C][C]-2.91243454034330[/C][C]0.238016698230939[/C][/ROW]
[ROW][C]26[/C][C]63[/C][C]55.7506299100905[/C][C]0.38638105192157[/C][C]-1.08043725288232[/C][C]1.33115093069008[/C][/ROW]
[ROW][C]27[/C][C]74[/C][C]57.4971548438824[/C][C]0.429789242304816[/C][C]11.3360004076134[/C][C]0.836132538702332[/C][/ROW]
[ROW][C]28[/C][C]45[/C][C]57.0091907078008[/C][C]0.399552381535283[/C][C]-8.55575179521326[/C][C]-0.560666586608115[/C][/ROW]
[ROW][C]29[/C][C]51[/C][C]56.1634701526185[/C][C]0.359391328280942[/C][C]-0.410074478700819[/C][C]-0.77134350606446[/C][/ROW]
[ROW][C]30[/C][C]64[/C][C]57.0084644010645[/C][C]0.37447520059378[/C][C]5.10111512384537[/C][C]0.306300014569987[/C][/ROW]
[ROW][C]31[/C][C]36[/C][C]54.4646481401095[/C][C]0.287519041872966[/C][C]-6.88373841602748[/C][C]-1.87336479220132[/C][/ROW]
[ROW][C]32[/C][C]30[/C][C]52.3779147597683[/C][C]0.21965600670457[/C][C]-12.7918471892073[/C][C]-1.54833518956462[/C][/ROW]
[ROW][C]33[/C][C]55[/C][C]51.6827015107932[/C][C]0.194559197170161[/C][C]7.06832201189843[/C][C]-0.605031776510308[/C][/ROW]
[ROW][C]34[/C][C]64[/C][C]52.8949348380383[/C][C]0.221277167221656[/C][C]6.87173219683117[/C][C]0.681880685163791[/C][/ROW]
[ROW][C]35[/C][C]39[/C][C]51.8538986252562[/C][C]0.190131975351364[/C][C]-7.51371554446141[/C][C]-0.858516679986867[/C][/ROW]
[ROW][C]36[/C][C]40[/C][C]50.3170461622272[/C][C]0.153398183928063[/C][C]-2.78147007264109[/C][C]-1.20700649875124[/C][/ROW]
[ROW][C]37[/C][C]63[/C][C]52.1336680183341[/C][C]0.172850915525717[/C][C]2.99194230221404[/C][C]1.25744345028980[/C][/ROW]
[ROW][C]38[/C][C]45[/C][C]51.8776996365236[/C][C]0.165163670186253[/C][C]-4.98992881429014[/C][C]-0.303709661346437[/C][/ROW]
[ROW][C]39[/C][C]59[/C][C]51.3081383160931[/C][C]0.148939140248051[/C][C]10.7703334599327[/C][C]-0.498755239588257[/C][/ROW]
[ROW][C]40[/C][C]55[/C][C]52.7154226513219[/C][C]0.178504347188585[/C][C]-2.91213341571516[/C][C]0.844384311829116[/C][/ROW]
[ROW][C]41[/C][C]40[/C][C]51.4607842867597[/C][C]0.144739891109483[/C][C]-5.52656594183589[/C][C]-0.964741535525588[/C][/ROW]
[ROW][C]42[/C][C]64[/C][C]51.9113099812074[/C][C]0.151794417157173[/C][C]10.8111285654316[/C][C]0.207607035354958[/C][/ROW]
[ROW][C]43[/C][C]27[/C][C]49.569636349891[/C][C]0.0959863921279493[/C][C]-12.0411062303291[/C][C]-1.70961224487393[/C][/ROW]
[ROW][C]44[/C][C]28[/C][C]48.1399265740086[/C][C]0.062982215133594[/C][C]-13.6297315937725[/C][C]-1.05622452453552[/C][/ROW]
[ROW][C]45[/C][C]45[/C][C]46.7736261612595[/C][C]0.0331938580705787[/C][C]4.38718216971831[/C][C]-0.99864912109608[/C][/ROW]
[ROW][C]46[/C][C]57[/C][C]46.7764793982211[/C][C]0.0325895571864374[/C][C]10.3556758144455[/C][C]-0.0213994993193094[/C][/ROW]
[ROW][C]47[/C][C]45[/C][C]47.2931297999486[/C][C]0.0415731598280422[/C][C]-4.42947123934695[/C][C]0.345405804996543[/C][/ROW]
[ROW][C]48[/C][C]69[/C][C]50.4129403149992[/C][C]0.09094566749257[/C][C]4.70460948531226[/C][C]2.23928536291905[/C][/ROW]
[ROW][C]49[/C][C]60[/C][C]51.5905180742013[/C][C]0.103646048994531[/C][C]3.32766272724329[/C][C]0.817930460757922[/C][/ROW]
[ROW][C]50[/C][C]56[/C][C]52.9226572106711[/C][C]0.121202400532406[/C][C]-2.48904466989071[/C][C]0.898735338757708[/C][/ROW]
[ROW][C]51[/C][C]58[/C][C]52.6695761920148[/C][C]0.114880325275220[/C][C]6.97612087111293[/C][C]-0.266788689700409[/C][/ROW]
[ROW][C]52[/C][C]50[/C][C]52.5872799375226[/C][C]0.111304197834970[/C][C]-1.73128769627027[/C][C]-0.139074697674046[/C][/ROW]
[ROW][C]53[/C][C]51[/C][C]53.0528115129368[/C][C]0.117841905695975[/C][C]-3.58859194197530[/C][C]0.249708537245788[/C][/ROW]
[ROW][C]54[/C][C]53[/C][C]51.5548081476913[/C][C]0.08828433395974[/C][C]8.48023758748402[/C][C]-1.14383034506231[/C][/ROW]
[ROW][C]55[/C][C]37[/C][C]50.8845016112866[/C][C]0.074707801614123[/C][C]-10.5605720733483[/C][C]-0.540234450862252[/C][/ROW]
[ROW][C]56[/C][C]22[/C][C]48.8797431387795[/C][C]0.0385570759719390[/C][C]-17.7030046038042[/C][C]-1.49067364552621[/C][/ROW]
[ROW][C]57[/C][C]55[/C][C]48.855315335794[/C][C]0.0375004495205275[/C][C]6.42471567921443[/C][C]-0.0454581979877187[/C][/ROW]
[ROW][C]58[/C][C]70[/C][C]50.2752416536181[/C][C]0.0596248123260531[/C][C]13.5280250958367[/C][C]1.00508440250233[/C][/ROW]
[ROW][C]59[/C][C]62[/C][C]52.7882342599294[/C][C]0.096142318248043[/C][C]-1.89890031614101[/C][C]1.80000855050602[/C][/ROW]
[ROW][C]60[/C][C]58[/C][C]53.4735459799282[/C][C]0.103874688591409[/C][C]1.81880755891090[/C][C]0.43799085902189[/C][/ROW]
[ROW][C]61[/C][C]39[/C][C]51.8304693207109[/C][C]0.0847434072077441[/C][C]-4.66011567788266[/C][C]-1.31980013724254[/C][/ROW]
[ROW][C]62[/C][C]49[/C][C]51.5694135624134[/C][C]0.0805485381092885[/C][C]-0.976452219488245[/C][C]-0.257688832278507[/C][/ROW]
[ROW][C]63[/C][C]58[/C][C]51.4574552413979[/C][C]0.077901625644829[/C][C]7.41308611130829[/C][C]-0.141163896816139[/C][/ROW]
[ROW][C]64[/C][C]47[/C][C]51.1239732030668[/C][C]0.0718433881375621[/C][C]-2.28203160692184[/C][C]-0.299163295924578[/C][/ROW]
[ROW][C]65[/C][C]42[/C][C]50.2367277875602[/C][C]0.0573621991680391[/C][C]-3.9531025424518[/C][C]-0.696230570898364[/C][/ROW]
[ROW][C]66[/C][C]62[/C][C]50.3680812137623[/C][C]0.0584785151567812[/C][C]11.3008276782143[/C][C]0.0538204409745376[/C][/ROW]
[ROW][C]67[/C][C]39[/C][C]50.1104978807176[/C][C]0.0537837861268707[/C][C]-9.69046163350035[/C][C]-0.23079008958385[/C][/ROW]
[ROW][C]68[/C][C]40[/C][C]51.0556766264015[/C][C]0.066694662416012[/C][C]-15.0810395854609[/C][C]0.653973747021786[/C][/ROW]
[ROW][C]69[/C][C]72[/C][C]53.1372293709243[/C][C]0.0948982810964554[/C][C]9.71202050467582[/C][C]1.48589765140273[/C][/ROW]
[ROW][C]70[/C][C]70[/C][C]54.1771896194629[/C][C]0.107521723003607[/C][C]11.5027849270950[/C][C]0.701013670982159[/C][/ROW]
[ROW][C]71[/C][C]54[/C][C]54.6367172058021[/C][C]0.111910649706803[/C][C]-2.258546771144[/C][C]0.262945414533897[/C][/ROW]
[ROW][C]72[/C][C]65[/C][C]55.5498728742939[/C][C]0.120927455412735[/C][C]5.72160125878757[/C][C]0.603880419807055[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=108121&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=108121&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
t	Observed	Level	Slope	Seasonal	Stand. Residuals
1	46	46	0	0	0
2	62	47.9109909952398	0.457697990806483	3.2732664441853	1.53740801159490
3	66	52.2181091947632	1.23549467053244	3.11059823021179	1.66340889373574
4	59	54.8085379684848	1.45917282107061	0.885365209157957	0.524695635574755
5	58	56.4533173431123	1.48496120504533	1.09744791255815	0.0712082144066377
6	61	58.3025660066566	1.52862181359353	1.78775491036663	0.143265671402083
7	41	55.5098165849483	1.07341424352759	-3.20527967546787	-1.76638134616308
8	27	49.8660729865789	0.442407654810065	-4.36853300101980	-2.8676301503383
9	58	51.1348726332422	0.512449702602629	4.46984428057707	0.368629103685274
10	70	55.1496258961828	0.782855525330754	4.1921840034356	1.62955096914827
11	49	54.8312529351815	0.70477805531319	-2.32506185403912	-0.532976650346298
12	59	55.9269518611341	0.730405529209196	1.77587094147030	0.196188580476513
13	44	56.3322175718715	0.736551767164163	-10.1266938932362	-0.329507017818823
14	36	53.3161772825258	0.551370851135196	-4.85096872699698	-1.97250971184503
15	72	56.1461430448546	0.678454030087005	9.18232891129205	1.08285304248221
16	45	55.0580889491326	0.58285030399649	-4.74389861543802	-0.862737430640465
17	56	55.4247969873688	0.571809017501688	1.26024583279445	-0.110650260025021
18	54	55.121655007196	0.529781916320623	1.7913244432931	-0.46809716299563
19	53	55.2064826223997	0.509645646754152	-0.661514110110605	-0.247188712475582
20	35	53.2929661513387	0.405995059714273	-9.57646047019087	-1.38962527012726
21	61	54.0446390815115	0.420016801398219	5.67413367370527	0.203654897469071
22	52	53.516129640001	0.383447121500262	2.09151193050818	-0.571991077014357
23	47	53.1837978677296	0.35732766183705	-3.39326960331675	-0.441277084928003
24	51	52.7576108386102	0.331818398229640	1.42353098950672	-0.500327135262522
25	52	53.393667285405	0.334464713935509	-2.91243454034330	0.238016698230939
26	63	55.7506299100905	0.38638105192157	-1.08043725288232	1.33115093069008
27	74	57.4971548438824	0.429789242304816	11.3360004076134	0.836132538702332
28	45	57.0091907078008	0.399552381535283	-8.55575179521326	-0.560666586608115
29	51	56.1634701526185	0.359391328280942	-0.410074478700819	-0.77134350606446
30	64	57.0084644010645	0.37447520059378	5.10111512384537	0.306300014569987
31	36	54.4646481401095	0.287519041872966	-6.88373841602748	-1.87336479220132
32	30	52.3779147597683	0.21965600670457	-12.7918471892073	-1.54833518956462
33	55	51.6827015107932	0.194559197170161	7.06832201189843	-0.605031776510308
34	64	52.8949348380383	0.221277167221656	6.87173219683117	0.681880685163791
35	39	51.8538986252562	0.190131975351364	-7.51371554446141	-0.858516679986867
36	40	50.3170461622272	0.153398183928063	-2.78147007264109	-1.20700649875124
37	63	52.1336680183341	0.172850915525717	2.99194230221404	1.25744345028980
38	45	51.8776996365236	0.165163670186253	-4.98992881429014	-0.303709661346437
39	59	51.3081383160931	0.148939140248051	10.7703334599327	-0.498755239588257
40	55	52.7154226513219	0.178504347188585	-2.91213341571516	0.844384311829116
41	40	51.4607842867597	0.144739891109483	-5.52656594183589	-0.964741535525588
42	64	51.9113099812074	0.151794417157173	10.8111285654316	0.207607035354958
43	27	49.569636349891	0.0959863921279493	-12.0411062303291	-1.70961224487393
44	28	48.1399265740086	0.062982215133594	-13.6297315937725	-1.05622452453552
45	45	46.7736261612595	0.0331938580705787	4.38718216971831	-0.99864912109608
46	57	46.7764793982211	0.0325895571864374	10.3556758144455	-0.0213994993193094
47	45	47.2931297999486	0.0415731598280422	-4.42947123934695	0.345405804996543
48	69	50.4129403149992	0.09094566749257	4.70460948531226	2.23928536291905
49	60	51.5905180742013	0.103646048994531	3.32766272724329	0.817930460757922
50	56	52.9226572106711	0.121202400532406	-2.48904466989071	0.898735338757708
51	58	52.6695761920148	0.114880325275220	6.97612087111293	-0.266788689700409
52	50	52.5872799375226	0.111304197834970	-1.73128769627027	-0.139074697674046
53	51	53.0528115129368	0.117841905695975	-3.58859194197530	0.249708537245788
54	53	51.5548081476913	0.08828433395974	8.48023758748402	-1.14383034506231
55	37	50.8845016112866	0.074707801614123	-10.5605720733483	-0.540234450862252
56	22	48.8797431387795	0.0385570759719390	-17.7030046038042	-1.49067364552621
57	55	48.855315335794	0.0375004495205275	6.42471567921443	-0.0454581979877187
58	70	50.2752416536181	0.0596248123260531	13.5280250958367	1.00508440250233
59	62	52.7882342599294	0.096142318248043	-1.89890031614101	1.80000855050602
60	58	53.4735459799282	0.103874688591409	1.81880755891090	0.43799085902189
61	39	51.8304693207109	0.0847434072077441	-4.66011567788266	-1.31980013724254
62	49	51.5694135624134	0.0805485381092885	-0.976452219488245	-0.257688832278507
63	58	51.4574552413979	0.077901625644829	7.41308611130829	-0.141163896816139
64	47	51.1239732030668	0.0718433881375621	-2.28203160692184	-0.299163295924578
65	42	50.2367277875602	0.0573621991680391	-3.9531025424518	-0.696230570898364
66	62	50.3680812137623	0.0584785151567812	11.3008276782143	0.0538204409745376
67	39	50.1104978807176	0.0537837861268707	-9.69046163350035	-0.23079008958385
68	40	51.0556766264015	0.066694662416012	-15.0810395854609	0.653973747021786
69	72	53.1372293709243	0.0948982810964554	9.71202050467582	1.48589765140273
70	70	54.1771896194629	0.107521723003607	11.5027849270950	0.701013670982159
71	54	54.6367172058021	0.111910649706803	-2.258546771144	0.262945414533897
72	65	55.5498728742939	0.120927455412735	5.72160125878757	0.603880419807055

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Figure 3

PNG link

Postscript link

PDF link

Figure 4

PNG link

Postscript link

PDF link

Figure 5

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 12 ;

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')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code