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

Sun, 19 Dec 2010 16:16:29 +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/19/t1292775242qx2gmw0x2wjhktt.htm/, Retrieved Sun, 05 May 2024 06:18:45 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=112559, Retrieved Sun, 05 May 2024 06:18:45 +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

124

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]
- RMPD  [Structural Time Series Models] [STSM] [2010-12-07 13:17:11] [8b7e5d4d87654725a776c7f35eb4752f]
-    D    [Structural Time Series Models] [] [2010-12-09 20:46:27] [126c9e58bb659a0bfb4675d843c2c69e]
-    D        [Structural Time Series Models] [] [2010-12-19 16:16:29] [a3cd012a7211edfe9ed4466e21aef6a6] [Current]
-    D          [Structural Time Series Models] [] [2010-12-21 12:42:27] [126c9e58bb659a0bfb4675d843c2c69e] 

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	3 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 & 3 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=112559&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]3 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=112559&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=112559&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	3 seconds
R Server	'Gwilym Jenkins' @ 72.249.127.135

Structural Time Series Model
t	Observed	Level	Slope	Seasonal	Stand. Residuals
1	41.85	41.85	0	0	0
2	41.75	41.756206659243	-0.00655532687009518	-0.00511075833543904	-0.611576562414529
3	41.75	41.7549293250002	-0.00611881293324532	-0.00509238413568755	0.055120253678442
4	41.75	41.7549006470643	-0.00542961114489046	-0.00508222890379219	0.0623944469666825
5	41.58	41.5899275202046	-0.0272835816731802	-0.00530433508855795	-1.61054162477662
6	41.61	41.6137933608939	-0.0193905607223459	-0.00524428203380805	0.510656844210574
7	41.42	41.4299976569326	-0.0467620739954582	-0.0054049140975037	-1.62835161924286
8	41.37	41.37562148999	-0.048093247715485	-0.0054110433706842	-0.0749955675225111
9	41.37	41.3741024422218	-0.0396889756507971	-0.0053803641816713	0.456990456802158
10	41.33	41.3353541743772	-0.0395157068168054	-0.00537985943401774	0.00920652419246916
11	41.37	41.3732396978148	-0.0250679423905262	-0.00534613292733442	0.756198525342461
12	41.34	41.3454217800979	-0.0255857183190295	-0.00534710408280679	-0.0268356937684549
13	41.33	41.2866305128029	-0.0315349866005209	0.0442366669905512	-0.379472202595628
14	41.29	41.2924523525088	-0.0245981604354552	-0.00316261876963741	0.307181895752628
15	41.29	41.2924931764532	-0.0199060349383844	-0.00316016356199649	0.24002500134155
16	41.27	41.2731453562957	-0.0197995357958255	-0.00316044988567028	0.0054330928948378
17	41.04	41.0486068882894	-0.0588957057941325	-0.00307165983083078	-1.99266461057082
18	40.9	40.9053234180359	-0.0750196555600695	-0.00304204780803118	-0.821336457046198
19	40.89	40.8914074886272	-0.0633399041356362	-0.00305936552569191	0.59473069339813
20	40.72	40.7258006444799	-0.0828931627038084	-0.00303595913526675	-0.995404710614221
21	40.72	40.7209408084507	-0.0679705589322267	-0.00305038145823724	0.759549208038474
22	40.58	40.5848809858171	-0.0809931874332582	-0.00304021952270384	-0.662773013995983
23	40.24	40.2498767906408	-0.129579188708272	-0.00300960807409043	-2.4725659939258
24	40.07	40.0742500389809	-0.138387494447856	-0.00300512717554939	-0.448239296492928
25	40.12	40.0580116509722	-0.115378365967852	0.0587519160589965	1.29182445855628
26	40.1	40.0995830626361	-0.0859718933966938	-0.00301741420153364	1.38099386918218
27	40.1	40.1006658136264	-0.0693166624135937	-0.00301951013059250	0.847470039602337
28	40.08	40.0816798924705	-0.0596851311650948	-0.00303994999745196	0.489738862867107
29	40.06	40.0619731318085	-0.0520357579506134	-0.00305356282599321	0.389040522891892
30	39.99	39.9934934830199	-0.0551818262367899	-0.00304903504596354	-0.160033497580385
31	40.05	40.0500534714982	-0.0338042033228474	-0.00307387988204049	1.08755313538400
32	39.66	39.6723094547514	-0.0996028210092713	-0.00301213234845259	-3.34764464808775
33	39.66	39.6606475692484	-0.0827790952756601	-0.00302488042644987	0.85598332373161
34	39.67	39.6705306976985	-0.0650521439734064	-0.00303572650377135	0.901966834302367
35	39.56	39.5641491488406	-0.072958794133059	-0.0030318203892285	-0.402307169190279
36	39.64	39.6390457907790	-0.0446726650604528	-0.00304310374479894	1.43927724735378
37	39.73	39.6820643210371	-0.0280565492712486	0.0455962631087408	0.903116752463959
38	39.7	39.7024882301847	-0.0189261573335912	-0.00361426502201767	0.438956779837005
39	39.7	39.7030868243209	-0.0151905984131268	-0.00361471212945973	0.190071474671603
40	39.68	39.6837261396289	-0.0159885750584377	-0.0036134388135416	-0.0405814342615171
41	39.76	39.7611135383847	0.00187758982478193	-0.00363733312265000	0.908755126876263
42	40	39.9973509831656	0.0467159285954982	-0.00368582746583371	2.28098627094977
43	39.96	39.9657887635445	0.031740107668119	-0.00367274811489267	-0.761906248749854
44	40.01	40.0132498797614	0.0347477253435453	-0.00367486911592957	0.153023501283735
45	40.01	40.0145747850922	0.0283535821764099	-0.00367122813778830	-0.325337336267606
46	40.01	40.0144389296393	0.0229032500503587	-0.00366872218233920	-0.277322418018295
47	40	40.0045528653695	0.0166302870116107	-0.00366639336209202	-0.319184327637486
48	39.91	39.9164908325698	-0.00339861813592170	-0.00366038948023593	-1.01913211199611
49	39.86	39.8304527756292	-0.0190967157457386	0.0317594473143884	-0.839560336643105
50	39.79	39.7934720853097	-0.0224757867674678	-0.00304263358392459	-0.164528879740290
51	39.79	39.7924626444132	-0.0183687714963313	-0.0030430294134004	0.208973624250545
52	39.8	39.8022878425352	-0.0129738620872287	-0.00304987919200757	0.274391768471011
53	39.64	39.6468711342301	-0.0402278185437615	-0.00302087800367791	-1.38636913038035
54	39.55	39.5544238695646	-0.0502185512037577	-0.00301228083196918	-0.508267754823595
55	39.36	39.3667109058834	-0.076523484643191	-0.00299400211797473	-1.33832776940936
56	39.28	39.2831826186297	-0.0778635987440587	-0.00299325020006442	-0.0681846572345311

\begin{tabular}{lllllllll}
\hline
Structural Time Series Model \tabularnewline
t & Observed & Level & Slope & Seasonal & Stand. Residuals \tabularnewline
1 & 41.85 & 41.85 & 0 & 0 & 0 \tabularnewline
2 & 41.75 & 41.756206659243 & -0.00655532687009518 & -0.00511075833543904 & -0.611576562414529 \tabularnewline
3 & 41.75 & 41.7549293250002 & -0.00611881293324532 & -0.00509238413568755 & 0.055120253678442 \tabularnewline
4 & 41.75 & 41.7549006470643 & -0.00542961114489046 & -0.00508222890379219 & 0.0623944469666825 \tabularnewline
5 & 41.58 & 41.5899275202046 & -0.0272835816731802 & -0.00530433508855795 & -1.61054162477662 \tabularnewline
6 & 41.61 & 41.6137933608939 & -0.0193905607223459 & -0.00524428203380805 & 0.510656844210574 \tabularnewline
7 & 41.42 & 41.4299976569326 & -0.0467620739954582 & -0.0054049140975037 & -1.62835161924286 \tabularnewline
8 & 41.37 & 41.37562148999 & -0.048093247715485 & -0.0054110433706842 & -0.0749955675225111 \tabularnewline
9 & 41.37 & 41.3741024422218 & -0.0396889756507971 & -0.0053803641816713 & 0.456990456802158 \tabularnewline
10 & 41.33 & 41.3353541743772 & -0.0395157068168054 & -0.00537985943401774 & 0.00920652419246916 \tabularnewline
11 & 41.37 & 41.3732396978148 & -0.0250679423905262 & -0.00534613292733442 & 0.756198525342461 \tabularnewline
12 & 41.34 & 41.3454217800979 & -0.0255857183190295 & -0.00534710408280679 & -0.0268356937684549 \tabularnewline
13 & 41.33 & 41.2866305128029 & -0.0315349866005209 & 0.0442366669905512 & -0.379472202595628 \tabularnewline
14 & 41.29 & 41.2924523525088 & -0.0245981604354552 & -0.00316261876963741 & 0.307181895752628 \tabularnewline
15 & 41.29 & 41.2924931764532 & -0.0199060349383844 & -0.00316016356199649 & 0.24002500134155 \tabularnewline
16 & 41.27 & 41.2731453562957 & -0.0197995357958255 & -0.00316044988567028 & 0.0054330928948378 \tabularnewline
17 & 41.04 & 41.0486068882894 & -0.0588957057941325 & -0.00307165983083078 & -1.99266461057082 \tabularnewline
18 & 40.9 & 40.9053234180359 & -0.0750196555600695 & -0.00304204780803118 & -0.821336457046198 \tabularnewline
19 & 40.89 & 40.8914074886272 & -0.0633399041356362 & -0.00305936552569191 & 0.59473069339813 \tabularnewline
20 & 40.72 & 40.7258006444799 & -0.0828931627038084 & -0.00303595913526675 & -0.995404710614221 \tabularnewline
21 & 40.72 & 40.7209408084507 & -0.0679705589322267 & -0.00305038145823724 & 0.759549208038474 \tabularnewline
22 & 40.58 & 40.5848809858171 & -0.0809931874332582 & -0.00304021952270384 & -0.662773013995983 \tabularnewline
23 & 40.24 & 40.2498767906408 & -0.129579188708272 & -0.00300960807409043 & -2.4725659939258 \tabularnewline
24 & 40.07 & 40.0742500389809 & -0.138387494447856 & -0.00300512717554939 & -0.448239296492928 \tabularnewline
25 & 40.12 & 40.0580116509722 & -0.115378365967852 & 0.0587519160589965 & 1.29182445855628 \tabularnewline
26 & 40.1 & 40.0995830626361 & -0.0859718933966938 & -0.00301741420153364 & 1.38099386918218 \tabularnewline
27 & 40.1 & 40.1006658136264 & -0.0693166624135937 & -0.00301951013059250 & 0.847470039602337 \tabularnewline
28 & 40.08 & 40.0816798924705 & -0.0596851311650948 & -0.00303994999745196 & 0.489738862867107 \tabularnewline
29 & 40.06 & 40.0619731318085 & -0.0520357579506134 & -0.00305356282599321 & 0.389040522891892 \tabularnewline
30 & 39.99 & 39.9934934830199 & -0.0551818262367899 & -0.00304903504596354 & -0.160033497580385 \tabularnewline
31 & 40.05 & 40.0500534714982 & -0.0338042033228474 & -0.00307387988204049 & 1.08755313538400 \tabularnewline
32 & 39.66 & 39.6723094547514 & -0.0996028210092713 & -0.00301213234845259 & -3.34764464808775 \tabularnewline
33 & 39.66 & 39.6606475692484 & -0.0827790952756601 & -0.00302488042644987 & 0.85598332373161 \tabularnewline
34 & 39.67 & 39.6705306976985 & -0.0650521439734064 & -0.00303572650377135 & 0.901966834302367 \tabularnewline
35 & 39.56 & 39.5641491488406 & -0.072958794133059 & -0.0030318203892285 & -0.402307169190279 \tabularnewline
36 & 39.64 & 39.6390457907790 & -0.0446726650604528 & -0.00304310374479894 & 1.43927724735378 \tabularnewline
37 & 39.73 & 39.6820643210371 & -0.0280565492712486 & 0.0455962631087408 & 0.903116752463959 \tabularnewline
38 & 39.7 & 39.7024882301847 & -0.0189261573335912 & -0.00361426502201767 & 0.438956779837005 \tabularnewline
39 & 39.7 & 39.7030868243209 & -0.0151905984131268 & -0.00361471212945973 & 0.190071474671603 \tabularnewline
40 & 39.68 & 39.6837261396289 & -0.0159885750584377 & -0.0036134388135416 & -0.0405814342615171 \tabularnewline
41 & 39.76 & 39.7611135383847 & 0.00187758982478193 & -0.00363733312265000 & 0.908755126876263 \tabularnewline
42 & 40 & 39.9973509831656 & 0.0467159285954982 & -0.00368582746583371 & 2.28098627094977 \tabularnewline
43 & 39.96 & 39.9657887635445 & 0.031740107668119 & -0.00367274811489267 & -0.761906248749854 \tabularnewline
44 & 40.01 & 40.0132498797614 & 0.0347477253435453 & -0.00367486911592957 & 0.153023501283735 \tabularnewline
45 & 40.01 & 40.0145747850922 & 0.0283535821764099 & -0.00367122813778830 & -0.325337336267606 \tabularnewline
46 & 40.01 & 40.0144389296393 & 0.0229032500503587 & -0.00366872218233920 & -0.277322418018295 \tabularnewline
47 & 40 & 40.0045528653695 & 0.0166302870116107 & -0.00366639336209202 & -0.319184327637486 \tabularnewline
48 & 39.91 & 39.9164908325698 & -0.00339861813592170 & -0.00366038948023593 & -1.01913211199611 \tabularnewline
49 & 39.86 & 39.8304527756292 & -0.0190967157457386 & 0.0317594473143884 & -0.839560336643105 \tabularnewline
50 & 39.79 & 39.7934720853097 & -0.0224757867674678 & -0.00304263358392459 & -0.164528879740290 \tabularnewline
51 & 39.79 & 39.7924626444132 & -0.0183687714963313 & -0.0030430294134004 & 0.208973624250545 \tabularnewline
52 & 39.8 & 39.8022878425352 & -0.0129738620872287 & -0.00304987919200757 & 0.274391768471011 \tabularnewline
53 & 39.64 & 39.6468711342301 & -0.0402278185437615 & -0.00302087800367791 & -1.38636913038035 \tabularnewline
54 & 39.55 & 39.5544238695646 & -0.0502185512037577 & -0.00301228083196918 & -0.508267754823595 \tabularnewline
55 & 39.36 & 39.3667109058834 & -0.076523484643191 & -0.00299400211797473 & -1.33832776940936 \tabularnewline
56 & 39.28 & 39.2831826186297 & -0.0778635987440587 & -0.00299325020006442 & -0.0681846572345311 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=112559&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]41.85[/C][C]41.85[/C][C]0[/C][C]0[/C][C]0[/C][/ROW]
[ROW][C]2[/C][C]41.75[/C][C]41.756206659243[/C][C]-0.00655532687009518[/C][C]-0.00511075833543904[/C][C]-0.611576562414529[/C][/ROW]
[ROW][C]3[/C][C]41.75[/C][C]41.7549293250002[/C][C]-0.00611881293324532[/C][C]-0.00509238413568755[/C][C]0.055120253678442[/C][/ROW]
[ROW][C]4[/C][C]41.75[/C][C]41.7549006470643[/C][C]-0.00542961114489046[/C][C]-0.00508222890379219[/C][C]0.0623944469666825[/C][/ROW]
[ROW][C]5[/C][C]41.58[/C][C]41.5899275202046[/C][C]-0.0272835816731802[/C][C]-0.00530433508855795[/C][C]-1.61054162477662[/C][/ROW]
[ROW][C]6[/C][C]41.61[/C][C]41.6137933608939[/C][C]-0.0193905607223459[/C][C]-0.00524428203380805[/C][C]0.510656844210574[/C][/ROW]
[ROW][C]7[/C][C]41.42[/C][C]41.4299976569326[/C][C]-0.0467620739954582[/C][C]-0.0054049140975037[/C][C]-1.62835161924286[/C][/ROW]
[ROW][C]8[/C][C]41.37[/C][C]41.37562148999[/C][C]-0.048093247715485[/C][C]-0.0054110433706842[/C][C]-0.0749955675225111[/C][/ROW]
[ROW][C]9[/C][C]41.37[/C][C]41.3741024422218[/C][C]-0.0396889756507971[/C][C]-0.0053803641816713[/C][C]0.456990456802158[/C][/ROW]
[ROW][C]10[/C][C]41.33[/C][C]41.3353541743772[/C][C]-0.0395157068168054[/C][C]-0.00537985943401774[/C][C]0.00920652419246916[/C][/ROW]
[ROW][C]11[/C][C]41.37[/C][C]41.3732396978148[/C][C]-0.0250679423905262[/C][C]-0.00534613292733442[/C][C]0.756198525342461[/C][/ROW]
[ROW][C]12[/C][C]41.34[/C][C]41.3454217800979[/C][C]-0.0255857183190295[/C][C]-0.00534710408280679[/C][C]-0.0268356937684549[/C][/ROW]
[ROW][C]13[/C][C]41.33[/C][C]41.2866305128029[/C][C]-0.0315349866005209[/C][C]0.0442366669905512[/C][C]-0.379472202595628[/C][/ROW]
[ROW][C]14[/C][C]41.29[/C][C]41.2924523525088[/C][C]-0.0245981604354552[/C][C]-0.00316261876963741[/C][C]0.307181895752628[/C][/ROW]
[ROW][C]15[/C][C]41.29[/C][C]41.2924931764532[/C][C]-0.0199060349383844[/C][C]-0.00316016356199649[/C][C]0.24002500134155[/C][/ROW]
[ROW][C]16[/C][C]41.27[/C][C]41.2731453562957[/C][C]-0.0197995357958255[/C][C]-0.00316044988567028[/C][C]0.0054330928948378[/C][/ROW]
[ROW][C]17[/C][C]41.04[/C][C]41.0486068882894[/C][C]-0.0588957057941325[/C][C]-0.00307165983083078[/C][C]-1.99266461057082[/C][/ROW]
[ROW][C]18[/C][C]40.9[/C][C]40.9053234180359[/C][C]-0.0750196555600695[/C][C]-0.00304204780803118[/C][C]-0.821336457046198[/C][/ROW]
[ROW][C]19[/C][C]40.89[/C][C]40.8914074886272[/C][C]-0.0633399041356362[/C][C]-0.00305936552569191[/C][C]0.59473069339813[/C][/ROW]
[ROW][C]20[/C][C]40.72[/C][C]40.7258006444799[/C][C]-0.0828931627038084[/C][C]-0.00303595913526675[/C][C]-0.995404710614221[/C][/ROW]
[ROW][C]21[/C][C]40.72[/C][C]40.7209408084507[/C][C]-0.0679705589322267[/C][C]-0.00305038145823724[/C][C]0.759549208038474[/C][/ROW]
[ROW][C]22[/C][C]40.58[/C][C]40.5848809858171[/C][C]-0.0809931874332582[/C][C]-0.00304021952270384[/C][C]-0.662773013995983[/C][/ROW]
[ROW][C]23[/C][C]40.24[/C][C]40.2498767906408[/C][C]-0.129579188708272[/C][C]-0.00300960807409043[/C][C]-2.4725659939258[/C][/ROW]
[ROW][C]24[/C][C]40.07[/C][C]40.0742500389809[/C][C]-0.138387494447856[/C][C]-0.00300512717554939[/C][C]-0.448239296492928[/C][/ROW]
[ROW][C]25[/C][C]40.12[/C][C]40.0580116509722[/C][C]-0.115378365967852[/C][C]0.0587519160589965[/C][C]1.29182445855628[/C][/ROW]
[ROW][C]26[/C][C]40.1[/C][C]40.0995830626361[/C][C]-0.0859718933966938[/C][C]-0.00301741420153364[/C][C]1.38099386918218[/C][/ROW]
[ROW][C]27[/C][C]40.1[/C][C]40.1006658136264[/C][C]-0.0693166624135937[/C][C]-0.00301951013059250[/C][C]0.847470039602337[/C][/ROW]
[ROW][C]28[/C][C]40.08[/C][C]40.0816798924705[/C][C]-0.0596851311650948[/C][C]-0.00303994999745196[/C][C]0.489738862867107[/C][/ROW]
[ROW][C]29[/C][C]40.06[/C][C]40.0619731318085[/C][C]-0.0520357579506134[/C][C]-0.00305356282599321[/C][C]0.389040522891892[/C][/ROW]
[ROW][C]30[/C][C]39.99[/C][C]39.9934934830199[/C][C]-0.0551818262367899[/C][C]-0.00304903504596354[/C][C]-0.160033497580385[/C][/ROW]
[ROW][C]31[/C][C]40.05[/C][C]40.0500534714982[/C][C]-0.0338042033228474[/C][C]-0.00307387988204049[/C][C]1.08755313538400[/C][/ROW]
[ROW][C]32[/C][C]39.66[/C][C]39.6723094547514[/C][C]-0.0996028210092713[/C][C]-0.00301213234845259[/C][C]-3.34764464808775[/C][/ROW]
[ROW][C]33[/C][C]39.66[/C][C]39.6606475692484[/C][C]-0.0827790952756601[/C][C]-0.00302488042644987[/C][C]0.85598332373161[/C][/ROW]
[ROW][C]34[/C][C]39.67[/C][C]39.6705306976985[/C][C]-0.0650521439734064[/C][C]-0.00303572650377135[/C][C]0.901966834302367[/C][/ROW]
[ROW][C]35[/C][C]39.56[/C][C]39.5641491488406[/C][C]-0.072958794133059[/C][C]-0.0030318203892285[/C][C]-0.402307169190279[/C][/ROW]
[ROW][C]36[/C][C]39.64[/C][C]39.6390457907790[/C][C]-0.0446726650604528[/C][C]-0.00304310374479894[/C][C]1.43927724735378[/C][/ROW]
[ROW][C]37[/C][C]39.73[/C][C]39.6820643210371[/C][C]-0.0280565492712486[/C][C]0.0455962631087408[/C][C]0.903116752463959[/C][/ROW]
[ROW][C]38[/C][C]39.7[/C][C]39.7024882301847[/C][C]-0.0189261573335912[/C][C]-0.00361426502201767[/C][C]0.438956779837005[/C][/ROW]
[ROW][C]39[/C][C]39.7[/C][C]39.7030868243209[/C][C]-0.0151905984131268[/C][C]-0.00361471212945973[/C][C]0.190071474671603[/C][/ROW]
[ROW][C]40[/C][C]39.68[/C][C]39.6837261396289[/C][C]-0.0159885750584377[/C][C]-0.0036134388135416[/C][C]-0.0405814342615171[/C][/ROW]
[ROW][C]41[/C][C]39.76[/C][C]39.7611135383847[/C][C]0.00187758982478193[/C][C]-0.00363733312265000[/C][C]0.908755126876263[/C][/ROW]
[ROW][C]42[/C][C]40[/C][C]39.9973509831656[/C][C]0.0467159285954982[/C][C]-0.00368582746583371[/C][C]2.28098627094977[/C][/ROW]
[ROW][C]43[/C][C]39.96[/C][C]39.9657887635445[/C][C]0.031740107668119[/C][C]-0.00367274811489267[/C][C]-0.761906248749854[/C][/ROW]
[ROW][C]44[/C][C]40.01[/C][C]40.0132498797614[/C][C]0.0347477253435453[/C][C]-0.00367486911592957[/C][C]0.153023501283735[/C][/ROW]
[ROW][C]45[/C][C]40.01[/C][C]40.0145747850922[/C][C]0.0283535821764099[/C][C]-0.00367122813778830[/C][C]-0.325337336267606[/C][/ROW]
[ROW][C]46[/C][C]40.01[/C][C]40.0144389296393[/C][C]0.0229032500503587[/C][C]-0.00366872218233920[/C][C]-0.277322418018295[/C][/ROW]
[ROW][C]47[/C][C]40[/C][C]40.0045528653695[/C][C]0.0166302870116107[/C][C]-0.00366639336209202[/C][C]-0.319184327637486[/C][/ROW]
[ROW][C]48[/C][C]39.91[/C][C]39.9164908325698[/C][C]-0.00339861813592170[/C][C]-0.00366038948023593[/C][C]-1.01913211199611[/C][/ROW]
[ROW][C]49[/C][C]39.86[/C][C]39.8304527756292[/C][C]-0.0190967157457386[/C][C]0.0317594473143884[/C][C]-0.839560336643105[/C][/ROW]
[ROW][C]50[/C][C]39.79[/C][C]39.7934720853097[/C][C]-0.0224757867674678[/C][C]-0.00304263358392459[/C][C]-0.164528879740290[/C][/ROW]
[ROW][C]51[/C][C]39.79[/C][C]39.7924626444132[/C][C]-0.0183687714963313[/C][C]-0.0030430294134004[/C][C]0.208973624250545[/C][/ROW]
[ROW][C]52[/C][C]39.8[/C][C]39.8022878425352[/C][C]-0.0129738620872287[/C][C]-0.00304987919200757[/C][C]0.274391768471011[/C][/ROW]
[ROW][C]53[/C][C]39.64[/C][C]39.6468711342301[/C][C]-0.0402278185437615[/C][C]-0.00302087800367791[/C][C]-1.38636913038035[/C][/ROW]
[ROW][C]54[/C][C]39.55[/C][C]39.5544238695646[/C][C]-0.0502185512037577[/C][C]-0.00301228083196918[/C][C]-0.508267754823595[/C][/ROW]
[ROW][C]55[/C][C]39.36[/C][C]39.3667109058834[/C][C]-0.076523484643191[/C][C]-0.00299400211797473[/C][C]-1.33832776940936[/C][/ROW]
[ROW][C]56[/C][C]39.28[/C][C]39.2831826186297[/C][C]-0.0778635987440587[/C][C]-0.00299325020006442[/C][C]-0.0681846572345311[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=112559&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=112559&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	41.85	41.85	0	0	0
2	41.75	41.756206659243	-0.00655532687009518	-0.00511075833543904	-0.611576562414529
3	41.75	41.7549293250002	-0.00611881293324532	-0.00509238413568755	0.055120253678442
4	41.75	41.7549006470643	-0.00542961114489046	-0.00508222890379219	0.0623944469666825
5	41.58	41.5899275202046	-0.0272835816731802	-0.00530433508855795	-1.61054162477662
6	41.61	41.6137933608939	-0.0193905607223459	-0.00524428203380805	0.510656844210574
7	41.42	41.4299976569326	-0.0467620739954582	-0.0054049140975037	-1.62835161924286
8	41.37	41.37562148999	-0.048093247715485	-0.0054110433706842	-0.0749955675225111
9	41.37	41.3741024422218	-0.0396889756507971	-0.0053803641816713	0.456990456802158
10	41.33	41.3353541743772	-0.0395157068168054	-0.00537985943401774	0.00920652419246916
11	41.37	41.3732396978148	-0.0250679423905262	-0.00534613292733442	0.756198525342461
12	41.34	41.3454217800979	-0.0255857183190295	-0.00534710408280679	-0.0268356937684549
13	41.33	41.2866305128029	-0.0315349866005209	0.0442366669905512	-0.379472202595628
14	41.29	41.2924523525088	-0.0245981604354552	-0.00316261876963741	0.307181895752628
15	41.29	41.2924931764532	-0.0199060349383844	-0.00316016356199649	0.24002500134155
16	41.27	41.2731453562957	-0.0197995357958255	-0.00316044988567028	0.0054330928948378
17	41.04	41.0486068882894	-0.0588957057941325	-0.00307165983083078	-1.99266461057082
18	40.9	40.9053234180359	-0.0750196555600695	-0.00304204780803118	-0.821336457046198
19	40.89	40.8914074886272	-0.0633399041356362	-0.00305936552569191	0.59473069339813
20	40.72	40.7258006444799	-0.0828931627038084	-0.00303595913526675	-0.995404710614221
21	40.72	40.7209408084507	-0.0679705589322267	-0.00305038145823724	0.759549208038474
22	40.58	40.5848809858171	-0.0809931874332582	-0.00304021952270384	-0.662773013995983
23	40.24	40.2498767906408	-0.129579188708272	-0.00300960807409043	-2.4725659939258
24	40.07	40.0742500389809	-0.138387494447856	-0.00300512717554939	-0.448239296492928
25	40.12	40.0580116509722	-0.115378365967852	0.0587519160589965	1.29182445855628
26	40.1	40.0995830626361	-0.0859718933966938	-0.00301741420153364	1.38099386918218
27	40.1	40.1006658136264	-0.0693166624135937	-0.00301951013059250	0.847470039602337
28	40.08	40.0816798924705	-0.0596851311650948	-0.00303994999745196	0.489738862867107
29	40.06	40.0619731318085	-0.0520357579506134	-0.00305356282599321	0.389040522891892
30	39.99	39.9934934830199	-0.0551818262367899	-0.00304903504596354	-0.160033497580385
31	40.05	40.0500534714982	-0.0338042033228474	-0.00307387988204049	1.08755313538400
32	39.66	39.6723094547514	-0.0996028210092713	-0.00301213234845259	-3.34764464808775
33	39.66	39.6606475692484	-0.0827790952756601	-0.00302488042644987	0.85598332373161
34	39.67	39.6705306976985	-0.0650521439734064	-0.00303572650377135	0.901966834302367
35	39.56	39.5641491488406	-0.072958794133059	-0.0030318203892285	-0.402307169190279
36	39.64	39.6390457907790	-0.0446726650604528	-0.00304310374479894	1.43927724735378
37	39.73	39.6820643210371	-0.0280565492712486	0.0455962631087408	0.903116752463959
38	39.7	39.7024882301847	-0.0189261573335912	-0.00361426502201767	0.438956779837005
39	39.7	39.7030868243209	-0.0151905984131268	-0.00361471212945973	0.190071474671603
40	39.68	39.6837261396289	-0.0159885750584377	-0.0036134388135416	-0.0405814342615171
41	39.76	39.7611135383847	0.00187758982478193	-0.00363733312265000	0.908755126876263
42	40	39.9973509831656	0.0467159285954982	-0.00368582746583371	2.28098627094977
43	39.96	39.9657887635445	0.031740107668119	-0.00367274811489267	-0.761906248749854
44	40.01	40.0132498797614	0.0347477253435453	-0.00367486911592957	0.153023501283735
45	40.01	40.0145747850922	0.0283535821764099	-0.00367122813778830	-0.325337336267606
46	40.01	40.0144389296393	0.0229032500503587	-0.00366872218233920	-0.277322418018295
47	40	40.0045528653695	0.0166302870116107	-0.00366639336209202	-0.319184327637486
48	39.91	39.9164908325698	-0.00339861813592170	-0.00366038948023593	-1.01913211199611
49	39.86	39.8304527756292	-0.0190967157457386	0.0317594473143884	-0.839560336643105
50	39.79	39.7934720853097	-0.0224757867674678	-0.00304263358392459	-0.164528879740290
51	39.79	39.7924626444132	-0.0183687714963313	-0.0030430294134004	0.208973624250545
52	39.8	39.8022878425352	-0.0129738620872287	-0.00304987919200757	0.274391768471011
53	39.64	39.6468711342301	-0.0402278185437615	-0.00302087800367791	-1.38636913038035
54	39.55	39.5544238695646	-0.0502185512037577	-0.00301228083196918	-0.508267754823595
55	39.36	39.3667109058834	-0.076523484643191	-0.00299400211797473	-1.33832776940936
56	39.28	39.2831826186297	-0.0778635987440587	-0.00299325020006442	-0.0681846572345311

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