Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_decompose.wasp

Title produced by software

Classical Decomposition

Date of computation

Sun, 16 Aug 2015 11:08:54 +0100

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/2015/Aug/16/t1439719783yyu6464doggxcct.htm/, Retrieved Sun, 19 May 2024 15:55:59 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=280108, Retrieved Sun, 19 May 2024 15:55:59 +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

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

-       [Classical Decomposition] [Classical Deompos...] [2015-08-16 10:08:54] [0d8529ada52922935dd1fcf0fb375c74] [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	3 seconds
R Server	'Sir Maurice George Kendall' @ kendall.wessa.net

\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 & 'Sir Maurice George Kendall' @ kendall.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=280108&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]'Sir Maurice George Kendall' @ kendall.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=280108&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=280108&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	'Sir Maurice George Kendall' @ kendall.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	133448	NA	NA	4630.69	NA
2	132951	NA	NA	292.831	NA
3	132447	NA	NA	-336.068	NA
4	131404	NA	NA	628.993	NA
5	141722	NA	NA	7831.9	NA
6	141176	NA	NA	6139.42	NA
7	133448	131943	132622	-679.197	1505.49
8	128310	126345	132514	-6168.66	1965.16
9	128807	131976	132406	-429.271	-3169.31
10	128807	120819	132213	-11393.3	7987.78
11	129360	129723	132084	-2360.3	-363.284
12	130354	134034	132192	1842.94	-3680.44
13	131901	137231	132601	4630.69	-5330.4
14	131901	133409	133116	292.831	-1507.91
15	130907	133316	133652	-336.068	-2409.39
16	128310	134733	134104	628.993	-6422.66
17	141722	142258	134426	7831.9	-535.562
18	143766	140952	134812	6139.42	2814.46
19	140679	134499	135178	-679.197	6180.32
20	133448	129246	135415	-6168.66	4201.95
21	136542	135179	135608	-429.271	1363.48
22	131901	124428	135822	-11393.3	7472.7
23	133994	133546	135907	-2360.3	447.549
24	134995	137814	135971	1842.94	-2819.15
25	136038	140731	136100	4630.69	-4692.82
26	133448	136586	136294	292.831	-3138.33
27	133994	136344	136680	-336.068	-2349.89
28	130354	137739	137110	628.993	-7384.87
29	141722	145457	137625	7831.9	-3735.15
30	145313	144388	138249	6139.42	925.04
31	142226	138151	138830	-679.197	4075.07
32	136542	133135	139304	-6168.66	3406.86
33	142723	139454	139883	-429.271	3268.94
34	136038	129435	140829	-11393.3	6602.66
35	142226	139457	141818	-2360.3	2768.63
36	141722	144326	142483	1842.94	-2603.61
37	143269	147327	142697	4630.69	-4058.44
38	137585	143054	142761	292.831	-5468.75
39	143766	142532	142869	-336.068	1233.53
40	143269	143541	142912	628.993	-271.993
41	152544	150723	142891	7831.9	1821.1
42	150451	149051	142912	6139.42	1399.87
43	142226	142339	143018	-679.197	-112.678
44	138082	137022	143191	-6168.66	1060.11
45	143766	142826	143255	-429.271	939.98
46	136038	131860	143254	-11393.3	4177.74
47	141722	140827	143187	-2360.3	894.966
48	142723	144708	142865	1842.94	-1985.28
49	144816	147153	142522	4630.69	-2337.03
50	140182	142451	142159	292.831	-2269.46
51	142723	141374	141710	-336.068	1349.03
52	144270	141525	140896	628.993	2745.3
53	149954	147633	139801	7831.9	2321.31
54	145313	145103	138963	6139.42	210.165
55	139132	137704	138384	-679.197	1427.61
56	132447	131656	137824	-6168.66	791.197
57	138635	136645	137074	-429.271	1990.27
58	121625	124760	136153	-11393.3	-3134.93
59	129857	132720	135081	-2360.3	-2863.45
60	134491	135744	133901	1842.94	-1252.61
61	139132	137308	132677	4630.69	1824.18
62	132447	131767	131474	292.831	679.878
63	132447	129892	130228	-336.068	2555.36
64	132447	129566	128937	628.993	2880.63
65	136038	135587	127755	7831.9	450.855
66	130907	132821	126681	6139.42	-1913.75
67	124173	124822	125501	-679.197	-649.053
68	118538	118044	124213	-6168.66	493.697
69	122626	122558	122987	-429.271	68.1879
70	106666	110324	121718	-11393.3	-3658.47
71	116445	118090	120450	-2360.3	-1645.16
72	122129	121154	119311	1842.94	974.558
73	123172	122847	118216	4630.69	325.017
74	117488	117414	117121	292.831	73.7944
75	117985	115904	116240	-336.068	2080.82
76	116445	116055	115426	628.993	390.382
77	121625	122422	114590	7831.9	-797.187
78	117985	120000	113861	6139.42	-2015.25
79	110810	112407	113086	-679.197	-1596.68
80	105623	106057	112226	-6168.66	-434.095
81	114394	110616	111046	-429.271	3777.6
82	95347	98237.5	109631	-11393.3	-2890.51
83	107716	105918	108278	-2360.3	1797.97
84	113351	108725	106882	1842.94	4625.64
85	113351	109947	105316	4630.69	3404.43
86	106666	103869	103577	292.831	2796.5
87	100485	101373	101709	-336.068	-887.766
88	99988	100491	99862	628.993	-502.993
89	105623	106061	98229	7831.9	-437.854
90	100485	102972	96832.5	6139.42	-2486.88
91	90713	94972.9	95652.1	-679.197	-4259.89
92	83979	88453	94621.6	-6168.66	-4473.97
93	91210	93161.9	93591.2	-429.271	-1951.9
94	74207	81360.5	92753.8	-11393.3	-7153.51
95	89663	89641.3	92001.6	-2360.3	21.7157
96	97888	93092.3	91249.4	1842.94	4795.68
97	100485	95040.4	90409.7	4630.69	5444.64
98	94801	89607.3	89314.5	292.831	5193.71
99	87619	87777.3	88113.4	-336.068	-158.307
100	92757	87518.2	86889.2	628.993	5238.76
101	94801	93582.5	85750.6	7831.9	1218.52
102	93254	90666.5	84527	6139.42	2587.54
103	77791	82603.3	83282.5	-679.197	-4812.3
104	70616	75869	82037.7	-6168.66	-5253.01
105	75747	80276.4	80705.6	-429.271	-4529.35
106	60291	67936.6	79329.8	-11393.3	-7645.55
107	76251	75552	77912.3	-2360.3	698.966
108	81935	78231.9	76389	1842.94	3703.1
109	86569	79390.7	74760	4630.69	7178.31
110	78841	73442.5	73149.7	292.831	5398.46
111	71610	71265.5	71601.5	-336.068	344.526
112	75747	70661.7	70032.7	628.993	5085.34
113	77791	76339.1	68507.2	7831.9	1451.85
114	73703	73466.3	67326.9	6139.42	236.706
115	58247	NA	NA	-679.197	NA
116	51513	NA	NA	-6168.66	NA
117	57694	NA	NA	-429.271	NA
118	40691	NA	NA	-11393.3	NA
119	59241	NA	NA	-2360.3	NA
120	70616	NA	NA	1842.94	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 133448 & NA & NA & 4630.69 & NA \tabularnewline
2 & 132951 & NA & NA & 292.831 & NA \tabularnewline
3 & 132447 & NA & NA & -336.068 & NA \tabularnewline
4 & 131404 & NA & NA & 628.993 & NA \tabularnewline
5 & 141722 & NA & NA & 7831.9 & NA \tabularnewline
6 & 141176 & NA & NA & 6139.42 & NA \tabularnewline
7 & 133448 & 131943 & 132622 & -679.197 & 1505.49 \tabularnewline
8 & 128310 & 126345 & 132514 & -6168.66 & 1965.16 \tabularnewline
9 & 128807 & 131976 & 132406 & -429.271 & -3169.31 \tabularnewline
10 & 128807 & 120819 & 132213 & -11393.3 & 7987.78 \tabularnewline
11 & 129360 & 129723 & 132084 & -2360.3 & -363.284 \tabularnewline
12 & 130354 & 134034 & 132192 & 1842.94 & -3680.44 \tabularnewline
13 & 131901 & 137231 & 132601 & 4630.69 & -5330.4 \tabularnewline
14 & 131901 & 133409 & 133116 & 292.831 & -1507.91 \tabularnewline
15 & 130907 & 133316 & 133652 & -336.068 & -2409.39 \tabularnewline
16 & 128310 & 134733 & 134104 & 628.993 & -6422.66 \tabularnewline
17 & 141722 & 142258 & 134426 & 7831.9 & -535.562 \tabularnewline
18 & 143766 & 140952 & 134812 & 6139.42 & 2814.46 \tabularnewline
19 & 140679 & 134499 & 135178 & -679.197 & 6180.32 \tabularnewline
20 & 133448 & 129246 & 135415 & -6168.66 & 4201.95 \tabularnewline
21 & 136542 & 135179 & 135608 & -429.271 & 1363.48 \tabularnewline
22 & 131901 & 124428 & 135822 & -11393.3 & 7472.7 \tabularnewline
23 & 133994 & 133546 & 135907 & -2360.3 & 447.549 \tabularnewline
24 & 134995 & 137814 & 135971 & 1842.94 & -2819.15 \tabularnewline
25 & 136038 & 140731 & 136100 & 4630.69 & -4692.82 \tabularnewline
26 & 133448 & 136586 & 136294 & 292.831 & -3138.33 \tabularnewline
27 & 133994 & 136344 & 136680 & -336.068 & -2349.89 \tabularnewline
28 & 130354 & 137739 & 137110 & 628.993 & -7384.87 \tabularnewline
29 & 141722 & 145457 & 137625 & 7831.9 & -3735.15 \tabularnewline
30 & 145313 & 144388 & 138249 & 6139.42 & 925.04 \tabularnewline
31 & 142226 & 138151 & 138830 & -679.197 & 4075.07 \tabularnewline
32 & 136542 & 133135 & 139304 & -6168.66 & 3406.86 \tabularnewline
33 & 142723 & 139454 & 139883 & -429.271 & 3268.94 \tabularnewline
34 & 136038 & 129435 & 140829 & -11393.3 & 6602.66 \tabularnewline
35 & 142226 & 139457 & 141818 & -2360.3 & 2768.63 \tabularnewline
36 & 141722 & 144326 & 142483 & 1842.94 & -2603.61 \tabularnewline
37 & 143269 & 147327 & 142697 & 4630.69 & -4058.44 \tabularnewline
38 & 137585 & 143054 & 142761 & 292.831 & -5468.75 \tabularnewline
39 & 143766 & 142532 & 142869 & -336.068 & 1233.53 \tabularnewline
40 & 143269 & 143541 & 142912 & 628.993 & -271.993 \tabularnewline
41 & 152544 & 150723 & 142891 & 7831.9 & 1821.1 \tabularnewline
42 & 150451 & 149051 & 142912 & 6139.42 & 1399.87 \tabularnewline
43 & 142226 & 142339 & 143018 & -679.197 & -112.678 \tabularnewline
44 & 138082 & 137022 & 143191 & -6168.66 & 1060.11 \tabularnewline
45 & 143766 & 142826 & 143255 & -429.271 & 939.98 \tabularnewline
46 & 136038 & 131860 & 143254 & -11393.3 & 4177.74 \tabularnewline
47 & 141722 & 140827 & 143187 & -2360.3 & 894.966 \tabularnewline
48 & 142723 & 144708 & 142865 & 1842.94 & -1985.28 \tabularnewline
49 & 144816 & 147153 & 142522 & 4630.69 & -2337.03 \tabularnewline
50 & 140182 & 142451 & 142159 & 292.831 & -2269.46 \tabularnewline
51 & 142723 & 141374 & 141710 & -336.068 & 1349.03 \tabularnewline
52 & 144270 & 141525 & 140896 & 628.993 & 2745.3 \tabularnewline
53 & 149954 & 147633 & 139801 & 7831.9 & 2321.31 \tabularnewline
54 & 145313 & 145103 & 138963 & 6139.42 & 210.165 \tabularnewline
55 & 139132 & 137704 & 138384 & -679.197 & 1427.61 \tabularnewline
56 & 132447 & 131656 & 137824 & -6168.66 & 791.197 \tabularnewline
57 & 138635 & 136645 & 137074 & -429.271 & 1990.27 \tabularnewline
58 & 121625 & 124760 & 136153 & -11393.3 & -3134.93 \tabularnewline
59 & 129857 & 132720 & 135081 & -2360.3 & -2863.45 \tabularnewline
60 & 134491 & 135744 & 133901 & 1842.94 & -1252.61 \tabularnewline
61 & 139132 & 137308 & 132677 & 4630.69 & 1824.18 \tabularnewline
62 & 132447 & 131767 & 131474 & 292.831 & 679.878 \tabularnewline
63 & 132447 & 129892 & 130228 & -336.068 & 2555.36 \tabularnewline
64 & 132447 & 129566 & 128937 & 628.993 & 2880.63 \tabularnewline
65 & 136038 & 135587 & 127755 & 7831.9 & 450.855 \tabularnewline
66 & 130907 & 132821 & 126681 & 6139.42 & -1913.75 \tabularnewline
67 & 124173 & 124822 & 125501 & -679.197 & -649.053 \tabularnewline
68 & 118538 & 118044 & 124213 & -6168.66 & 493.697 \tabularnewline
69 & 122626 & 122558 & 122987 & -429.271 & 68.1879 \tabularnewline
70 & 106666 & 110324 & 121718 & -11393.3 & -3658.47 \tabularnewline
71 & 116445 & 118090 & 120450 & -2360.3 & -1645.16 \tabularnewline
72 & 122129 & 121154 & 119311 & 1842.94 & 974.558 \tabularnewline
73 & 123172 & 122847 & 118216 & 4630.69 & 325.017 \tabularnewline
74 & 117488 & 117414 & 117121 & 292.831 & 73.7944 \tabularnewline
75 & 117985 & 115904 & 116240 & -336.068 & 2080.82 \tabularnewline
76 & 116445 & 116055 & 115426 & 628.993 & 390.382 \tabularnewline
77 & 121625 & 122422 & 114590 & 7831.9 & -797.187 \tabularnewline
78 & 117985 & 120000 & 113861 & 6139.42 & -2015.25 \tabularnewline
79 & 110810 & 112407 & 113086 & -679.197 & -1596.68 \tabularnewline
80 & 105623 & 106057 & 112226 & -6168.66 & -434.095 \tabularnewline
81 & 114394 & 110616 & 111046 & -429.271 & 3777.6 \tabularnewline
82 & 95347 & 98237.5 & 109631 & -11393.3 & -2890.51 \tabularnewline
83 & 107716 & 105918 & 108278 & -2360.3 & 1797.97 \tabularnewline
84 & 113351 & 108725 & 106882 & 1842.94 & 4625.64 \tabularnewline
85 & 113351 & 109947 & 105316 & 4630.69 & 3404.43 \tabularnewline
86 & 106666 & 103869 & 103577 & 292.831 & 2796.5 \tabularnewline
87 & 100485 & 101373 & 101709 & -336.068 & -887.766 \tabularnewline
88 & 99988 & 100491 & 99862 & 628.993 & -502.993 \tabularnewline
89 & 105623 & 106061 & 98229 & 7831.9 & -437.854 \tabularnewline
90 & 100485 & 102972 & 96832.5 & 6139.42 & -2486.88 \tabularnewline
91 & 90713 & 94972.9 & 95652.1 & -679.197 & -4259.89 \tabularnewline
92 & 83979 & 88453 & 94621.6 & -6168.66 & -4473.97 \tabularnewline
93 & 91210 & 93161.9 & 93591.2 & -429.271 & -1951.9 \tabularnewline
94 & 74207 & 81360.5 & 92753.8 & -11393.3 & -7153.51 \tabularnewline
95 & 89663 & 89641.3 & 92001.6 & -2360.3 & 21.7157 \tabularnewline
96 & 97888 & 93092.3 & 91249.4 & 1842.94 & 4795.68 \tabularnewline
97 & 100485 & 95040.4 & 90409.7 & 4630.69 & 5444.64 \tabularnewline
98 & 94801 & 89607.3 & 89314.5 & 292.831 & 5193.71 \tabularnewline
99 & 87619 & 87777.3 & 88113.4 & -336.068 & -158.307 \tabularnewline
100 & 92757 & 87518.2 & 86889.2 & 628.993 & 5238.76 \tabularnewline
101 & 94801 & 93582.5 & 85750.6 & 7831.9 & 1218.52 \tabularnewline
102 & 93254 & 90666.5 & 84527 & 6139.42 & 2587.54 \tabularnewline
103 & 77791 & 82603.3 & 83282.5 & -679.197 & -4812.3 \tabularnewline
104 & 70616 & 75869 & 82037.7 & -6168.66 & -5253.01 \tabularnewline
105 & 75747 & 80276.4 & 80705.6 & -429.271 & -4529.35 \tabularnewline
106 & 60291 & 67936.6 & 79329.8 & -11393.3 & -7645.55 \tabularnewline
107 & 76251 & 75552 & 77912.3 & -2360.3 & 698.966 \tabularnewline
108 & 81935 & 78231.9 & 76389 & 1842.94 & 3703.1 \tabularnewline
109 & 86569 & 79390.7 & 74760 & 4630.69 & 7178.31 \tabularnewline
110 & 78841 & 73442.5 & 73149.7 & 292.831 & 5398.46 \tabularnewline
111 & 71610 & 71265.5 & 71601.5 & -336.068 & 344.526 \tabularnewline
112 & 75747 & 70661.7 & 70032.7 & 628.993 & 5085.34 \tabularnewline
113 & 77791 & 76339.1 & 68507.2 & 7831.9 & 1451.85 \tabularnewline
114 & 73703 & 73466.3 & 67326.9 & 6139.42 & 236.706 \tabularnewline
115 & 58247 & NA & NA & -679.197 & NA \tabularnewline
116 & 51513 & NA & NA & -6168.66 & NA \tabularnewline
117 & 57694 & NA & NA & -429.271 & NA \tabularnewline
118 & 40691 & NA & NA & -11393.3 & NA \tabularnewline
119 & 59241 & NA & NA & -2360.3 & NA \tabularnewline
120 & 70616 & NA & NA & 1842.94 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=280108&T=1

[TABLE]
[ROW][C]Classical Decomposition by Moving Averages[/C][/ROW]
[ROW][C]t[/C][C]Observations[/C][C]Fit[/C][C]Trend[/C][C]Seasonal[/C][C]Random[/C][/ROW]
[ROW][C]1[/C][C]133448[/C][C]NA[/C][C]NA[/C][C]4630.69[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]132951[/C][C]NA[/C][C]NA[/C][C]292.831[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]132447[/C][C]NA[/C][C]NA[/C][C]-336.068[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]131404[/C][C]NA[/C][C]NA[/C][C]628.993[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]141722[/C][C]NA[/C][C]NA[/C][C]7831.9[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]141176[/C][C]NA[/C][C]NA[/C][C]6139.42[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]133448[/C][C]131943[/C][C]132622[/C][C]-679.197[/C][C]1505.49[/C][/ROW]
[ROW][C]8[/C][C]128310[/C][C]126345[/C][C]132514[/C][C]-6168.66[/C][C]1965.16[/C][/ROW]
[ROW][C]9[/C][C]128807[/C][C]131976[/C][C]132406[/C][C]-429.271[/C][C]-3169.31[/C][/ROW]
[ROW][C]10[/C][C]128807[/C][C]120819[/C][C]132213[/C][C]-11393.3[/C][C]7987.78[/C][/ROW]
[ROW][C]11[/C][C]129360[/C][C]129723[/C][C]132084[/C][C]-2360.3[/C][C]-363.284[/C][/ROW]
[ROW][C]12[/C][C]130354[/C][C]134034[/C][C]132192[/C][C]1842.94[/C][C]-3680.44[/C][/ROW]
[ROW][C]13[/C][C]131901[/C][C]137231[/C][C]132601[/C][C]4630.69[/C][C]-5330.4[/C][/ROW]
[ROW][C]14[/C][C]131901[/C][C]133409[/C][C]133116[/C][C]292.831[/C][C]-1507.91[/C][/ROW]
[ROW][C]15[/C][C]130907[/C][C]133316[/C][C]133652[/C][C]-336.068[/C][C]-2409.39[/C][/ROW]
[ROW][C]16[/C][C]128310[/C][C]134733[/C][C]134104[/C][C]628.993[/C][C]-6422.66[/C][/ROW]
[ROW][C]17[/C][C]141722[/C][C]142258[/C][C]134426[/C][C]7831.9[/C][C]-535.562[/C][/ROW]
[ROW][C]18[/C][C]143766[/C][C]140952[/C][C]134812[/C][C]6139.42[/C][C]2814.46[/C][/ROW]
[ROW][C]19[/C][C]140679[/C][C]134499[/C][C]135178[/C][C]-679.197[/C][C]6180.32[/C][/ROW]
[ROW][C]20[/C][C]133448[/C][C]129246[/C][C]135415[/C][C]-6168.66[/C][C]4201.95[/C][/ROW]
[ROW][C]21[/C][C]136542[/C][C]135179[/C][C]135608[/C][C]-429.271[/C][C]1363.48[/C][/ROW]
[ROW][C]22[/C][C]131901[/C][C]124428[/C][C]135822[/C][C]-11393.3[/C][C]7472.7[/C][/ROW]
[ROW][C]23[/C][C]133994[/C][C]133546[/C][C]135907[/C][C]-2360.3[/C][C]447.549[/C][/ROW]
[ROW][C]24[/C][C]134995[/C][C]137814[/C][C]135971[/C][C]1842.94[/C][C]-2819.15[/C][/ROW]
[ROW][C]25[/C][C]136038[/C][C]140731[/C][C]136100[/C][C]4630.69[/C][C]-4692.82[/C][/ROW]
[ROW][C]26[/C][C]133448[/C][C]136586[/C][C]136294[/C][C]292.831[/C][C]-3138.33[/C][/ROW]
[ROW][C]27[/C][C]133994[/C][C]136344[/C][C]136680[/C][C]-336.068[/C][C]-2349.89[/C][/ROW]
[ROW][C]28[/C][C]130354[/C][C]137739[/C][C]137110[/C][C]628.993[/C][C]-7384.87[/C][/ROW]
[ROW][C]29[/C][C]141722[/C][C]145457[/C][C]137625[/C][C]7831.9[/C][C]-3735.15[/C][/ROW]
[ROW][C]30[/C][C]145313[/C][C]144388[/C][C]138249[/C][C]6139.42[/C][C]925.04[/C][/ROW]
[ROW][C]31[/C][C]142226[/C][C]138151[/C][C]138830[/C][C]-679.197[/C][C]4075.07[/C][/ROW]
[ROW][C]32[/C][C]136542[/C][C]133135[/C][C]139304[/C][C]-6168.66[/C][C]3406.86[/C][/ROW]
[ROW][C]33[/C][C]142723[/C][C]139454[/C][C]139883[/C][C]-429.271[/C][C]3268.94[/C][/ROW]
[ROW][C]34[/C][C]136038[/C][C]129435[/C][C]140829[/C][C]-11393.3[/C][C]6602.66[/C][/ROW]
[ROW][C]35[/C][C]142226[/C][C]139457[/C][C]141818[/C][C]-2360.3[/C][C]2768.63[/C][/ROW]
[ROW][C]36[/C][C]141722[/C][C]144326[/C][C]142483[/C][C]1842.94[/C][C]-2603.61[/C][/ROW]
[ROW][C]37[/C][C]143269[/C][C]147327[/C][C]142697[/C][C]4630.69[/C][C]-4058.44[/C][/ROW]
[ROW][C]38[/C][C]137585[/C][C]143054[/C][C]142761[/C][C]292.831[/C][C]-5468.75[/C][/ROW]
[ROW][C]39[/C][C]143766[/C][C]142532[/C][C]142869[/C][C]-336.068[/C][C]1233.53[/C][/ROW]
[ROW][C]40[/C][C]143269[/C][C]143541[/C][C]142912[/C][C]628.993[/C][C]-271.993[/C][/ROW]
[ROW][C]41[/C][C]152544[/C][C]150723[/C][C]142891[/C][C]7831.9[/C][C]1821.1[/C][/ROW]
[ROW][C]42[/C][C]150451[/C][C]149051[/C][C]142912[/C][C]6139.42[/C][C]1399.87[/C][/ROW]
[ROW][C]43[/C][C]142226[/C][C]142339[/C][C]143018[/C][C]-679.197[/C][C]-112.678[/C][/ROW]
[ROW][C]44[/C][C]138082[/C][C]137022[/C][C]143191[/C][C]-6168.66[/C][C]1060.11[/C][/ROW]
[ROW][C]45[/C][C]143766[/C][C]142826[/C][C]143255[/C][C]-429.271[/C][C]939.98[/C][/ROW]
[ROW][C]46[/C][C]136038[/C][C]131860[/C][C]143254[/C][C]-11393.3[/C][C]4177.74[/C][/ROW]
[ROW][C]47[/C][C]141722[/C][C]140827[/C][C]143187[/C][C]-2360.3[/C][C]894.966[/C][/ROW]
[ROW][C]48[/C][C]142723[/C][C]144708[/C][C]142865[/C][C]1842.94[/C][C]-1985.28[/C][/ROW]
[ROW][C]49[/C][C]144816[/C][C]147153[/C][C]142522[/C][C]4630.69[/C][C]-2337.03[/C][/ROW]
[ROW][C]50[/C][C]140182[/C][C]142451[/C][C]142159[/C][C]292.831[/C][C]-2269.46[/C][/ROW]
[ROW][C]51[/C][C]142723[/C][C]141374[/C][C]141710[/C][C]-336.068[/C][C]1349.03[/C][/ROW]
[ROW][C]52[/C][C]144270[/C][C]141525[/C][C]140896[/C][C]628.993[/C][C]2745.3[/C][/ROW]
[ROW][C]53[/C][C]149954[/C][C]147633[/C][C]139801[/C][C]7831.9[/C][C]2321.31[/C][/ROW]
[ROW][C]54[/C][C]145313[/C][C]145103[/C][C]138963[/C][C]6139.42[/C][C]210.165[/C][/ROW]
[ROW][C]55[/C][C]139132[/C][C]137704[/C][C]138384[/C][C]-679.197[/C][C]1427.61[/C][/ROW]
[ROW][C]56[/C][C]132447[/C][C]131656[/C][C]137824[/C][C]-6168.66[/C][C]791.197[/C][/ROW]
[ROW][C]57[/C][C]138635[/C][C]136645[/C][C]137074[/C][C]-429.271[/C][C]1990.27[/C][/ROW]
[ROW][C]58[/C][C]121625[/C][C]124760[/C][C]136153[/C][C]-11393.3[/C][C]-3134.93[/C][/ROW]
[ROW][C]59[/C][C]129857[/C][C]132720[/C][C]135081[/C][C]-2360.3[/C][C]-2863.45[/C][/ROW]
[ROW][C]60[/C][C]134491[/C][C]135744[/C][C]133901[/C][C]1842.94[/C][C]-1252.61[/C][/ROW]
[ROW][C]61[/C][C]139132[/C][C]137308[/C][C]132677[/C][C]4630.69[/C][C]1824.18[/C][/ROW]
[ROW][C]62[/C][C]132447[/C][C]131767[/C][C]131474[/C][C]292.831[/C][C]679.878[/C][/ROW]
[ROW][C]63[/C][C]132447[/C][C]129892[/C][C]130228[/C][C]-336.068[/C][C]2555.36[/C][/ROW]
[ROW][C]64[/C][C]132447[/C][C]129566[/C][C]128937[/C][C]628.993[/C][C]2880.63[/C][/ROW]
[ROW][C]65[/C][C]136038[/C][C]135587[/C][C]127755[/C][C]7831.9[/C][C]450.855[/C][/ROW]
[ROW][C]66[/C][C]130907[/C][C]132821[/C][C]126681[/C][C]6139.42[/C][C]-1913.75[/C][/ROW]
[ROW][C]67[/C][C]124173[/C][C]124822[/C][C]125501[/C][C]-679.197[/C][C]-649.053[/C][/ROW]
[ROW][C]68[/C][C]118538[/C][C]118044[/C][C]124213[/C][C]-6168.66[/C][C]493.697[/C][/ROW]
[ROW][C]69[/C][C]122626[/C][C]122558[/C][C]122987[/C][C]-429.271[/C][C]68.1879[/C][/ROW]
[ROW][C]70[/C][C]106666[/C][C]110324[/C][C]121718[/C][C]-11393.3[/C][C]-3658.47[/C][/ROW]
[ROW][C]71[/C][C]116445[/C][C]118090[/C][C]120450[/C][C]-2360.3[/C][C]-1645.16[/C][/ROW]
[ROW][C]72[/C][C]122129[/C][C]121154[/C][C]119311[/C][C]1842.94[/C][C]974.558[/C][/ROW]
[ROW][C]73[/C][C]123172[/C][C]122847[/C][C]118216[/C][C]4630.69[/C][C]325.017[/C][/ROW]
[ROW][C]74[/C][C]117488[/C][C]117414[/C][C]117121[/C][C]292.831[/C][C]73.7944[/C][/ROW]
[ROW][C]75[/C][C]117985[/C][C]115904[/C][C]116240[/C][C]-336.068[/C][C]2080.82[/C][/ROW]
[ROW][C]76[/C][C]116445[/C][C]116055[/C][C]115426[/C][C]628.993[/C][C]390.382[/C][/ROW]
[ROW][C]77[/C][C]121625[/C][C]122422[/C][C]114590[/C][C]7831.9[/C][C]-797.187[/C][/ROW]
[ROW][C]78[/C][C]117985[/C][C]120000[/C][C]113861[/C][C]6139.42[/C][C]-2015.25[/C][/ROW]
[ROW][C]79[/C][C]110810[/C][C]112407[/C][C]113086[/C][C]-679.197[/C][C]-1596.68[/C][/ROW]
[ROW][C]80[/C][C]105623[/C][C]106057[/C][C]112226[/C][C]-6168.66[/C][C]-434.095[/C][/ROW]
[ROW][C]81[/C][C]114394[/C][C]110616[/C][C]111046[/C][C]-429.271[/C][C]3777.6[/C][/ROW]
[ROW][C]82[/C][C]95347[/C][C]98237.5[/C][C]109631[/C][C]-11393.3[/C][C]-2890.51[/C][/ROW]
[ROW][C]83[/C][C]107716[/C][C]105918[/C][C]108278[/C][C]-2360.3[/C][C]1797.97[/C][/ROW]
[ROW][C]84[/C][C]113351[/C][C]108725[/C][C]106882[/C][C]1842.94[/C][C]4625.64[/C][/ROW]
[ROW][C]85[/C][C]113351[/C][C]109947[/C][C]105316[/C][C]4630.69[/C][C]3404.43[/C][/ROW]
[ROW][C]86[/C][C]106666[/C][C]103869[/C][C]103577[/C][C]292.831[/C][C]2796.5[/C][/ROW]
[ROW][C]87[/C][C]100485[/C][C]101373[/C][C]101709[/C][C]-336.068[/C][C]-887.766[/C][/ROW]
[ROW][C]88[/C][C]99988[/C][C]100491[/C][C]99862[/C][C]628.993[/C][C]-502.993[/C][/ROW]
[ROW][C]89[/C][C]105623[/C][C]106061[/C][C]98229[/C][C]7831.9[/C][C]-437.854[/C][/ROW]
[ROW][C]90[/C][C]100485[/C][C]102972[/C][C]96832.5[/C][C]6139.42[/C][C]-2486.88[/C][/ROW]
[ROW][C]91[/C][C]90713[/C][C]94972.9[/C][C]95652.1[/C][C]-679.197[/C][C]-4259.89[/C][/ROW]
[ROW][C]92[/C][C]83979[/C][C]88453[/C][C]94621.6[/C][C]-6168.66[/C][C]-4473.97[/C][/ROW]
[ROW][C]93[/C][C]91210[/C][C]93161.9[/C][C]93591.2[/C][C]-429.271[/C][C]-1951.9[/C][/ROW]
[ROW][C]94[/C][C]74207[/C][C]81360.5[/C][C]92753.8[/C][C]-11393.3[/C][C]-7153.51[/C][/ROW]
[ROW][C]95[/C][C]89663[/C][C]89641.3[/C][C]92001.6[/C][C]-2360.3[/C][C]21.7157[/C][/ROW]
[ROW][C]96[/C][C]97888[/C][C]93092.3[/C][C]91249.4[/C][C]1842.94[/C][C]4795.68[/C][/ROW]
[ROW][C]97[/C][C]100485[/C][C]95040.4[/C][C]90409.7[/C][C]4630.69[/C][C]5444.64[/C][/ROW]
[ROW][C]98[/C][C]94801[/C][C]89607.3[/C][C]89314.5[/C][C]292.831[/C][C]5193.71[/C][/ROW]
[ROW][C]99[/C][C]87619[/C][C]87777.3[/C][C]88113.4[/C][C]-336.068[/C][C]-158.307[/C][/ROW]
[ROW][C]100[/C][C]92757[/C][C]87518.2[/C][C]86889.2[/C][C]628.993[/C][C]5238.76[/C][/ROW]
[ROW][C]101[/C][C]94801[/C][C]93582.5[/C][C]85750.6[/C][C]7831.9[/C][C]1218.52[/C][/ROW]
[ROW][C]102[/C][C]93254[/C][C]90666.5[/C][C]84527[/C][C]6139.42[/C][C]2587.54[/C][/ROW]
[ROW][C]103[/C][C]77791[/C][C]82603.3[/C][C]83282.5[/C][C]-679.197[/C][C]-4812.3[/C][/ROW]
[ROW][C]104[/C][C]70616[/C][C]75869[/C][C]82037.7[/C][C]-6168.66[/C][C]-5253.01[/C][/ROW]
[ROW][C]105[/C][C]75747[/C][C]80276.4[/C][C]80705.6[/C][C]-429.271[/C][C]-4529.35[/C][/ROW]
[ROW][C]106[/C][C]60291[/C][C]67936.6[/C][C]79329.8[/C][C]-11393.3[/C][C]-7645.55[/C][/ROW]
[ROW][C]107[/C][C]76251[/C][C]75552[/C][C]77912.3[/C][C]-2360.3[/C][C]698.966[/C][/ROW]
[ROW][C]108[/C][C]81935[/C][C]78231.9[/C][C]76389[/C][C]1842.94[/C][C]3703.1[/C][/ROW]
[ROW][C]109[/C][C]86569[/C][C]79390.7[/C][C]74760[/C][C]4630.69[/C][C]7178.31[/C][/ROW]
[ROW][C]110[/C][C]78841[/C][C]73442.5[/C][C]73149.7[/C][C]292.831[/C][C]5398.46[/C][/ROW]
[ROW][C]111[/C][C]71610[/C][C]71265.5[/C][C]71601.5[/C][C]-336.068[/C][C]344.526[/C][/ROW]
[ROW][C]112[/C][C]75747[/C][C]70661.7[/C][C]70032.7[/C][C]628.993[/C][C]5085.34[/C][/ROW]
[ROW][C]113[/C][C]77791[/C][C]76339.1[/C][C]68507.2[/C][C]7831.9[/C][C]1451.85[/C][/ROW]
[ROW][C]114[/C][C]73703[/C][C]73466.3[/C][C]67326.9[/C][C]6139.42[/C][C]236.706[/C][/ROW]
[ROW][C]115[/C][C]58247[/C][C]NA[/C][C]NA[/C][C]-679.197[/C][C]NA[/C][/ROW]
[ROW][C]116[/C][C]51513[/C][C]NA[/C][C]NA[/C][C]-6168.66[/C][C]NA[/C][/ROW]
[ROW][C]117[/C][C]57694[/C][C]NA[/C][C]NA[/C][C]-429.271[/C][C]NA[/C][/ROW]
[ROW][C]118[/C][C]40691[/C][C]NA[/C][C]NA[/C][C]-11393.3[/C][C]NA[/C][/ROW]
[ROW][C]119[/C][C]59241[/C][C]NA[/C][C]NA[/C][C]-2360.3[/C][C]NA[/C][/ROW]
[ROW][C]120[/C][C]70616[/C][C]NA[/C][C]NA[/C][C]1842.94[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=280108&T=1

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

As an alternative you can also use a QR Code:

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	133448	NA	NA	4630.69	NA
2	132951	NA	NA	292.831	NA
3	132447	NA	NA	-336.068	NA
4	131404	NA	NA	628.993	NA
5	141722	NA	NA	7831.9	NA
6	141176	NA	NA	6139.42	NA
7	133448	131943	132622	-679.197	1505.49
8	128310	126345	132514	-6168.66	1965.16
9	128807	131976	132406	-429.271	-3169.31
10	128807	120819	132213	-11393.3	7987.78
11	129360	129723	132084	-2360.3	-363.284
12	130354	134034	132192	1842.94	-3680.44
13	131901	137231	132601	4630.69	-5330.4
14	131901	133409	133116	292.831	-1507.91
15	130907	133316	133652	-336.068	-2409.39
16	128310	134733	134104	628.993	-6422.66
17	141722	142258	134426	7831.9	-535.562
18	143766	140952	134812	6139.42	2814.46
19	140679	134499	135178	-679.197	6180.32
20	133448	129246	135415	-6168.66	4201.95
21	136542	135179	135608	-429.271	1363.48
22	131901	124428	135822	-11393.3	7472.7
23	133994	133546	135907	-2360.3	447.549
24	134995	137814	135971	1842.94	-2819.15
25	136038	140731	136100	4630.69	-4692.82
26	133448	136586	136294	292.831	-3138.33
27	133994	136344	136680	-336.068	-2349.89
28	130354	137739	137110	628.993	-7384.87
29	141722	145457	137625	7831.9	-3735.15
30	145313	144388	138249	6139.42	925.04
31	142226	138151	138830	-679.197	4075.07
32	136542	133135	139304	-6168.66	3406.86
33	142723	139454	139883	-429.271	3268.94
34	136038	129435	140829	-11393.3	6602.66
35	142226	139457	141818	-2360.3	2768.63
36	141722	144326	142483	1842.94	-2603.61
37	143269	147327	142697	4630.69	-4058.44
38	137585	143054	142761	292.831	-5468.75
39	143766	142532	142869	-336.068	1233.53
40	143269	143541	142912	628.993	-271.993
41	152544	150723	142891	7831.9	1821.1
42	150451	149051	142912	6139.42	1399.87
43	142226	142339	143018	-679.197	-112.678
44	138082	137022	143191	-6168.66	1060.11
45	143766	142826	143255	-429.271	939.98
46	136038	131860	143254	-11393.3	4177.74
47	141722	140827	143187	-2360.3	894.966
48	142723	144708	142865	1842.94	-1985.28
49	144816	147153	142522	4630.69	-2337.03
50	140182	142451	142159	292.831	-2269.46
51	142723	141374	141710	-336.068	1349.03
52	144270	141525	140896	628.993	2745.3
53	149954	147633	139801	7831.9	2321.31
54	145313	145103	138963	6139.42	210.165
55	139132	137704	138384	-679.197	1427.61
56	132447	131656	137824	-6168.66	791.197
57	138635	136645	137074	-429.271	1990.27
58	121625	124760	136153	-11393.3	-3134.93
59	129857	132720	135081	-2360.3	-2863.45
60	134491	135744	133901	1842.94	-1252.61
61	139132	137308	132677	4630.69	1824.18
62	132447	131767	131474	292.831	679.878
63	132447	129892	130228	-336.068	2555.36
64	132447	129566	128937	628.993	2880.63
65	136038	135587	127755	7831.9	450.855
66	130907	132821	126681	6139.42	-1913.75
67	124173	124822	125501	-679.197	-649.053
68	118538	118044	124213	-6168.66	493.697
69	122626	122558	122987	-429.271	68.1879
70	106666	110324	121718	-11393.3	-3658.47
71	116445	118090	120450	-2360.3	-1645.16
72	122129	121154	119311	1842.94	974.558
73	123172	122847	118216	4630.69	325.017
74	117488	117414	117121	292.831	73.7944
75	117985	115904	116240	-336.068	2080.82
76	116445	116055	115426	628.993	390.382
77	121625	122422	114590	7831.9	-797.187
78	117985	120000	113861	6139.42	-2015.25
79	110810	112407	113086	-679.197	-1596.68
80	105623	106057	112226	-6168.66	-434.095
81	114394	110616	111046	-429.271	3777.6
82	95347	98237.5	109631	-11393.3	-2890.51
83	107716	105918	108278	-2360.3	1797.97
84	113351	108725	106882	1842.94	4625.64
85	113351	109947	105316	4630.69	3404.43
86	106666	103869	103577	292.831	2796.5
87	100485	101373	101709	-336.068	-887.766
88	99988	100491	99862	628.993	-502.993
89	105623	106061	98229	7831.9	-437.854
90	100485	102972	96832.5	6139.42	-2486.88
91	90713	94972.9	95652.1	-679.197	-4259.89
92	83979	88453	94621.6	-6168.66	-4473.97
93	91210	93161.9	93591.2	-429.271	-1951.9
94	74207	81360.5	92753.8	-11393.3	-7153.51
95	89663	89641.3	92001.6	-2360.3	21.7157
96	97888	93092.3	91249.4	1842.94	4795.68
97	100485	95040.4	90409.7	4630.69	5444.64
98	94801	89607.3	89314.5	292.831	5193.71
99	87619	87777.3	88113.4	-336.068	-158.307
100	92757	87518.2	86889.2	628.993	5238.76
101	94801	93582.5	85750.6	7831.9	1218.52
102	93254	90666.5	84527	6139.42	2587.54
103	77791	82603.3	83282.5	-679.197	-4812.3
104	70616	75869	82037.7	-6168.66	-5253.01
105	75747	80276.4	80705.6	-429.271	-4529.35
106	60291	67936.6	79329.8	-11393.3	-7645.55
107	76251	75552	77912.3	-2360.3	698.966
108	81935	78231.9	76389	1842.94	3703.1
109	86569	79390.7	74760	4630.69	7178.31
110	78841	73442.5	73149.7	292.831	5398.46
111	71610	71265.5	71601.5	-336.068	344.526
112	75747	70661.7	70032.7	628.993	5085.34
113	77791	76339.1	68507.2	7831.9	1451.85
114	73703	73466.3	67326.9	6139.42	236.706
115	58247	NA	NA	-679.197	NA
116	51513	NA	NA	-6168.66	NA
117	57694	NA	NA	-429.271	NA
118	40691	NA	NA	-11393.3	NA
119	59241	NA	NA	-2360.3	NA
120	70616	NA	NA	1842.94	NA

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

Parameters (Session):

par1 = additive ; par2 = 12 ;

Parameters (R input):

par1 = additive ; par2 = 12 ;

R code (references can be found in the software module):

par2 <- as.numeric(par2)
x <- ts(x,freq=par2)
m <- decompose(x,type=par1)
m$figure
bitmap(file='test1.png')
plot(m)
dev.off()
mylagmax <- length(x)/2
bitmap(file='test2.png')
op <- par(mfrow = c(2,2))
acf(as.numeric(x),lag.max = mylagmax,main='Observed')
acf(as.numeric(m$trend),na.action=na.pass,lag.max = mylagmax,main='Trend')
acf(as.numeric(m$seasonal),na.action=na.pass,lag.max = mylagmax,main='Seasonal')
acf(as.numeric(m$random),na.action=na.pass,lag.max = mylagmax,main='Random')
par(op)
dev.off()
bitmap(file='test3.png')
op <- par(mfrow = c(2,2))
spectrum(as.numeric(x),main='Observed')
spectrum(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
spectrum(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
spectrum(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
bitmap(file='test4.png')
op <- par(mfrow = c(2,2))
cpgram(as.numeric(x),main='Observed')
cpgram(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
cpgram(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
cpgram(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Classical Decomposition by Moving Averages',6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Observations',header=TRUE)
a<-table.element(a,'Fit',header=TRUE)
a<-table.element(a,'Trend',header=TRUE)
a<-table.element(a,'Seasonal',header=TRUE)
a<-table.element(a,'Random',header=TRUE)
a<-table.row.end(a)
for (i in 1:length(m$trend)) {
a<-table.row.start(a)
a<-table.element(a,i,header=TRUE)
a<-table.element(a,x[i])
if (par1 == 'additive') a<-table.element(a,signif(m$trend[i]+m$seasonal[i],6)) else a<-table.element(a,signif(m$trend[i]*m$seasonal[i],6))
a<-table.element(a,signif(m$trend[i],6))
a<-table.element(a,signif(m$seasonal[i],6))
a<-table.element(a,signif(m$random[i],6))
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