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

Thu, 26 Nov 2015 14:17:46 +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/2015/Nov/26/t1448547563rgcv9kwqq7bwfhv.htm/, Retrieved Tue, 14 May 2024 09:38:57 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=284232, Retrieved Tue, 14 May 2024 09:38:57 +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

103

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

-       [Classical Decomposition] [] [2015-11-26 14:17:46] [a7cacf454dbcc5677666381f5193b84d] [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	2 seconds
R Server	'Gwilym Jenkins' @ jenkins.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 & 2 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284232&T=0

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

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	86.48	NA	NA	0.991216	NA
2	86.48	NA	NA	0.99348	NA
3	86.7	NA	NA	1.00009	NA
4	87.86	NA	NA	1.00423	NA
5	88.24	NA	NA	1.00384	NA
6	88.23	NA	NA	1.00485	NA
7	88.73	87.9021	87.2867	1.00705	1.00942
8	88.82	87.7369	87.2179	1.00595	1.01235
9	87.16	87.562	87.2013	1.00414	0.995409
10	86.29	86.9839	87.2025	0.997493	0.992023
11	86.37	86.7845	87.1775	0.995492	0.995223
12	86.59	86.4725	87.155	0.992169	1.00136
13	85.46	86.3775	87.1429	0.991216	0.989378
14	85.85	86.5371	87.105	0.99348	0.99206
15	86.93	87.127	87.1192	1.00009	0.997739
16	87.66	87.647	87.2779	1.00423	1.00015
17	87.84	87.9111	87.5746	1.00384	0.999191
18	88.09	88.3267	87.9004	1.00485	0.99732
19	88.58	88.8471	88.225	1.00705	0.996994
20	88.06	89.0999	88.5729	1.00595	0.988328
21	88.26	89.2807	88.9129	1.00414	0.988568
22	89	89.0237	89.2475	0.997493	0.999733
23	90.78	89.2197	89.6237	0.995492	1.01749
24	90	89.3903	90.0958	0.992169	1.00682
25	89.84	89.8133	90.6092	0.991216	1.0003
26	89.82	90.4717	91.0654	0.99348	0.992797
27	91.12	91.4487	91.4404	1.00009	0.996406
28	91.5	92.0815	91.6938	1.00423	0.993685
29	93.03	92.0152	91.6629	1.00384	1.01103
30	94.23	91.8446	91.4012	1.00485	1.02597
31	94.76	91.7189	91.0767	1.00705	1.03316
32	92.83	91.3126	90.7725	1.00595	1.01662
33	92.49	90.8275	90.4533	1.00414	1.0183
34	90.85	89.8704	90.0962	0.997493	1.0109
35	88.19	89.294	89.6983	0.995492	0.987636
36	86.31	88.5465	89.2454	0.992169	0.974742
37	85.74	87.9845	88.7642	0.991216	0.97449
38	86.62	87.7963	88.3725	0.99348	0.986602
39	86.66	88.1	88.0921	1.00009	0.983655
40	87.39	88.2215	87.85	1.00423	0.990575
41	87.59	88.1437	87.8062	1.00384	0.993718
42	88.8	88.4189	87.9921	1.00485	1.00431
43	88.64	88.9373	88.3146	1.00705	0.996657
44	89.55	89.1854	88.6579	1.00595	1.00409
45	89.04	89.3799	89.0117	1.00414	0.996198
46	88.49	89.2033	89.4275	0.997493	0.992004
47	89.5	89.4678	89.8729	0.995492	1.00036
48	89.46	89.5726	90.2796	0.992169	0.998743
49	90.33	89.8339	90.63	0.991216	1.00552
50	90.27	90.3508	90.9438	0.99348	0.999106
51	91.5	91.2578	91.2496	1.00009	1.00265
52	92.53	91.999	91.6117	1.00423	1.00577
53	93.14	92.3339	91.9804	1.00384	1.00873
54	93.01	92.8289	92.3808	1.00485	1.00195
55	92.84	93.4867	92.8321	1.00705	0.993083
56	92.88	93.8539	93.2988	1.00595	0.989623
57	93.05	94.1796	93.7917	1.00414	0.988006
58	93.17	94.0449	94.2812	0.997493	0.990697
59	93.67	94.3154	94.7425	0.995492	0.993157
60	94.9	94.4313	95.1767	0.992169	1.00496
61	95.72	94.7648	95.6046	0.991216	1.01008
62	96.08	95.4138	96.04	0.99348	1.00698
63	97.52	96.5037	96.495	1.00009	1.01053
64	98.26	97.3708	96.9608	1.00423	1.00913
65	98.48	97.7756	97.4012	1.00384	1.0072
66	98.09	98.2346	97.7604	1.00485	0.998528
67	98.03	98.7577	98.0662	1.00705	0.992631
68	98.14	98.9654	98.38	1.00595	0.99166
69	98.71	99.0857	98.6775	1.00414	0.996209
70	98.69	98.6973	98.9454	0.997493	0.999926
71	98.72	98.6927	99.1396	0.995492	1.00028
72	98.47	98.479	99.2562	0.992169	0.999909
73	99.49	98.4972	99.37	0.991216	1.01008
74	99.84	98.9059	99.555	0.99348	1.00944
75	100.9	99.8165	99.8075	1.00009	1.01085
76	101.31	100.475	100.052	1.00423	1.00831
77	100.09	100.615	100.23	1.00384	0.99478
78	99.28	100.844	100.357	1.00485	0.984488
79	99.57	101.143	100.435	1.00705	0.984446
80	101.04	101.077	100.479	1.00595	0.999638
81	101.87	100.896	100.48	1.00414	1.00965
82	101.39	100.15	100.401	0.997493	1.01239
83	100.3	99.8603	100.312	0.995492	1.0044
84	99.95	99.4931	100.278	0.992169	1.00459
85	99.87	99.4149	100.296	0.991216	1.00458
86	100.51	99.6241	100.278	0.99348	1.00889
87	100.27	100.218	100.209	1.00009	1.00052
88	100.04	100.532	100.108	1.00423	0.99511
89	99.23	100.399	100.015	1.00384	0.988357
90	99.32	100.478	99.9929	1.00485	0.988476
91	99.95	100.703	99.9983	1.00705	0.992518
92	100.23	100.572	99.9767	1.00595	0.996604
93	101.02	100.362	99.9483	1.00414	1.00656
94	99.83	99.7069	99.9575	0.997493	1.00123
95	99.61	99.5741	100.025	0.995492	1.00036
96	100.12	99.3475	100.132	0.992169	1.00778
97	99.83	99.3847	100.265	0.991216	1.00448
98	100.03	99.7288	100.383	0.99348	1.00302
99	100.07	100.417	100.408	1.00009	0.996545
100	100.46	100.846	100.422	1.00423	0.996169
101	100.43	100.844	100.458	1.00384	0.995895
102	100.68	100.896	100.409	1.00485	0.997858
103	101.8	NA	NA	1.00705	NA
104	101.21	NA	NA	1.00595	NA
105	100.63	NA	NA	1.00414	NA
106	100.55	NA	NA	0.997493	NA
107	99.76	NA	NA	0.995492	NA
108	98.8	NA	NA	0.992169	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 86.48 & NA & NA & 0.991216 & NA \tabularnewline
2 & 86.48 & NA & NA & 0.99348 & NA \tabularnewline
3 & 86.7 & NA & NA & 1.00009 & NA \tabularnewline
4 & 87.86 & NA & NA & 1.00423 & NA \tabularnewline
5 & 88.24 & NA & NA & 1.00384 & NA \tabularnewline
6 & 88.23 & NA & NA & 1.00485 & NA \tabularnewline
7 & 88.73 & 87.9021 & 87.2867 & 1.00705 & 1.00942 \tabularnewline
8 & 88.82 & 87.7369 & 87.2179 & 1.00595 & 1.01235 \tabularnewline
9 & 87.16 & 87.562 & 87.2013 & 1.00414 & 0.995409 \tabularnewline
10 & 86.29 & 86.9839 & 87.2025 & 0.997493 & 0.992023 \tabularnewline
11 & 86.37 & 86.7845 & 87.1775 & 0.995492 & 0.995223 \tabularnewline
12 & 86.59 & 86.4725 & 87.155 & 0.992169 & 1.00136 \tabularnewline
13 & 85.46 & 86.3775 & 87.1429 & 0.991216 & 0.989378 \tabularnewline
14 & 85.85 & 86.5371 & 87.105 & 0.99348 & 0.99206 \tabularnewline
15 & 86.93 & 87.127 & 87.1192 & 1.00009 & 0.997739 \tabularnewline
16 & 87.66 & 87.647 & 87.2779 & 1.00423 & 1.00015 \tabularnewline
17 & 87.84 & 87.9111 & 87.5746 & 1.00384 & 0.999191 \tabularnewline
18 & 88.09 & 88.3267 & 87.9004 & 1.00485 & 0.99732 \tabularnewline
19 & 88.58 & 88.8471 & 88.225 & 1.00705 & 0.996994 \tabularnewline
20 & 88.06 & 89.0999 & 88.5729 & 1.00595 & 0.988328 \tabularnewline
21 & 88.26 & 89.2807 & 88.9129 & 1.00414 & 0.988568 \tabularnewline
22 & 89 & 89.0237 & 89.2475 & 0.997493 & 0.999733 \tabularnewline
23 & 90.78 & 89.2197 & 89.6237 & 0.995492 & 1.01749 \tabularnewline
24 & 90 & 89.3903 & 90.0958 & 0.992169 & 1.00682 \tabularnewline
25 & 89.84 & 89.8133 & 90.6092 & 0.991216 & 1.0003 \tabularnewline
26 & 89.82 & 90.4717 & 91.0654 & 0.99348 & 0.992797 \tabularnewline
27 & 91.12 & 91.4487 & 91.4404 & 1.00009 & 0.996406 \tabularnewline
28 & 91.5 & 92.0815 & 91.6938 & 1.00423 & 0.993685 \tabularnewline
29 & 93.03 & 92.0152 & 91.6629 & 1.00384 & 1.01103 \tabularnewline
30 & 94.23 & 91.8446 & 91.4012 & 1.00485 & 1.02597 \tabularnewline
31 & 94.76 & 91.7189 & 91.0767 & 1.00705 & 1.03316 \tabularnewline
32 & 92.83 & 91.3126 & 90.7725 & 1.00595 & 1.01662 \tabularnewline
33 & 92.49 & 90.8275 & 90.4533 & 1.00414 & 1.0183 \tabularnewline
34 & 90.85 & 89.8704 & 90.0962 & 0.997493 & 1.0109 \tabularnewline
35 & 88.19 & 89.294 & 89.6983 & 0.995492 & 0.987636 \tabularnewline
36 & 86.31 & 88.5465 & 89.2454 & 0.992169 & 0.974742 \tabularnewline
37 & 85.74 & 87.9845 & 88.7642 & 0.991216 & 0.97449 \tabularnewline
38 & 86.62 & 87.7963 & 88.3725 & 0.99348 & 0.986602 \tabularnewline
39 & 86.66 & 88.1 & 88.0921 & 1.00009 & 0.983655 \tabularnewline
40 & 87.39 & 88.2215 & 87.85 & 1.00423 & 0.990575 \tabularnewline
41 & 87.59 & 88.1437 & 87.8062 & 1.00384 & 0.993718 \tabularnewline
42 & 88.8 & 88.4189 & 87.9921 & 1.00485 & 1.00431 \tabularnewline
43 & 88.64 & 88.9373 & 88.3146 & 1.00705 & 0.996657 \tabularnewline
44 & 89.55 & 89.1854 & 88.6579 & 1.00595 & 1.00409 \tabularnewline
45 & 89.04 & 89.3799 & 89.0117 & 1.00414 & 0.996198 \tabularnewline
46 & 88.49 & 89.2033 & 89.4275 & 0.997493 & 0.992004 \tabularnewline
47 & 89.5 & 89.4678 & 89.8729 & 0.995492 & 1.00036 \tabularnewline
48 & 89.46 & 89.5726 & 90.2796 & 0.992169 & 0.998743 \tabularnewline
49 & 90.33 & 89.8339 & 90.63 & 0.991216 & 1.00552 \tabularnewline
50 & 90.27 & 90.3508 & 90.9438 & 0.99348 & 0.999106 \tabularnewline
51 & 91.5 & 91.2578 & 91.2496 & 1.00009 & 1.00265 \tabularnewline
52 & 92.53 & 91.999 & 91.6117 & 1.00423 & 1.00577 \tabularnewline
53 & 93.14 & 92.3339 & 91.9804 & 1.00384 & 1.00873 \tabularnewline
54 & 93.01 & 92.8289 & 92.3808 & 1.00485 & 1.00195 \tabularnewline
55 & 92.84 & 93.4867 & 92.8321 & 1.00705 & 0.993083 \tabularnewline
56 & 92.88 & 93.8539 & 93.2988 & 1.00595 & 0.989623 \tabularnewline
57 & 93.05 & 94.1796 & 93.7917 & 1.00414 & 0.988006 \tabularnewline
58 & 93.17 & 94.0449 & 94.2812 & 0.997493 & 0.990697 \tabularnewline
59 & 93.67 & 94.3154 & 94.7425 & 0.995492 & 0.993157 \tabularnewline
60 & 94.9 & 94.4313 & 95.1767 & 0.992169 & 1.00496 \tabularnewline
61 & 95.72 & 94.7648 & 95.6046 & 0.991216 & 1.01008 \tabularnewline
62 & 96.08 & 95.4138 & 96.04 & 0.99348 & 1.00698 \tabularnewline
63 & 97.52 & 96.5037 & 96.495 & 1.00009 & 1.01053 \tabularnewline
64 & 98.26 & 97.3708 & 96.9608 & 1.00423 & 1.00913 \tabularnewline
65 & 98.48 & 97.7756 & 97.4012 & 1.00384 & 1.0072 \tabularnewline
66 & 98.09 & 98.2346 & 97.7604 & 1.00485 & 0.998528 \tabularnewline
67 & 98.03 & 98.7577 & 98.0662 & 1.00705 & 0.992631 \tabularnewline
68 & 98.14 & 98.9654 & 98.38 & 1.00595 & 0.99166 \tabularnewline
69 & 98.71 & 99.0857 & 98.6775 & 1.00414 & 0.996209 \tabularnewline
70 & 98.69 & 98.6973 & 98.9454 & 0.997493 & 0.999926 \tabularnewline
71 & 98.72 & 98.6927 & 99.1396 & 0.995492 & 1.00028 \tabularnewline
72 & 98.47 & 98.479 & 99.2562 & 0.992169 & 0.999909 \tabularnewline
73 & 99.49 & 98.4972 & 99.37 & 0.991216 & 1.01008 \tabularnewline
74 & 99.84 & 98.9059 & 99.555 & 0.99348 & 1.00944 \tabularnewline
75 & 100.9 & 99.8165 & 99.8075 & 1.00009 & 1.01085 \tabularnewline
76 & 101.31 & 100.475 & 100.052 & 1.00423 & 1.00831 \tabularnewline
77 & 100.09 & 100.615 & 100.23 & 1.00384 & 0.99478 \tabularnewline
78 & 99.28 & 100.844 & 100.357 & 1.00485 & 0.984488 \tabularnewline
79 & 99.57 & 101.143 & 100.435 & 1.00705 & 0.984446 \tabularnewline
80 & 101.04 & 101.077 & 100.479 & 1.00595 & 0.999638 \tabularnewline
81 & 101.87 & 100.896 & 100.48 & 1.00414 & 1.00965 \tabularnewline
82 & 101.39 & 100.15 & 100.401 & 0.997493 & 1.01239 \tabularnewline
83 & 100.3 & 99.8603 & 100.312 & 0.995492 & 1.0044 \tabularnewline
84 & 99.95 & 99.4931 & 100.278 & 0.992169 & 1.00459 \tabularnewline
85 & 99.87 & 99.4149 & 100.296 & 0.991216 & 1.00458 \tabularnewline
86 & 100.51 & 99.6241 & 100.278 & 0.99348 & 1.00889 \tabularnewline
87 & 100.27 & 100.218 & 100.209 & 1.00009 & 1.00052 \tabularnewline
88 & 100.04 & 100.532 & 100.108 & 1.00423 & 0.99511 \tabularnewline
89 & 99.23 & 100.399 & 100.015 & 1.00384 & 0.988357 \tabularnewline
90 & 99.32 & 100.478 & 99.9929 & 1.00485 & 0.988476 \tabularnewline
91 & 99.95 & 100.703 & 99.9983 & 1.00705 & 0.992518 \tabularnewline
92 & 100.23 & 100.572 & 99.9767 & 1.00595 & 0.996604 \tabularnewline
93 & 101.02 & 100.362 & 99.9483 & 1.00414 & 1.00656 \tabularnewline
94 & 99.83 & 99.7069 & 99.9575 & 0.997493 & 1.00123 \tabularnewline
95 & 99.61 & 99.5741 & 100.025 & 0.995492 & 1.00036 \tabularnewline
96 & 100.12 & 99.3475 & 100.132 & 0.992169 & 1.00778 \tabularnewline
97 & 99.83 & 99.3847 & 100.265 & 0.991216 & 1.00448 \tabularnewline
98 & 100.03 & 99.7288 & 100.383 & 0.99348 & 1.00302 \tabularnewline
99 & 100.07 & 100.417 & 100.408 & 1.00009 & 0.996545 \tabularnewline
100 & 100.46 & 100.846 & 100.422 & 1.00423 & 0.996169 \tabularnewline
101 & 100.43 & 100.844 & 100.458 & 1.00384 & 0.995895 \tabularnewline
102 & 100.68 & 100.896 & 100.409 & 1.00485 & 0.997858 \tabularnewline
103 & 101.8 & NA & NA & 1.00705 & NA \tabularnewline
104 & 101.21 & NA & NA & 1.00595 & NA \tabularnewline
105 & 100.63 & NA & NA & 1.00414 & NA \tabularnewline
106 & 100.55 & NA & NA & 0.997493 & NA \tabularnewline
107 & 99.76 & NA & NA & 0.995492 & NA \tabularnewline
108 & 98.8 & NA & NA & 0.992169 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284232&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]86.48[/C][C]NA[/C][C]NA[/C][C]0.991216[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]86.48[/C][C]NA[/C][C]NA[/C][C]0.99348[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]86.7[/C][C]NA[/C][C]NA[/C][C]1.00009[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]87.86[/C][C]NA[/C][C]NA[/C][C]1.00423[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]88.24[/C][C]NA[/C][C]NA[/C][C]1.00384[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]88.23[/C][C]NA[/C][C]NA[/C][C]1.00485[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]88.73[/C][C]87.9021[/C][C]87.2867[/C][C]1.00705[/C][C]1.00942[/C][/ROW]
[ROW][C]8[/C][C]88.82[/C][C]87.7369[/C][C]87.2179[/C][C]1.00595[/C][C]1.01235[/C][/ROW]
[ROW][C]9[/C][C]87.16[/C][C]87.562[/C][C]87.2013[/C][C]1.00414[/C][C]0.995409[/C][/ROW]
[ROW][C]10[/C][C]86.29[/C][C]86.9839[/C][C]87.2025[/C][C]0.997493[/C][C]0.992023[/C][/ROW]
[ROW][C]11[/C][C]86.37[/C][C]86.7845[/C][C]87.1775[/C][C]0.995492[/C][C]0.995223[/C][/ROW]
[ROW][C]12[/C][C]86.59[/C][C]86.4725[/C][C]87.155[/C][C]0.992169[/C][C]1.00136[/C][/ROW]
[ROW][C]13[/C][C]85.46[/C][C]86.3775[/C][C]87.1429[/C][C]0.991216[/C][C]0.989378[/C][/ROW]
[ROW][C]14[/C][C]85.85[/C][C]86.5371[/C][C]87.105[/C][C]0.99348[/C][C]0.99206[/C][/ROW]
[ROW][C]15[/C][C]86.93[/C][C]87.127[/C][C]87.1192[/C][C]1.00009[/C][C]0.997739[/C][/ROW]
[ROW][C]16[/C][C]87.66[/C][C]87.647[/C][C]87.2779[/C][C]1.00423[/C][C]1.00015[/C][/ROW]
[ROW][C]17[/C][C]87.84[/C][C]87.9111[/C][C]87.5746[/C][C]1.00384[/C][C]0.999191[/C][/ROW]
[ROW][C]18[/C][C]88.09[/C][C]88.3267[/C][C]87.9004[/C][C]1.00485[/C][C]0.99732[/C][/ROW]
[ROW][C]19[/C][C]88.58[/C][C]88.8471[/C][C]88.225[/C][C]1.00705[/C][C]0.996994[/C][/ROW]
[ROW][C]20[/C][C]88.06[/C][C]89.0999[/C][C]88.5729[/C][C]1.00595[/C][C]0.988328[/C][/ROW]
[ROW][C]21[/C][C]88.26[/C][C]89.2807[/C][C]88.9129[/C][C]1.00414[/C][C]0.988568[/C][/ROW]
[ROW][C]22[/C][C]89[/C][C]89.0237[/C][C]89.2475[/C][C]0.997493[/C][C]0.999733[/C][/ROW]
[ROW][C]23[/C][C]90.78[/C][C]89.2197[/C][C]89.6237[/C][C]0.995492[/C][C]1.01749[/C][/ROW]
[ROW][C]24[/C][C]90[/C][C]89.3903[/C][C]90.0958[/C][C]0.992169[/C][C]1.00682[/C][/ROW]
[ROW][C]25[/C][C]89.84[/C][C]89.8133[/C][C]90.6092[/C][C]0.991216[/C][C]1.0003[/C][/ROW]
[ROW][C]26[/C][C]89.82[/C][C]90.4717[/C][C]91.0654[/C][C]0.99348[/C][C]0.992797[/C][/ROW]
[ROW][C]27[/C][C]91.12[/C][C]91.4487[/C][C]91.4404[/C][C]1.00009[/C][C]0.996406[/C][/ROW]
[ROW][C]28[/C][C]91.5[/C][C]92.0815[/C][C]91.6938[/C][C]1.00423[/C][C]0.993685[/C][/ROW]
[ROW][C]29[/C][C]93.03[/C][C]92.0152[/C][C]91.6629[/C][C]1.00384[/C][C]1.01103[/C][/ROW]
[ROW][C]30[/C][C]94.23[/C][C]91.8446[/C][C]91.4012[/C][C]1.00485[/C][C]1.02597[/C][/ROW]
[ROW][C]31[/C][C]94.76[/C][C]91.7189[/C][C]91.0767[/C][C]1.00705[/C][C]1.03316[/C][/ROW]
[ROW][C]32[/C][C]92.83[/C][C]91.3126[/C][C]90.7725[/C][C]1.00595[/C][C]1.01662[/C][/ROW]
[ROW][C]33[/C][C]92.49[/C][C]90.8275[/C][C]90.4533[/C][C]1.00414[/C][C]1.0183[/C][/ROW]
[ROW][C]34[/C][C]90.85[/C][C]89.8704[/C][C]90.0962[/C][C]0.997493[/C][C]1.0109[/C][/ROW]
[ROW][C]35[/C][C]88.19[/C][C]89.294[/C][C]89.6983[/C][C]0.995492[/C][C]0.987636[/C][/ROW]
[ROW][C]36[/C][C]86.31[/C][C]88.5465[/C][C]89.2454[/C][C]0.992169[/C][C]0.974742[/C][/ROW]
[ROW][C]37[/C][C]85.74[/C][C]87.9845[/C][C]88.7642[/C][C]0.991216[/C][C]0.97449[/C][/ROW]
[ROW][C]38[/C][C]86.62[/C][C]87.7963[/C][C]88.3725[/C][C]0.99348[/C][C]0.986602[/C][/ROW]
[ROW][C]39[/C][C]86.66[/C][C]88.1[/C][C]88.0921[/C][C]1.00009[/C][C]0.983655[/C][/ROW]
[ROW][C]40[/C][C]87.39[/C][C]88.2215[/C][C]87.85[/C][C]1.00423[/C][C]0.990575[/C][/ROW]
[ROW][C]41[/C][C]87.59[/C][C]88.1437[/C][C]87.8062[/C][C]1.00384[/C][C]0.993718[/C][/ROW]
[ROW][C]42[/C][C]88.8[/C][C]88.4189[/C][C]87.9921[/C][C]1.00485[/C][C]1.00431[/C][/ROW]
[ROW][C]43[/C][C]88.64[/C][C]88.9373[/C][C]88.3146[/C][C]1.00705[/C][C]0.996657[/C][/ROW]
[ROW][C]44[/C][C]89.55[/C][C]89.1854[/C][C]88.6579[/C][C]1.00595[/C][C]1.00409[/C][/ROW]
[ROW][C]45[/C][C]89.04[/C][C]89.3799[/C][C]89.0117[/C][C]1.00414[/C][C]0.996198[/C][/ROW]
[ROW][C]46[/C][C]88.49[/C][C]89.2033[/C][C]89.4275[/C][C]0.997493[/C][C]0.992004[/C][/ROW]
[ROW][C]47[/C][C]89.5[/C][C]89.4678[/C][C]89.8729[/C][C]0.995492[/C][C]1.00036[/C][/ROW]
[ROW][C]48[/C][C]89.46[/C][C]89.5726[/C][C]90.2796[/C][C]0.992169[/C][C]0.998743[/C][/ROW]
[ROW][C]49[/C][C]90.33[/C][C]89.8339[/C][C]90.63[/C][C]0.991216[/C][C]1.00552[/C][/ROW]
[ROW][C]50[/C][C]90.27[/C][C]90.3508[/C][C]90.9438[/C][C]0.99348[/C][C]0.999106[/C][/ROW]
[ROW][C]51[/C][C]91.5[/C][C]91.2578[/C][C]91.2496[/C][C]1.00009[/C][C]1.00265[/C][/ROW]
[ROW][C]52[/C][C]92.53[/C][C]91.999[/C][C]91.6117[/C][C]1.00423[/C][C]1.00577[/C][/ROW]
[ROW][C]53[/C][C]93.14[/C][C]92.3339[/C][C]91.9804[/C][C]1.00384[/C][C]1.00873[/C][/ROW]
[ROW][C]54[/C][C]93.01[/C][C]92.8289[/C][C]92.3808[/C][C]1.00485[/C][C]1.00195[/C][/ROW]
[ROW][C]55[/C][C]92.84[/C][C]93.4867[/C][C]92.8321[/C][C]1.00705[/C][C]0.993083[/C][/ROW]
[ROW][C]56[/C][C]92.88[/C][C]93.8539[/C][C]93.2988[/C][C]1.00595[/C][C]0.989623[/C][/ROW]
[ROW][C]57[/C][C]93.05[/C][C]94.1796[/C][C]93.7917[/C][C]1.00414[/C][C]0.988006[/C][/ROW]
[ROW][C]58[/C][C]93.17[/C][C]94.0449[/C][C]94.2812[/C][C]0.997493[/C][C]0.990697[/C][/ROW]
[ROW][C]59[/C][C]93.67[/C][C]94.3154[/C][C]94.7425[/C][C]0.995492[/C][C]0.993157[/C][/ROW]
[ROW][C]60[/C][C]94.9[/C][C]94.4313[/C][C]95.1767[/C][C]0.992169[/C][C]1.00496[/C][/ROW]
[ROW][C]61[/C][C]95.72[/C][C]94.7648[/C][C]95.6046[/C][C]0.991216[/C][C]1.01008[/C][/ROW]
[ROW][C]62[/C][C]96.08[/C][C]95.4138[/C][C]96.04[/C][C]0.99348[/C][C]1.00698[/C][/ROW]
[ROW][C]63[/C][C]97.52[/C][C]96.5037[/C][C]96.495[/C][C]1.00009[/C][C]1.01053[/C][/ROW]
[ROW][C]64[/C][C]98.26[/C][C]97.3708[/C][C]96.9608[/C][C]1.00423[/C][C]1.00913[/C][/ROW]
[ROW][C]65[/C][C]98.48[/C][C]97.7756[/C][C]97.4012[/C][C]1.00384[/C][C]1.0072[/C][/ROW]
[ROW][C]66[/C][C]98.09[/C][C]98.2346[/C][C]97.7604[/C][C]1.00485[/C][C]0.998528[/C][/ROW]
[ROW][C]67[/C][C]98.03[/C][C]98.7577[/C][C]98.0662[/C][C]1.00705[/C][C]0.992631[/C][/ROW]
[ROW][C]68[/C][C]98.14[/C][C]98.9654[/C][C]98.38[/C][C]1.00595[/C][C]0.99166[/C][/ROW]
[ROW][C]69[/C][C]98.71[/C][C]99.0857[/C][C]98.6775[/C][C]1.00414[/C][C]0.996209[/C][/ROW]
[ROW][C]70[/C][C]98.69[/C][C]98.6973[/C][C]98.9454[/C][C]0.997493[/C][C]0.999926[/C][/ROW]
[ROW][C]71[/C][C]98.72[/C][C]98.6927[/C][C]99.1396[/C][C]0.995492[/C][C]1.00028[/C][/ROW]
[ROW][C]72[/C][C]98.47[/C][C]98.479[/C][C]99.2562[/C][C]0.992169[/C][C]0.999909[/C][/ROW]
[ROW][C]73[/C][C]99.49[/C][C]98.4972[/C][C]99.37[/C][C]0.991216[/C][C]1.01008[/C][/ROW]
[ROW][C]74[/C][C]99.84[/C][C]98.9059[/C][C]99.555[/C][C]0.99348[/C][C]1.00944[/C][/ROW]
[ROW][C]75[/C][C]100.9[/C][C]99.8165[/C][C]99.8075[/C][C]1.00009[/C][C]1.01085[/C][/ROW]
[ROW][C]76[/C][C]101.31[/C][C]100.475[/C][C]100.052[/C][C]1.00423[/C][C]1.00831[/C][/ROW]
[ROW][C]77[/C][C]100.09[/C][C]100.615[/C][C]100.23[/C][C]1.00384[/C][C]0.99478[/C][/ROW]
[ROW][C]78[/C][C]99.28[/C][C]100.844[/C][C]100.357[/C][C]1.00485[/C][C]0.984488[/C][/ROW]
[ROW][C]79[/C][C]99.57[/C][C]101.143[/C][C]100.435[/C][C]1.00705[/C][C]0.984446[/C][/ROW]
[ROW][C]80[/C][C]101.04[/C][C]101.077[/C][C]100.479[/C][C]1.00595[/C][C]0.999638[/C][/ROW]
[ROW][C]81[/C][C]101.87[/C][C]100.896[/C][C]100.48[/C][C]1.00414[/C][C]1.00965[/C][/ROW]
[ROW][C]82[/C][C]101.39[/C][C]100.15[/C][C]100.401[/C][C]0.997493[/C][C]1.01239[/C][/ROW]
[ROW][C]83[/C][C]100.3[/C][C]99.8603[/C][C]100.312[/C][C]0.995492[/C][C]1.0044[/C][/ROW]
[ROW][C]84[/C][C]99.95[/C][C]99.4931[/C][C]100.278[/C][C]0.992169[/C][C]1.00459[/C][/ROW]
[ROW][C]85[/C][C]99.87[/C][C]99.4149[/C][C]100.296[/C][C]0.991216[/C][C]1.00458[/C][/ROW]
[ROW][C]86[/C][C]100.51[/C][C]99.6241[/C][C]100.278[/C][C]0.99348[/C][C]1.00889[/C][/ROW]
[ROW][C]87[/C][C]100.27[/C][C]100.218[/C][C]100.209[/C][C]1.00009[/C][C]1.00052[/C][/ROW]
[ROW][C]88[/C][C]100.04[/C][C]100.532[/C][C]100.108[/C][C]1.00423[/C][C]0.99511[/C][/ROW]
[ROW][C]89[/C][C]99.23[/C][C]100.399[/C][C]100.015[/C][C]1.00384[/C][C]0.988357[/C][/ROW]
[ROW][C]90[/C][C]99.32[/C][C]100.478[/C][C]99.9929[/C][C]1.00485[/C][C]0.988476[/C][/ROW]
[ROW][C]91[/C][C]99.95[/C][C]100.703[/C][C]99.9983[/C][C]1.00705[/C][C]0.992518[/C][/ROW]
[ROW][C]92[/C][C]100.23[/C][C]100.572[/C][C]99.9767[/C][C]1.00595[/C][C]0.996604[/C][/ROW]
[ROW][C]93[/C][C]101.02[/C][C]100.362[/C][C]99.9483[/C][C]1.00414[/C][C]1.00656[/C][/ROW]
[ROW][C]94[/C][C]99.83[/C][C]99.7069[/C][C]99.9575[/C][C]0.997493[/C][C]1.00123[/C][/ROW]
[ROW][C]95[/C][C]99.61[/C][C]99.5741[/C][C]100.025[/C][C]0.995492[/C][C]1.00036[/C][/ROW]
[ROW][C]96[/C][C]100.12[/C][C]99.3475[/C][C]100.132[/C][C]0.992169[/C][C]1.00778[/C][/ROW]
[ROW][C]97[/C][C]99.83[/C][C]99.3847[/C][C]100.265[/C][C]0.991216[/C][C]1.00448[/C][/ROW]
[ROW][C]98[/C][C]100.03[/C][C]99.7288[/C][C]100.383[/C][C]0.99348[/C][C]1.00302[/C][/ROW]
[ROW][C]99[/C][C]100.07[/C][C]100.417[/C][C]100.408[/C][C]1.00009[/C][C]0.996545[/C][/ROW]
[ROW][C]100[/C][C]100.46[/C][C]100.846[/C][C]100.422[/C][C]1.00423[/C][C]0.996169[/C][/ROW]
[ROW][C]101[/C][C]100.43[/C][C]100.844[/C][C]100.458[/C][C]1.00384[/C][C]0.995895[/C][/ROW]
[ROW][C]102[/C][C]100.68[/C][C]100.896[/C][C]100.409[/C][C]1.00485[/C][C]0.997858[/C][/ROW]
[ROW][C]103[/C][C]101.8[/C][C]NA[/C][C]NA[/C][C]1.00705[/C][C]NA[/C][/ROW]
[ROW][C]104[/C][C]101.21[/C][C]NA[/C][C]NA[/C][C]1.00595[/C][C]NA[/C][/ROW]
[ROW][C]105[/C][C]100.63[/C][C]NA[/C][C]NA[/C][C]1.00414[/C][C]NA[/C][/ROW]
[ROW][C]106[/C][C]100.55[/C][C]NA[/C][C]NA[/C][C]0.997493[/C][C]NA[/C][/ROW]
[ROW][C]107[/C][C]99.76[/C][C]NA[/C][C]NA[/C][C]0.995492[/C][C]NA[/C][/ROW]
[ROW][C]108[/C][C]98.8[/C][C]NA[/C][C]NA[/C][C]0.992169[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=284232&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284232&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	86.48	NA	NA	0.991216	NA
2	86.48	NA	NA	0.99348	NA
3	86.7	NA	NA	1.00009	NA
4	87.86	NA	NA	1.00423	NA
5	88.24	NA	NA	1.00384	NA
6	88.23	NA	NA	1.00485	NA
7	88.73	87.9021	87.2867	1.00705	1.00942
8	88.82	87.7369	87.2179	1.00595	1.01235
9	87.16	87.562	87.2013	1.00414	0.995409
10	86.29	86.9839	87.2025	0.997493	0.992023
11	86.37	86.7845	87.1775	0.995492	0.995223
12	86.59	86.4725	87.155	0.992169	1.00136
13	85.46	86.3775	87.1429	0.991216	0.989378
14	85.85	86.5371	87.105	0.99348	0.99206
15	86.93	87.127	87.1192	1.00009	0.997739
16	87.66	87.647	87.2779	1.00423	1.00015
17	87.84	87.9111	87.5746	1.00384	0.999191
18	88.09	88.3267	87.9004	1.00485	0.99732
19	88.58	88.8471	88.225	1.00705	0.996994
20	88.06	89.0999	88.5729	1.00595	0.988328
21	88.26	89.2807	88.9129	1.00414	0.988568
22	89	89.0237	89.2475	0.997493	0.999733
23	90.78	89.2197	89.6237	0.995492	1.01749
24	90	89.3903	90.0958	0.992169	1.00682
25	89.84	89.8133	90.6092	0.991216	1.0003
26	89.82	90.4717	91.0654	0.99348	0.992797
27	91.12	91.4487	91.4404	1.00009	0.996406
28	91.5	92.0815	91.6938	1.00423	0.993685
29	93.03	92.0152	91.6629	1.00384	1.01103
30	94.23	91.8446	91.4012	1.00485	1.02597
31	94.76	91.7189	91.0767	1.00705	1.03316
32	92.83	91.3126	90.7725	1.00595	1.01662
33	92.49	90.8275	90.4533	1.00414	1.0183
34	90.85	89.8704	90.0962	0.997493	1.0109
35	88.19	89.294	89.6983	0.995492	0.987636
36	86.31	88.5465	89.2454	0.992169	0.974742
37	85.74	87.9845	88.7642	0.991216	0.97449
38	86.62	87.7963	88.3725	0.99348	0.986602
39	86.66	88.1	88.0921	1.00009	0.983655
40	87.39	88.2215	87.85	1.00423	0.990575
41	87.59	88.1437	87.8062	1.00384	0.993718
42	88.8	88.4189	87.9921	1.00485	1.00431
43	88.64	88.9373	88.3146	1.00705	0.996657
44	89.55	89.1854	88.6579	1.00595	1.00409
45	89.04	89.3799	89.0117	1.00414	0.996198
46	88.49	89.2033	89.4275	0.997493	0.992004
47	89.5	89.4678	89.8729	0.995492	1.00036
48	89.46	89.5726	90.2796	0.992169	0.998743
49	90.33	89.8339	90.63	0.991216	1.00552
50	90.27	90.3508	90.9438	0.99348	0.999106
51	91.5	91.2578	91.2496	1.00009	1.00265
52	92.53	91.999	91.6117	1.00423	1.00577
53	93.14	92.3339	91.9804	1.00384	1.00873
54	93.01	92.8289	92.3808	1.00485	1.00195
55	92.84	93.4867	92.8321	1.00705	0.993083
56	92.88	93.8539	93.2988	1.00595	0.989623
57	93.05	94.1796	93.7917	1.00414	0.988006
58	93.17	94.0449	94.2812	0.997493	0.990697
59	93.67	94.3154	94.7425	0.995492	0.993157
60	94.9	94.4313	95.1767	0.992169	1.00496
61	95.72	94.7648	95.6046	0.991216	1.01008
62	96.08	95.4138	96.04	0.99348	1.00698
63	97.52	96.5037	96.495	1.00009	1.01053
64	98.26	97.3708	96.9608	1.00423	1.00913
65	98.48	97.7756	97.4012	1.00384	1.0072
66	98.09	98.2346	97.7604	1.00485	0.998528
67	98.03	98.7577	98.0662	1.00705	0.992631
68	98.14	98.9654	98.38	1.00595	0.99166
69	98.71	99.0857	98.6775	1.00414	0.996209
70	98.69	98.6973	98.9454	0.997493	0.999926
71	98.72	98.6927	99.1396	0.995492	1.00028
72	98.47	98.479	99.2562	0.992169	0.999909
73	99.49	98.4972	99.37	0.991216	1.01008
74	99.84	98.9059	99.555	0.99348	1.00944
75	100.9	99.8165	99.8075	1.00009	1.01085
76	101.31	100.475	100.052	1.00423	1.00831
77	100.09	100.615	100.23	1.00384	0.99478
78	99.28	100.844	100.357	1.00485	0.984488
79	99.57	101.143	100.435	1.00705	0.984446
80	101.04	101.077	100.479	1.00595	0.999638
81	101.87	100.896	100.48	1.00414	1.00965
82	101.39	100.15	100.401	0.997493	1.01239
83	100.3	99.8603	100.312	0.995492	1.0044
84	99.95	99.4931	100.278	0.992169	1.00459
85	99.87	99.4149	100.296	0.991216	1.00458
86	100.51	99.6241	100.278	0.99348	1.00889
87	100.27	100.218	100.209	1.00009	1.00052
88	100.04	100.532	100.108	1.00423	0.99511
89	99.23	100.399	100.015	1.00384	0.988357
90	99.32	100.478	99.9929	1.00485	0.988476
91	99.95	100.703	99.9983	1.00705	0.992518
92	100.23	100.572	99.9767	1.00595	0.996604
93	101.02	100.362	99.9483	1.00414	1.00656
94	99.83	99.7069	99.9575	0.997493	1.00123
95	99.61	99.5741	100.025	0.995492	1.00036
96	100.12	99.3475	100.132	0.992169	1.00778
97	99.83	99.3847	100.265	0.991216	1.00448
98	100.03	99.7288	100.383	0.99348	1.00302
99	100.07	100.417	100.408	1.00009	0.996545
100	100.46	100.846	100.422	1.00423	0.996169
101	100.43	100.844	100.458	1.00384	0.995895
102	100.68	100.896	100.409	1.00485	0.997858
103	101.8	NA	NA	1.00705	NA
104	101.21	NA	NA	1.00595	NA
105	100.63	NA	NA	1.00414	NA
106	100.55	NA	NA	0.997493	NA
107	99.76	NA	NA	0.995492	NA
108	98.8	NA	NA	0.992169	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 = multiplicative ; par2 = 12 ;

Parameters (R input):

par1 = multiplicative ; 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