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_decompose.wasp

Title produced by software

Classical Decomposition

Date of computation

Sat, 27 Nov 2010 18:10:23 +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/Nov/27/t1290881348y2vbaqfkpciykin.htm/, Retrieved Mon, 29 Apr 2024 08:38:14 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=102424, Retrieved Mon, 29 Apr 2024 08:38:14 +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

120

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

-     [Classical Decomposition] [HPC Retail Sales] [2008-03-02 16:19:32] [74be16979710d4c4e7c6647856088456]
-  M D    [Classical Decomposition] [ws 8: productie] [2010-11-27 18:10:23] [09489ba95453d3f5c9e6f2eaeda915af] [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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

\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 & 'Sir Ronald Aylmer Fisher' @ 193.190.124.24 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=102424&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]'Sir Ronald Aylmer Fisher' @ 193.190.124.24[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=102424&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=102424&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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	94.6	NA	NA	-3.72673611111111	NA
2	95.9	NA	NA	-2.35069444444444	NA
3	104.7	NA	NA	6.60868055555556	NA
4	102.8	NA	NA	-0.542361111111103	NA
5	98.1	NA	NA	0.0836805555555561	NA
6	113.9	NA	NA	7.94305555555555	NA
7	80.9	86.3253472222222	101.583333333333	-15.2579861111111	-5.42534722222219
8	95.7	96.2086805555555	101.966666666667	-5.75798611111111	-0.508680555555543
9	113.2	110.743055555556	102.616666666667	8.12638888888889	2.45694444444445
10	105.9	113.932638888889	102.979166666667	10.9534722222222	-8.03263888888888
11	108.8	104.726388888889	103.383333333333	1.34305555555556	4.07361111111109
12	102.3	96.4815972222222	103.904166666667	-7.42256944444444	5.81840277777778
13	99	100.394097222222	104.120833333333	-3.72673611111111	-1.39409722222221
14	100.7	102.157638888889	104.508333333333	-2.35069444444444	-1.45763888888888
15	115.5	111.383680555556	104.775	6.60868055555556	4.11631944444444
16	100.7	104.740972222222	105.283333333333	-0.542361111111103	-4.04097222222219
17	109.9	105.979513888889	105.895833333333	0.0836805555555561	3.92048611111113
18	114.6	113.997222222222	106.054166666667	7.94305555555555	0.602777777777774
19	85.4	91.0753472222222	106.333333333333	-15.2579861111111	-5.6753472222222
20	100.5	101.058680555556	106.816666666667	-5.75798611111111	-0.558680555555526
21	114.8	115.272222222222	107.145833333333	8.12638888888889	-0.4722222222222
22	116.5	118.461805555556	107.508333333333	10.9534722222222	-1.96180555555554
23	112.9	109.051388888889	107.708333333333	1.34305555555556	3.84861111111114
24	102	100.369097222222	107.791666666667	-7.42256944444444	1.63090277777778
25	106	104.469097222222	108.195833333333	-3.72673611111111	1.53090277777778
26	105.3	106.295138888889	108.645833333333	-2.35069444444444	-0.995138888888874
27	118.8	115.312847222222	108.704166666667	6.60868055555556	3.48715277777778
28	106.1	108.311805555556	108.854166666667	-0.542361111111103	-2.21180555555556
29	109.3	109.200347222222	109.116666666667	0.0836805555555561	0.099652777777763
30	117.2	116.993055555556	109.05	7.94305555555555	0.20694444444446
31	92.5	93.9045138888889	109.1625	-15.2579861111111	-1.40451388888889
32	104.2	103.912847222222	109.670833333333	-5.75798611111111	0.287152777777777
33	112.5	117.734722222222	109.608333333333	8.12638888888889	-5.23472222222222
34	122.4	120.653472222222	109.7	10.9534722222222	1.7465277777778
35	113.3	111.501388888889	110.158333333333	1.34305555555556	1.79861111111113
36	100	102.673263888889	110.095833333333	-7.42256944444444	-2.67326388888890
37	110.7	106.460763888889	110.1875	-3.72673611111111	4.23923611111111
38	112.8	107.799305555556	110.15	-2.35069444444444	5.00069444444445
39	109.8	116.754513888889	110.145833333333	6.60868055555556	-6.95451388888888
40	117.3	109.503472222222	110.045833333333	-0.542361111111103	7.7965277777778
41	109.1	109.271180555556	109.1875	0.0836805555555561	-0.171180555555551
42	115.9	116.313888888889	108.370833333333	7.94305555555555	-0.413888888888891
43	96	92.0545138888889	107.3125	-15.2579861111111	3.94548611111111
44	99.8	99.9170138888889	105.675	-5.75798611111111	-0.117013888888891
45	116.8	112.705555555556	104.579166666667	8.12638888888889	4.09444444444445
46	115.7	114.286805555556	103.333333333333	10.9534722222222	1.41319444444446
47	99.4	102.988888888889	101.645833333333	1.34305555555556	-3.58888888888887
48	94.3	92.9524305555556	100.375	-7.42256944444444	1.34756944444445
49	91	95.5399305555556	99.2666666666667	-3.72673611111111	-4.53993055555556
50	93.2	95.9118055555555	98.2625	-2.35069444444444	-2.71180555555554
51	103.1	103.912847222222	97.3041666666666	6.60868055555556	-0.812847222222217
52	94.1	95.8076388888889	96.35	-0.542361111111103	-1.70763888888889
53	91.8	95.8128472222222	95.7291666666667	0.0836805555555561	-4.01284722222222
54	102.7	103.259722222222	95.3166666666666	7.94305555555555	-0.559722222222192
55	82.6	79.6295138888889	94.8875	-15.2579861111111	2.97048611111111
56	89.1	88.8753472222222	94.6333333333333	-5.75798611111111	0.224652777777763
57	104.5	103.051388888889	94.925	8.12638888888889	1.44861111111112
58	105.1	106.461805555556	95.5083333333333	10.9534722222222	-1.36180555555556
59	95.1	97.3222222222222	95.9791666666667	1.34305555555556	-2.22222222222223
60	88.7	89.1690972222222	96.5916666666666	-7.42256944444444	-0.469097222222189
61	86.3	NA	97.1166666666666	NA	NA
62	91.8	NA	97.5291666666667	NA	NA
63	111.5	NA	NA	NA	NA
64	99.7	NA	NA	NA	NA
65	97.5	NA	NA	NA	NA
66	111.7	NA	NA	NA	NA
67	86.2	NA	NA	NA	NA
68	95.4	NA	NA	NA	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 94.6 & NA & NA & -3.72673611111111 & NA \tabularnewline
2 & 95.9 & NA & NA & -2.35069444444444 & NA \tabularnewline
3 & 104.7 & NA & NA & 6.60868055555556 & NA \tabularnewline
4 & 102.8 & NA & NA & -0.542361111111103 & NA \tabularnewline
5 & 98.1 & NA & NA & 0.0836805555555561 & NA \tabularnewline
6 & 113.9 & NA & NA & 7.94305555555555 & NA \tabularnewline
7 & 80.9 & 86.3253472222222 & 101.583333333333 & -15.2579861111111 & -5.42534722222219 \tabularnewline
8 & 95.7 & 96.2086805555555 & 101.966666666667 & -5.75798611111111 & -0.508680555555543 \tabularnewline
9 & 113.2 & 110.743055555556 & 102.616666666667 & 8.12638888888889 & 2.45694444444445 \tabularnewline
10 & 105.9 & 113.932638888889 & 102.979166666667 & 10.9534722222222 & -8.03263888888888 \tabularnewline
11 & 108.8 & 104.726388888889 & 103.383333333333 & 1.34305555555556 & 4.07361111111109 \tabularnewline
12 & 102.3 & 96.4815972222222 & 103.904166666667 & -7.42256944444444 & 5.81840277777778 \tabularnewline
13 & 99 & 100.394097222222 & 104.120833333333 & -3.72673611111111 & -1.39409722222221 \tabularnewline
14 & 100.7 & 102.157638888889 & 104.508333333333 & -2.35069444444444 & -1.45763888888888 \tabularnewline
15 & 115.5 & 111.383680555556 & 104.775 & 6.60868055555556 & 4.11631944444444 \tabularnewline
16 & 100.7 & 104.740972222222 & 105.283333333333 & -0.542361111111103 & -4.04097222222219 \tabularnewline
17 & 109.9 & 105.979513888889 & 105.895833333333 & 0.0836805555555561 & 3.92048611111113 \tabularnewline
18 & 114.6 & 113.997222222222 & 106.054166666667 & 7.94305555555555 & 0.602777777777774 \tabularnewline
19 & 85.4 & 91.0753472222222 & 106.333333333333 & -15.2579861111111 & -5.6753472222222 \tabularnewline
20 & 100.5 & 101.058680555556 & 106.816666666667 & -5.75798611111111 & -0.558680555555526 \tabularnewline
21 & 114.8 & 115.272222222222 & 107.145833333333 & 8.12638888888889 & -0.4722222222222 \tabularnewline
22 & 116.5 & 118.461805555556 & 107.508333333333 & 10.9534722222222 & -1.96180555555554 \tabularnewline
23 & 112.9 & 109.051388888889 & 107.708333333333 & 1.34305555555556 & 3.84861111111114 \tabularnewline
24 & 102 & 100.369097222222 & 107.791666666667 & -7.42256944444444 & 1.63090277777778 \tabularnewline
25 & 106 & 104.469097222222 & 108.195833333333 & -3.72673611111111 & 1.53090277777778 \tabularnewline
26 & 105.3 & 106.295138888889 & 108.645833333333 & -2.35069444444444 & -0.995138888888874 \tabularnewline
27 & 118.8 & 115.312847222222 & 108.704166666667 & 6.60868055555556 & 3.48715277777778 \tabularnewline
28 & 106.1 & 108.311805555556 & 108.854166666667 & -0.542361111111103 & -2.21180555555556 \tabularnewline
29 & 109.3 & 109.200347222222 & 109.116666666667 & 0.0836805555555561 & 0.099652777777763 \tabularnewline
30 & 117.2 & 116.993055555556 & 109.05 & 7.94305555555555 & 0.20694444444446 \tabularnewline
31 & 92.5 & 93.9045138888889 & 109.1625 & -15.2579861111111 & -1.40451388888889 \tabularnewline
32 & 104.2 & 103.912847222222 & 109.670833333333 & -5.75798611111111 & 0.287152777777777 \tabularnewline
33 & 112.5 & 117.734722222222 & 109.608333333333 & 8.12638888888889 & -5.23472222222222 \tabularnewline
34 & 122.4 & 120.653472222222 & 109.7 & 10.9534722222222 & 1.7465277777778 \tabularnewline
35 & 113.3 & 111.501388888889 & 110.158333333333 & 1.34305555555556 & 1.79861111111113 \tabularnewline
36 & 100 & 102.673263888889 & 110.095833333333 & -7.42256944444444 & -2.67326388888890 \tabularnewline
37 & 110.7 & 106.460763888889 & 110.1875 & -3.72673611111111 & 4.23923611111111 \tabularnewline
38 & 112.8 & 107.799305555556 & 110.15 & -2.35069444444444 & 5.00069444444445 \tabularnewline
39 & 109.8 & 116.754513888889 & 110.145833333333 & 6.60868055555556 & -6.95451388888888 \tabularnewline
40 & 117.3 & 109.503472222222 & 110.045833333333 & -0.542361111111103 & 7.7965277777778 \tabularnewline
41 & 109.1 & 109.271180555556 & 109.1875 & 0.0836805555555561 & -0.171180555555551 \tabularnewline
42 & 115.9 & 116.313888888889 & 108.370833333333 & 7.94305555555555 & -0.413888888888891 \tabularnewline
43 & 96 & 92.0545138888889 & 107.3125 & -15.2579861111111 & 3.94548611111111 \tabularnewline
44 & 99.8 & 99.9170138888889 & 105.675 & -5.75798611111111 & -0.117013888888891 \tabularnewline
45 & 116.8 & 112.705555555556 & 104.579166666667 & 8.12638888888889 & 4.09444444444445 \tabularnewline
46 & 115.7 & 114.286805555556 & 103.333333333333 & 10.9534722222222 & 1.41319444444446 \tabularnewline
47 & 99.4 & 102.988888888889 & 101.645833333333 & 1.34305555555556 & -3.58888888888887 \tabularnewline
48 & 94.3 & 92.9524305555556 & 100.375 & -7.42256944444444 & 1.34756944444445 \tabularnewline
49 & 91 & 95.5399305555556 & 99.2666666666667 & -3.72673611111111 & -4.53993055555556 \tabularnewline
50 & 93.2 & 95.9118055555555 & 98.2625 & -2.35069444444444 & -2.71180555555554 \tabularnewline
51 & 103.1 & 103.912847222222 & 97.3041666666666 & 6.60868055555556 & -0.812847222222217 \tabularnewline
52 & 94.1 & 95.8076388888889 & 96.35 & -0.542361111111103 & -1.70763888888889 \tabularnewline
53 & 91.8 & 95.8128472222222 & 95.7291666666667 & 0.0836805555555561 & -4.01284722222222 \tabularnewline
54 & 102.7 & 103.259722222222 & 95.3166666666666 & 7.94305555555555 & -0.559722222222192 \tabularnewline
55 & 82.6 & 79.6295138888889 & 94.8875 & -15.2579861111111 & 2.97048611111111 \tabularnewline
56 & 89.1 & 88.8753472222222 & 94.6333333333333 & -5.75798611111111 & 0.224652777777763 \tabularnewline
57 & 104.5 & 103.051388888889 & 94.925 & 8.12638888888889 & 1.44861111111112 \tabularnewline
58 & 105.1 & 106.461805555556 & 95.5083333333333 & 10.9534722222222 & -1.36180555555556 \tabularnewline
59 & 95.1 & 97.3222222222222 & 95.9791666666667 & 1.34305555555556 & -2.22222222222223 \tabularnewline
60 & 88.7 & 89.1690972222222 & 96.5916666666666 & -7.42256944444444 & -0.469097222222189 \tabularnewline
61 & 86.3 & NA & 97.1166666666666 & NA & NA \tabularnewline
62 & 91.8 & NA & 97.5291666666667 & NA & NA \tabularnewline
63 & 111.5 & NA & NA & NA & NA \tabularnewline
64 & 99.7 & NA & NA & NA & NA \tabularnewline
65 & 97.5 & NA & NA & NA & NA \tabularnewline
66 & 111.7 & NA & NA & NA & NA \tabularnewline
67 & 86.2 & NA & NA & NA & NA \tabularnewline
68 & 95.4 & NA & NA & NA & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=102424&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]94.6[/C][C]NA[/C][C]NA[/C][C]-3.72673611111111[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]95.9[/C][C]NA[/C][C]NA[/C][C]-2.35069444444444[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]104.7[/C][C]NA[/C][C]NA[/C][C]6.60868055555556[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]102.8[/C][C]NA[/C][C]NA[/C][C]-0.542361111111103[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]98.1[/C][C]NA[/C][C]NA[/C][C]0.0836805555555561[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]113.9[/C][C]NA[/C][C]NA[/C][C]7.94305555555555[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]80.9[/C][C]86.3253472222222[/C][C]101.583333333333[/C][C]-15.2579861111111[/C][C]-5.42534722222219[/C][/ROW]
[ROW][C]8[/C][C]95.7[/C][C]96.2086805555555[/C][C]101.966666666667[/C][C]-5.75798611111111[/C][C]-0.508680555555543[/C][/ROW]
[ROW][C]9[/C][C]113.2[/C][C]110.743055555556[/C][C]102.616666666667[/C][C]8.12638888888889[/C][C]2.45694444444445[/C][/ROW]
[ROW][C]10[/C][C]105.9[/C][C]113.932638888889[/C][C]102.979166666667[/C][C]10.9534722222222[/C][C]-8.03263888888888[/C][/ROW]
[ROW][C]11[/C][C]108.8[/C][C]104.726388888889[/C][C]103.383333333333[/C][C]1.34305555555556[/C][C]4.07361111111109[/C][/ROW]
[ROW][C]12[/C][C]102.3[/C][C]96.4815972222222[/C][C]103.904166666667[/C][C]-7.42256944444444[/C][C]5.81840277777778[/C][/ROW]
[ROW][C]13[/C][C]99[/C][C]100.394097222222[/C][C]104.120833333333[/C][C]-3.72673611111111[/C][C]-1.39409722222221[/C][/ROW]
[ROW][C]14[/C][C]100.7[/C][C]102.157638888889[/C][C]104.508333333333[/C][C]-2.35069444444444[/C][C]-1.45763888888888[/C][/ROW]
[ROW][C]15[/C][C]115.5[/C][C]111.383680555556[/C][C]104.775[/C][C]6.60868055555556[/C][C]4.11631944444444[/C][/ROW]
[ROW][C]16[/C][C]100.7[/C][C]104.740972222222[/C][C]105.283333333333[/C][C]-0.542361111111103[/C][C]-4.04097222222219[/C][/ROW]
[ROW][C]17[/C][C]109.9[/C][C]105.979513888889[/C][C]105.895833333333[/C][C]0.0836805555555561[/C][C]3.92048611111113[/C][/ROW]
[ROW][C]18[/C][C]114.6[/C][C]113.997222222222[/C][C]106.054166666667[/C][C]7.94305555555555[/C][C]0.602777777777774[/C][/ROW]
[ROW][C]19[/C][C]85.4[/C][C]91.0753472222222[/C][C]106.333333333333[/C][C]-15.2579861111111[/C][C]-5.6753472222222[/C][/ROW]
[ROW][C]20[/C][C]100.5[/C][C]101.058680555556[/C][C]106.816666666667[/C][C]-5.75798611111111[/C][C]-0.558680555555526[/C][/ROW]
[ROW][C]21[/C][C]114.8[/C][C]115.272222222222[/C][C]107.145833333333[/C][C]8.12638888888889[/C][C]-0.4722222222222[/C][/ROW]
[ROW][C]22[/C][C]116.5[/C][C]118.461805555556[/C][C]107.508333333333[/C][C]10.9534722222222[/C][C]-1.96180555555554[/C][/ROW]
[ROW][C]23[/C][C]112.9[/C][C]109.051388888889[/C][C]107.708333333333[/C][C]1.34305555555556[/C][C]3.84861111111114[/C][/ROW]
[ROW][C]24[/C][C]102[/C][C]100.369097222222[/C][C]107.791666666667[/C][C]-7.42256944444444[/C][C]1.63090277777778[/C][/ROW]
[ROW][C]25[/C][C]106[/C][C]104.469097222222[/C][C]108.195833333333[/C][C]-3.72673611111111[/C][C]1.53090277777778[/C][/ROW]
[ROW][C]26[/C][C]105.3[/C][C]106.295138888889[/C][C]108.645833333333[/C][C]-2.35069444444444[/C][C]-0.995138888888874[/C][/ROW]
[ROW][C]27[/C][C]118.8[/C][C]115.312847222222[/C][C]108.704166666667[/C][C]6.60868055555556[/C][C]3.48715277777778[/C][/ROW]
[ROW][C]28[/C][C]106.1[/C][C]108.311805555556[/C][C]108.854166666667[/C][C]-0.542361111111103[/C][C]-2.21180555555556[/C][/ROW]
[ROW][C]29[/C][C]109.3[/C][C]109.200347222222[/C][C]109.116666666667[/C][C]0.0836805555555561[/C][C]0.099652777777763[/C][/ROW]
[ROW][C]30[/C][C]117.2[/C][C]116.993055555556[/C][C]109.05[/C][C]7.94305555555555[/C][C]0.20694444444446[/C][/ROW]
[ROW][C]31[/C][C]92.5[/C][C]93.9045138888889[/C][C]109.1625[/C][C]-15.2579861111111[/C][C]-1.40451388888889[/C][/ROW]
[ROW][C]32[/C][C]104.2[/C][C]103.912847222222[/C][C]109.670833333333[/C][C]-5.75798611111111[/C][C]0.287152777777777[/C][/ROW]
[ROW][C]33[/C][C]112.5[/C][C]117.734722222222[/C][C]109.608333333333[/C][C]8.12638888888889[/C][C]-5.23472222222222[/C][/ROW]
[ROW][C]34[/C][C]122.4[/C][C]120.653472222222[/C][C]109.7[/C][C]10.9534722222222[/C][C]1.7465277777778[/C][/ROW]
[ROW][C]35[/C][C]113.3[/C][C]111.501388888889[/C][C]110.158333333333[/C][C]1.34305555555556[/C][C]1.79861111111113[/C][/ROW]
[ROW][C]36[/C][C]100[/C][C]102.673263888889[/C][C]110.095833333333[/C][C]-7.42256944444444[/C][C]-2.67326388888890[/C][/ROW]
[ROW][C]37[/C][C]110.7[/C][C]106.460763888889[/C][C]110.1875[/C][C]-3.72673611111111[/C][C]4.23923611111111[/C][/ROW]
[ROW][C]38[/C][C]112.8[/C][C]107.799305555556[/C][C]110.15[/C][C]-2.35069444444444[/C][C]5.00069444444445[/C][/ROW]
[ROW][C]39[/C][C]109.8[/C][C]116.754513888889[/C][C]110.145833333333[/C][C]6.60868055555556[/C][C]-6.95451388888888[/C][/ROW]
[ROW][C]40[/C][C]117.3[/C][C]109.503472222222[/C][C]110.045833333333[/C][C]-0.542361111111103[/C][C]7.7965277777778[/C][/ROW]
[ROW][C]41[/C][C]109.1[/C][C]109.271180555556[/C][C]109.1875[/C][C]0.0836805555555561[/C][C]-0.171180555555551[/C][/ROW]
[ROW][C]42[/C][C]115.9[/C][C]116.313888888889[/C][C]108.370833333333[/C][C]7.94305555555555[/C][C]-0.413888888888891[/C][/ROW]
[ROW][C]43[/C][C]96[/C][C]92.0545138888889[/C][C]107.3125[/C][C]-15.2579861111111[/C][C]3.94548611111111[/C][/ROW]
[ROW][C]44[/C][C]99.8[/C][C]99.9170138888889[/C][C]105.675[/C][C]-5.75798611111111[/C][C]-0.117013888888891[/C][/ROW]
[ROW][C]45[/C][C]116.8[/C][C]112.705555555556[/C][C]104.579166666667[/C][C]8.12638888888889[/C][C]4.09444444444445[/C][/ROW]
[ROW][C]46[/C][C]115.7[/C][C]114.286805555556[/C][C]103.333333333333[/C][C]10.9534722222222[/C][C]1.41319444444446[/C][/ROW]
[ROW][C]47[/C][C]99.4[/C][C]102.988888888889[/C][C]101.645833333333[/C][C]1.34305555555556[/C][C]-3.58888888888887[/C][/ROW]
[ROW][C]48[/C][C]94.3[/C][C]92.9524305555556[/C][C]100.375[/C][C]-7.42256944444444[/C][C]1.34756944444445[/C][/ROW]
[ROW][C]49[/C][C]91[/C][C]95.5399305555556[/C][C]99.2666666666667[/C][C]-3.72673611111111[/C][C]-4.53993055555556[/C][/ROW]
[ROW][C]50[/C][C]93.2[/C][C]95.9118055555555[/C][C]98.2625[/C][C]-2.35069444444444[/C][C]-2.71180555555554[/C][/ROW]
[ROW][C]51[/C][C]103.1[/C][C]103.912847222222[/C][C]97.3041666666666[/C][C]6.60868055555556[/C][C]-0.812847222222217[/C][/ROW]
[ROW][C]52[/C][C]94.1[/C][C]95.8076388888889[/C][C]96.35[/C][C]-0.542361111111103[/C][C]-1.70763888888889[/C][/ROW]
[ROW][C]53[/C][C]91.8[/C][C]95.8128472222222[/C][C]95.7291666666667[/C][C]0.0836805555555561[/C][C]-4.01284722222222[/C][/ROW]
[ROW][C]54[/C][C]102.7[/C][C]103.259722222222[/C][C]95.3166666666666[/C][C]7.94305555555555[/C][C]-0.559722222222192[/C][/ROW]
[ROW][C]55[/C][C]82.6[/C][C]79.6295138888889[/C][C]94.8875[/C][C]-15.2579861111111[/C][C]2.97048611111111[/C][/ROW]
[ROW][C]56[/C][C]89.1[/C][C]88.8753472222222[/C][C]94.6333333333333[/C][C]-5.75798611111111[/C][C]0.224652777777763[/C][/ROW]
[ROW][C]57[/C][C]104.5[/C][C]103.051388888889[/C][C]94.925[/C][C]8.12638888888889[/C][C]1.44861111111112[/C][/ROW]
[ROW][C]58[/C][C]105.1[/C][C]106.461805555556[/C][C]95.5083333333333[/C][C]10.9534722222222[/C][C]-1.36180555555556[/C][/ROW]
[ROW][C]59[/C][C]95.1[/C][C]97.3222222222222[/C][C]95.9791666666667[/C][C]1.34305555555556[/C][C]-2.22222222222223[/C][/ROW]
[ROW][C]60[/C][C]88.7[/C][C]89.1690972222222[/C][C]96.5916666666666[/C][C]-7.42256944444444[/C][C]-0.469097222222189[/C][/ROW]
[ROW][C]61[/C][C]86.3[/C][C]NA[/C][C]97.1166666666666[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]62[/C][C]91.8[/C][C]NA[/C][C]97.5291666666667[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]63[/C][C]111.5[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]64[/C][C]99.7[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]65[/C][C]97.5[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]66[/C][C]111.7[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]67[/C][C]86.2[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]95.4[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=102424&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=102424&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	94.6	NA	NA	-3.72673611111111	NA
2	95.9	NA	NA	-2.35069444444444	NA
3	104.7	NA	NA	6.60868055555556	NA
4	102.8	NA	NA	-0.542361111111103	NA
5	98.1	NA	NA	0.0836805555555561	NA
6	113.9	NA	NA	7.94305555555555	NA
7	80.9	86.3253472222222	101.583333333333	-15.2579861111111	-5.42534722222219
8	95.7	96.2086805555555	101.966666666667	-5.75798611111111	-0.508680555555543
9	113.2	110.743055555556	102.616666666667	8.12638888888889	2.45694444444445
10	105.9	113.932638888889	102.979166666667	10.9534722222222	-8.03263888888888
11	108.8	104.726388888889	103.383333333333	1.34305555555556	4.07361111111109
12	102.3	96.4815972222222	103.904166666667	-7.42256944444444	5.81840277777778
13	99	100.394097222222	104.120833333333	-3.72673611111111	-1.39409722222221
14	100.7	102.157638888889	104.508333333333	-2.35069444444444	-1.45763888888888
15	115.5	111.383680555556	104.775	6.60868055555556	4.11631944444444
16	100.7	104.740972222222	105.283333333333	-0.542361111111103	-4.04097222222219
17	109.9	105.979513888889	105.895833333333	0.0836805555555561	3.92048611111113
18	114.6	113.997222222222	106.054166666667	7.94305555555555	0.602777777777774
19	85.4	91.0753472222222	106.333333333333	-15.2579861111111	-5.6753472222222
20	100.5	101.058680555556	106.816666666667	-5.75798611111111	-0.558680555555526
21	114.8	115.272222222222	107.145833333333	8.12638888888889	-0.4722222222222
22	116.5	118.461805555556	107.508333333333	10.9534722222222	-1.96180555555554
23	112.9	109.051388888889	107.708333333333	1.34305555555556	3.84861111111114
24	102	100.369097222222	107.791666666667	-7.42256944444444	1.63090277777778
25	106	104.469097222222	108.195833333333	-3.72673611111111	1.53090277777778
26	105.3	106.295138888889	108.645833333333	-2.35069444444444	-0.995138888888874
27	118.8	115.312847222222	108.704166666667	6.60868055555556	3.48715277777778
28	106.1	108.311805555556	108.854166666667	-0.542361111111103	-2.21180555555556
29	109.3	109.200347222222	109.116666666667	0.0836805555555561	0.099652777777763
30	117.2	116.993055555556	109.05	7.94305555555555	0.20694444444446
31	92.5	93.9045138888889	109.1625	-15.2579861111111	-1.40451388888889
32	104.2	103.912847222222	109.670833333333	-5.75798611111111	0.287152777777777
33	112.5	117.734722222222	109.608333333333	8.12638888888889	-5.23472222222222
34	122.4	120.653472222222	109.7	10.9534722222222	1.7465277777778
35	113.3	111.501388888889	110.158333333333	1.34305555555556	1.79861111111113
36	100	102.673263888889	110.095833333333	-7.42256944444444	-2.67326388888890
37	110.7	106.460763888889	110.1875	-3.72673611111111	4.23923611111111
38	112.8	107.799305555556	110.15	-2.35069444444444	5.00069444444445
39	109.8	116.754513888889	110.145833333333	6.60868055555556	-6.95451388888888
40	117.3	109.503472222222	110.045833333333	-0.542361111111103	7.7965277777778
41	109.1	109.271180555556	109.1875	0.0836805555555561	-0.171180555555551
42	115.9	116.313888888889	108.370833333333	7.94305555555555	-0.413888888888891
43	96	92.0545138888889	107.3125	-15.2579861111111	3.94548611111111
44	99.8	99.9170138888889	105.675	-5.75798611111111	-0.117013888888891
45	116.8	112.705555555556	104.579166666667	8.12638888888889	4.09444444444445
46	115.7	114.286805555556	103.333333333333	10.9534722222222	1.41319444444446
47	99.4	102.988888888889	101.645833333333	1.34305555555556	-3.58888888888887
48	94.3	92.9524305555556	100.375	-7.42256944444444	1.34756944444445
49	91	95.5399305555556	99.2666666666667	-3.72673611111111	-4.53993055555556
50	93.2	95.9118055555555	98.2625	-2.35069444444444	-2.71180555555554
51	103.1	103.912847222222	97.3041666666666	6.60868055555556	-0.812847222222217
52	94.1	95.8076388888889	96.35	-0.542361111111103	-1.70763888888889
53	91.8	95.8128472222222	95.7291666666667	0.0836805555555561	-4.01284722222222
54	102.7	103.259722222222	95.3166666666666	7.94305555555555	-0.559722222222192
55	82.6	79.6295138888889	94.8875	-15.2579861111111	2.97048611111111
56	89.1	88.8753472222222	94.6333333333333	-5.75798611111111	0.224652777777763
57	104.5	103.051388888889	94.925	8.12638888888889	1.44861111111112
58	105.1	106.461805555556	95.5083333333333	10.9534722222222	-1.36180555555556
59	95.1	97.3222222222222	95.9791666666667	1.34305555555556	-2.22222222222223
60	88.7	89.1690972222222	96.5916666666666	-7.42256944444444	-0.469097222222189
61	86.3	NA	97.1166666666666	NA	NA
62	91.8	NA	97.5291666666667	NA	NA
63	111.5	NA	NA	NA	NA
64	99.7	NA	NA	NA	NA
65	97.5	NA	NA	NA	NA
66	111.7	NA	NA	NA	NA
67	86.2	NA	NA	NA	NA
68	95.4	NA	NA	NA	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])
a<-table.element(a,m$trend[i]+m$seasonal[i])
a<-table.element(a,m$trend[i])
a<-table.element(a,m$seasonal[i])
a<-table.element(a,m$random[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