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

Mon, 03 Dec 2012 06:10:20 -0500

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/2012/Dec/03/t1354533072r6ehdoyi301frl8.htm/, Retrieved Tue, 28 Jul 2026 18:30:47 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=195703, Retrieved Tue, 28 Jul 2026 18:30:47 +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

318

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

-       [Classical Decomposition] [opdracht 9] [2012-12-03 11:10:20] [d41d8cd98f00b204e9800998ecf8427e] [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	4 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 & 4 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=195703&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]4 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=195703&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	99.42	NA	NA	-2.88984722222222	NA
2	99.42	NA	NA	-2.92768055555556	NA
3	99.42	NA	NA	-3.14559722222222	NA
4	99.42	NA	NA	-2.9035138888889	NA
5	99.42	NA	NA	-2.69551388888889	NA
6	109.26	NA	NA	3.60131944444444	NA
7	110	110.310569444444	103.010416666667	7.30015277777778	-0.310569444444425
8	110	110.166736111111	103.062916666667	7.10381944444445	-0.166736111111092
9	109.26	106.890986111111	103.115416666667	3.77556944444444	2.3690138888889
10	100.07	101.239236111111	103.167916666667	-1.92868055555555	-1.16923611111112
11	100.07	100.756902777778	103.220416666667	-2.46351388888888	-0.686902777777789
12	100.05	100.399736111111	103.22625	-2.82651388888888	-0.349736111111113
13	100.05	100.370986111111	103.260833333333	-2.88984722222222	-0.320986111111125
14	100.05	100.454819444444	103.3825	-2.92768055555556	-0.404819444444456
15	100.05	100.272736111111	103.418333333333	-3.14559722222222	-0.222736111111132
16	100.05	100.611486111111	103.515	-2.9035138888889	-0.561486111111137
17	100.05	101.063652777778	103.759166666667	-2.69551388888889	-1.01365277777779
18	108.77	107.589652777778	103.988333333333	3.60131944444444	1.1803472222222
19	111.32	111.513486111111	104.213333333333	7.30015277777778	-0.193486111111142
20	111.6	111.542152777778	104.438333333333	7.10381944444445	0.0578472222222075
21	108.52	108.438902777778	104.663333333333	3.77556944444444	0.0810972222222119
22	103.13	102.959652777778	104.888333333333	-1.92868055555555	0.170347222222205
23	102.87	102.649819444444	105.113333333333	-2.46351388888888	0.220180555555558
24	102.75	102.668069444444	105.494583333333	-2.82651388888888	0.0819305555555445
25	102.75	103.048902777778	105.93875	-2.88984722222222	-0.298902777777784
26	102.75	103.344819444444	106.2725	-2.92768055555556	-0.594819444444454
27	102.75	103.429819444444	106.575416666667	-3.14559722222222	-0.679819444444433
28	102.75	104.016486111111	106.92	-2.9035138888889	-1.26648611111111
29	102.75	104.614486111111	107.31	-2.69551388888889	-1.86448611111109
30	115.22	111.277569444444	107.67625	3.60131944444444	3.94243055555556
31	115.53	115.328902777778	108.02875	7.30015277777778	0.201097222222231
32	115.4	115.485069444444	108.38125	7.10381944444445	-0.0850694444444287
33	111.99	112.509319444444	108.73375	3.77556944444444	-0.51931944444442
34	107.93	107.157569444444	109.08625	-1.92868055555555	0.772430555555573
35	107.43	106.975236111111	109.43875	-2.46351388888888	0.454763888888905
36	106.98	106.725569444444	109.552083333333	-2.82651388888888	0.254430555555572
37	106.98	106.734319444444	109.624166666667	-2.88984722222222	0.245680555555552
38	106.98	106.962319444444	109.89	-2.92768055555556	0.0176805555555433
39	106.98	107.048986111111	110.194583333333	-3.14559722222222	-0.0689861111111298
40	106.98	107.572736111111	110.47625	-2.9035138888889	-0.592736111111122
41	106.98	107.998236111111	110.69375	-2.69551388888889	-1.01823611111112
42	113.71	114.526319444444	110.925	3.60131944444444	-0.816319444444474
43	118.77	118.468486111111	111.168333333333	7.30015277777778	0.301513888888863
44	118.54	118.549652777778	111.445833333333	7.10381944444445	-0.00965277777777374
45	116.16	115.506819444444	111.73125	3.77556944444444	0.653180555555551
46	110.52	110.060902777778	111.989583333333	-1.92868055555555	0.459097222222226
47	110.06	109.882736111111	112.34625	-2.46351388888888	0.177263888888916
48	109.9	109.720569444444	112.547083333333	-2.82651388888888	0.179430555555584
49	109.9	109.674319444444	112.564166666667	-2.88984722222222	0.22568055555557
50	110.72	109.734819444444	112.6625	-2.92768055555556	0.985180555555573
51	110.09	109.469819444444	112.615416666667	-3.14559722222222	0.620180555555578
52	110.07	109.609819444444	112.513333333333	-2.9035138888889	0.460180555555567
53	112.45	109.819486111111	112.515	-2.69551388888889	2.63051388888893
54	113.06	116.117152777778	112.515833333333	3.60131944444444	-3.05715277777776
55	119.83	119.833486111111	112.533333333333	7.30015277777778	-0.00348611111110131
56	119.84	119.641319444444	112.5375	7.10381944444445	0.198680555555569
57	113.73	116.318902777778	112.543333333333	3.77556944444444	-2.58890277777779
58	110.5	110.737569444444	112.66625	-1.92868055555555	-0.23756944444446
59	110.12	110.290236111111	112.75375	-2.46351388888888	-0.170236111111123
60	109.86	110.030986111111	112.8575	-2.82651388888888	-0.170986111111105
61	110.36	110.216402777778	113.10625	-2.88984722222222	0.143597222222212
62	110.36	110.368152777778	113.295833333333	-2.92768055555556	-0.00815277777778078
63	110.59	110.243569444444	113.389166666667	-3.14559722222222	0.346430555555557
64	112.52	110.564402777778	113.467916666667	-2.9035138888889	1.95559722222222
65	112.1	110.839069444444	113.534583333333	-2.69551388888889	1.26093055555555
66	115.9	117.154236111111	113.552916666667	3.60131944444444	-1.2542361111111
67	122.96	NA	NA	7.30015277777778	NA
68	121.26	NA	NA	7.10381944444445	NA
69	114.55	NA	NA	3.77556944444444	NA
70	111.57	NA	NA	-1.92868055555555	NA
71	110.65	NA	NA	-2.46351388888888	NA
72	109.77	NA	NA	-2.82651388888888	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 99.42 & NA & NA & -2.88984722222222 & NA \tabularnewline
2 & 99.42 & NA & NA & -2.92768055555556 & NA \tabularnewline
3 & 99.42 & NA & NA & -3.14559722222222 & NA \tabularnewline
4 & 99.42 & NA & NA & -2.9035138888889 & NA \tabularnewline
5 & 99.42 & NA & NA & -2.69551388888889 & NA \tabularnewline
6 & 109.26 & NA & NA & 3.60131944444444 & NA \tabularnewline
7 & 110 & 110.310569444444 & 103.010416666667 & 7.30015277777778 & -0.310569444444425 \tabularnewline
8 & 110 & 110.166736111111 & 103.062916666667 & 7.10381944444445 & -0.166736111111092 \tabularnewline
9 & 109.26 & 106.890986111111 & 103.115416666667 & 3.77556944444444 & 2.3690138888889 \tabularnewline
10 & 100.07 & 101.239236111111 & 103.167916666667 & -1.92868055555555 & -1.16923611111112 \tabularnewline
11 & 100.07 & 100.756902777778 & 103.220416666667 & -2.46351388888888 & -0.686902777777789 \tabularnewline
12 & 100.05 & 100.399736111111 & 103.22625 & -2.82651388888888 & -0.349736111111113 \tabularnewline
13 & 100.05 & 100.370986111111 & 103.260833333333 & -2.88984722222222 & -0.320986111111125 \tabularnewline
14 & 100.05 & 100.454819444444 & 103.3825 & -2.92768055555556 & -0.404819444444456 \tabularnewline
15 & 100.05 & 100.272736111111 & 103.418333333333 & -3.14559722222222 & -0.222736111111132 \tabularnewline
16 & 100.05 & 100.611486111111 & 103.515 & -2.9035138888889 & -0.561486111111137 \tabularnewline
17 & 100.05 & 101.063652777778 & 103.759166666667 & -2.69551388888889 & -1.01365277777779 \tabularnewline
18 & 108.77 & 107.589652777778 & 103.988333333333 & 3.60131944444444 & 1.1803472222222 \tabularnewline
19 & 111.32 & 111.513486111111 & 104.213333333333 & 7.30015277777778 & -0.193486111111142 \tabularnewline
20 & 111.6 & 111.542152777778 & 104.438333333333 & 7.10381944444445 & 0.0578472222222075 \tabularnewline
21 & 108.52 & 108.438902777778 & 104.663333333333 & 3.77556944444444 & 0.0810972222222119 \tabularnewline
22 & 103.13 & 102.959652777778 & 104.888333333333 & -1.92868055555555 & 0.170347222222205 \tabularnewline
23 & 102.87 & 102.649819444444 & 105.113333333333 & -2.46351388888888 & 0.220180555555558 \tabularnewline
24 & 102.75 & 102.668069444444 & 105.494583333333 & -2.82651388888888 & 0.0819305555555445 \tabularnewline
25 & 102.75 & 103.048902777778 & 105.93875 & -2.88984722222222 & -0.298902777777784 \tabularnewline
26 & 102.75 & 103.344819444444 & 106.2725 & -2.92768055555556 & -0.594819444444454 \tabularnewline
27 & 102.75 & 103.429819444444 & 106.575416666667 & -3.14559722222222 & -0.679819444444433 \tabularnewline
28 & 102.75 & 104.016486111111 & 106.92 & -2.9035138888889 & -1.26648611111111 \tabularnewline
29 & 102.75 & 104.614486111111 & 107.31 & -2.69551388888889 & -1.86448611111109 \tabularnewline
30 & 115.22 & 111.277569444444 & 107.67625 & 3.60131944444444 & 3.94243055555556 \tabularnewline
31 & 115.53 & 115.328902777778 & 108.02875 & 7.30015277777778 & 0.201097222222231 \tabularnewline
32 & 115.4 & 115.485069444444 & 108.38125 & 7.10381944444445 & -0.0850694444444287 \tabularnewline
33 & 111.99 & 112.509319444444 & 108.73375 & 3.77556944444444 & -0.51931944444442 \tabularnewline
34 & 107.93 & 107.157569444444 & 109.08625 & -1.92868055555555 & 0.772430555555573 \tabularnewline
35 & 107.43 & 106.975236111111 & 109.43875 & -2.46351388888888 & 0.454763888888905 \tabularnewline
36 & 106.98 & 106.725569444444 & 109.552083333333 & -2.82651388888888 & 0.254430555555572 \tabularnewline
37 & 106.98 & 106.734319444444 & 109.624166666667 & -2.88984722222222 & 0.245680555555552 \tabularnewline
38 & 106.98 & 106.962319444444 & 109.89 & -2.92768055555556 & 0.0176805555555433 \tabularnewline
39 & 106.98 & 107.048986111111 & 110.194583333333 & -3.14559722222222 & -0.0689861111111298 \tabularnewline
40 & 106.98 & 107.572736111111 & 110.47625 & -2.9035138888889 & -0.592736111111122 \tabularnewline
41 & 106.98 & 107.998236111111 & 110.69375 & -2.69551388888889 & -1.01823611111112 \tabularnewline
42 & 113.71 & 114.526319444444 & 110.925 & 3.60131944444444 & -0.816319444444474 \tabularnewline
43 & 118.77 & 118.468486111111 & 111.168333333333 & 7.30015277777778 & 0.301513888888863 \tabularnewline
44 & 118.54 & 118.549652777778 & 111.445833333333 & 7.10381944444445 & -0.00965277777777374 \tabularnewline
45 & 116.16 & 115.506819444444 & 111.73125 & 3.77556944444444 & 0.653180555555551 \tabularnewline
46 & 110.52 & 110.060902777778 & 111.989583333333 & -1.92868055555555 & 0.459097222222226 \tabularnewline
47 & 110.06 & 109.882736111111 & 112.34625 & -2.46351388888888 & 0.177263888888916 \tabularnewline
48 & 109.9 & 109.720569444444 & 112.547083333333 & -2.82651388888888 & 0.179430555555584 \tabularnewline
49 & 109.9 & 109.674319444444 & 112.564166666667 & -2.88984722222222 & 0.22568055555557 \tabularnewline
50 & 110.72 & 109.734819444444 & 112.6625 & -2.92768055555556 & 0.985180555555573 \tabularnewline
51 & 110.09 & 109.469819444444 & 112.615416666667 & -3.14559722222222 & 0.620180555555578 \tabularnewline
52 & 110.07 & 109.609819444444 & 112.513333333333 & -2.9035138888889 & 0.460180555555567 \tabularnewline
53 & 112.45 & 109.819486111111 & 112.515 & -2.69551388888889 & 2.63051388888893 \tabularnewline
54 & 113.06 & 116.117152777778 & 112.515833333333 & 3.60131944444444 & -3.05715277777776 \tabularnewline
55 & 119.83 & 119.833486111111 & 112.533333333333 & 7.30015277777778 & -0.00348611111110131 \tabularnewline
56 & 119.84 & 119.641319444444 & 112.5375 & 7.10381944444445 & 0.198680555555569 \tabularnewline
57 & 113.73 & 116.318902777778 & 112.543333333333 & 3.77556944444444 & -2.58890277777779 \tabularnewline
58 & 110.5 & 110.737569444444 & 112.66625 & -1.92868055555555 & -0.23756944444446 \tabularnewline
59 & 110.12 & 110.290236111111 & 112.75375 & -2.46351388888888 & -0.170236111111123 \tabularnewline
60 & 109.86 & 110.030986111111 & 112.8575 & -2.82651388888888 & -0.170986111111105 \tabularnewline
61 & 110.36 & 110.216402777778 & 113.10625 & -2.88984722222222 & 0.143597222222212 \tabularnewline
62 & 110.36 & 110.368152777778 & 113.295833333333 & -2.92768055555556 & -0.00815277777778078 \tabularnewline
63 & 110.59 & 110.243569444444 & 113.389166666667 & -3.14559722222222 & 0.346430555555557 \tabularnewline
64 & 112.52 & 110.564402777778 & 113.467916666667 & -2.9035138888889 & 1.95559722222222 \tabularnewline
65 & 112.1 & 110.839069444444 & 113.534583333333 & -2.69551388888889 & 1.26093055555555 \tabularnewline
66 & 115.9 & 117.154236111111 & 113.552916666667 & 3.60131944444444 & -1.2542361111111 \tabularnewline
67 & 122.96 & NA & NA & 7.30015277777778 & NA \tabularnewline
68 & 121.26 & NA & NA & 7.10381944444445 & NA \tabularnewline
69 & 114.55 & NA & NA & 3.77556944444444 & NA \tabularnewline
70 & 111.57 & NA & NA & -1.92868055555555 & NA \tabularnewline
71 & 110.65 & NA & NA & -2.46351388888888 & NA \tabularnewline
72 & 109.77 & NA & NA & -2.82651388888888 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=195703&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]99.42[/C][C]NA[/C][C]NA[/C][C]-2.88984722222222[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]99.42[/C][C]NA[/C][C]NA[/C][C]-2.92768055555556[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]99.42[/C][C]NA[/C][C]NA[/C][C]-3.14559722222222[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]99.42[/C][C]NA[/C][C]NA[/C][C]-2.9035138888889[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]99.42[/C][C]NA[/C][C]NA[/C][C]-2.69551388888889[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]109.26[/C][C]NA[/C][C]NA[/C][C]3.60131944444444[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]110[/C][C]110.310569444444[/C][C]103.010416666667[/C][C]7.30015277777778[/C][C]-0.310569444444425[/C][/ROW]
[ROW][C]8[/C][C]110[/C][C]110.166736111111[/C][C]103.062916666667[/C][C]7.10381944444445[/C][C]-0.166736111111092[/C][/ROW]
[ROW][C]9[/C][C]109.26[/C][C]106.890986111111[/C][C]103.115416666667[/C][C]3.77556944444444[/C][C]2.3690138888889[/C][/ROW]
[ROW][C]10[/C][C]100.07[/C][C]101.239236111111[/C][C]103.167916666667[/C][C]-1.92868055555555[/C][C]-1.16923611111112[/C][/ROW]
[ROW][C]11[/C][C]100.07[/C][C]100.756902777778[/C][C]103.220416666667[/C][C]-2.46351388888888[/C][C]-0.686902777777789[/C][/ROW]
[ROW][C]12[/C][C]100.05[/C][C]100.399736111111[/C][C]103.22625[/C][C]-2.82651388888888[/C][C]-0.349736111111113[/C][/ROW]
[ROW][C]13[/C][C]100.05[/C][C]100.370986111111[/C][C]103.260833333333[/C][C]-2.88984722222222[/C][C]-0.320986111111125[/C][/ROW]
[ROW][C]14[/C][C]100.05[/C][C]100.454819444444[/C][C]103.3825[/C][C]-2.92768055555556[/C][C]-0.404819444444456[/C][/ROW]
[ROW][C]15[/C][C]100.05[/C][C]100.272736111111[/C][C]103.418333333333[/C][C]-3.14559722222222[/C][C]-0.222736111111132[/C][/ROW]
[ROW][C]16[/C][C]100.05[/C][C]100.611486111111[/C][C]103.515[/C][C]-2.9035138888889[/C][C]-0.561486111111137[/C][/ROW]
[ROW][C]17[/C][C]100.05[/C][C]101.063652777778[/C][C]103.759166666667[/C][C]-2.69551388888889[/C][C]-1.01365277777779[/C][/ROW]
[ROW][C]18[/C][C]108.77[/C][C]107.589652777778[/C][C]103.988333333333[/C][C]3.60131944444444[/C][C]1.1803472222222[/C][/ROW]
[ROW][C]19[/C][C]111.32[/C][C]111.513486111111[/C][C]104.213333333333[/C][C]7.30015277777778[/C][C]-0.193486111111142[/C][/ROW]
[ROW][C]20[/C][C]111.6[/C][C]111.542152777778[/C][C]104.438333333333[/C][C]7.10381944444445[/C][C]0.0578472222222075[/C][/ROW]
[ROW][C]21[/C][C]108.52[/C][C]108.438902777778[/C][C]104.663333333333[/C][C]3.77556944444444[/C][C]0.0810972222222119[/C][/ROW]
[ROW][C]22[/C][C]103.13[/C][C]102.959652777778[/C][C]104.888333333333[/C][C]-1.92868055555555[/C][C]0.170347222222205[/C][/ROW]
[ROW][C]23[/C][C]102.87[/C][C]102.649819444444[/C][C]105.113333333333[/C][C]-2.46351388888888[/C][C]0.220180555555558[/C][/ROW]
[ROW][C]24[/C][C]102.75[/C][C]102.668069444444[/C][C]105.494583333333[/C][C]-2.82651388888888[/C][C]0.0819305555555445[/C][/ROW]
[ROW][C]25[/C][C]102.75[/C][C]103.048902777778[/C][C]105.93875[/C][C]-2.88984722222222[/C][C]-0.298902777777784[/C][/ROW]
[ROW][C]26[/C][C]102.75[/C][C]103.344819444444[/C][C]106.2725[/C][C]-2.92768055555556[/C][C]-0.594819444444454[/C][/ROW]
[ROW][C]27[/C][C]102.75[/C][C]103.429819444444[/C][C]106.575416666667[/C][C]-3.14559722222222[/C][C]-0.679819444444433[/C][/ROW]
[ROW][C]28[/C][C]102.75[/C][C]104.016486111111[/C][C]106.92[/C][C]-2.9035138888889[/C][C]-1.26648611111111[/C][/ROW]
[ROW][C]29[/C][C]102.75[/C][C]104.614486111111[/C][C]107.31[/C][C]-2.69551388888889[/C][C]-1.86448611111109[/C][/ROW]
[ROW][C]30[/C][C]115.22[/C][C]111.277569444444[/C][C]107.67625[/C][C]3.60131944444444[/C][C]3.94243055555556[/C][/ROW]
[ROW][C]31[/C][C]115.53[/C][C]115.328902777778[/C][C]108.02875[/C][C]7.30015277777778[/C][C]0.201097222222231[/C][/ROW]
[ROW][C]32[/C][C]115.4[/C][C]115.485069444444[/C][C]108.38125[/C][C]7.10381944444445[/C][C]-0.0850694444444287[/C][/ROW]
[ROW][C]33[/C][C]111.99[/C][C]112.509319444444[/C][C]108.73375[/C][C]3.77556944444444[/C][C]-0.51931944444442[/C][/ROW]
[ROW][C]34[/C][C]107.93[/C][C]107.157569444444[/C][C]109.08625[/C][C]-1.92868055555555[/C][C]0.772430555555573[/C][/ROW]
[ROW][C]35[/C][C]107.43[/C][C]106.975236111111[/C][C]109.43875[/C][C]-2.46351388888888[/C][C]0.454763888888905[/C][/ROW]
[ROW][C]36[/C][C]106.98[/C][C]106.725569444444[/C][C]109.552083333333[/C][C]-2.82651388888888[/C][C]0.254430555555572[/C][/ROW]
[ROW][C]37[/C][C]106.98[/C][C]106.734319444444[/C][C]109.624166666667[/C][C]-2.88984722222222[/C][C]0.245680555555552[/C][/ROW]
[ROW][C]38[/C][C]106.98[/C][C]106.962319444444[/C][C]109.89[/C][C]-2.92768055555556[/C][C]0.0176805555555433[/C][/ROW]
[ROW][C]39[/C][C]106.98[/C][C]107.048986111111[/C][C]110.194583333333[/C][C]-3.14559722222222[/C][C]-0.0689861111111298[/C][/ROW]
[ROW][C]40[/C][C]106.98[/C][C]107.572736111111[/C][C]110.47625[/C][C]-2.9035138888889[/C][C]-0.592736111111122[/C][/ROW]
[ROW][C]41[/C][C]106.98[/C][C]107.998236111111[/C][C]110.69375[/C][C]-2.69551388888889[/C][C]-1.01823611111112[/C][/ROW]
[ROW][C]42[/C][C]113.71[/C][C]114.526319444444[/C][C]110.925[/C][C]3.60131944444444[/C][C]-0.816319444444474[/C][/ROW]
[ROW][C]43[/C][C]118.77[/C][C]118.468486111111[/C][C]111.168333333333[/C][C]7.30015277777778[/C][C]0.301513888888863[/C][/ROW]
[ROW][C]44[/C][C]118.54[/C][C]118.549652777778[/C][C]111.445833333333[/C][C]7.10381944444445[/C][C]-0.00965277777777374[/C][/ROW]
[ROW][C]45[/C][C]116.16[/C][C]115.506819444444[/C][C]111.73125[/C][C]3.77556944444444[/C][C]0.653180555555551[/C][/ROW]
[ROW][C]46[/C][C]110.52[/C][C]110.060902777778[/C][C]111.989583333333[/C][C]-1.92868055555555[/C][C]0.459097222222226[/C][/ROW]
[ROW][C]47[/C][C]110.06[/C][C]109.882736111111[/C][C]112.34625[/C][C]-2.46351388888888[/C][C]0.177263888888916[/C][/ROW]
[ROW][C]48[/C][C]109.9[/C][C]109.720569444444[/C][C]112.547083333333[/C][C]-2.82651388888888[/C][C]0.179430555555584[/C][/ROW]
[ROW][C]49[/C][C]109.9[/C][C]109.674319444444[/C][C]112.564166666667[/C][C]-2.88984722222222[/C][C]0.22568055555557[/C][/ROW]
[ROW][C]50[/C][C]110.72[/C][C]109.734819444444[/C][C]112.6625[/C][C]-2.92768055555556[/C][C]0.985180555555573[/C][/ROW]
[ROW][C]51[/C][C]110.09[/C][C]109.469819444444[/C][C]112.615416666667[/C][C]-3.14559722222222[/C][C]0.620180555555578[/C][/ROW]
[ROW][C]52[/C][C]110.07[/C][C]109.609819444444[/C][C]112.513333333333[/C][C]-2.9035138888889[/C][C]0.460180555555567[/C][/ROW]
[ROW][C]53[/C][C]112.45[/C][C]109.819486111111[/C][C]112.515[/C][C]-2.69551388888889[/C][C]2.63051388888893[/C][/ROW]
[ROW][C]54[/C][C]113.06[/C][C]116.117152777778[/C][C]112.515833333333[/C][C]3.60131944444444[/C][C]-3.05715277777776[/C][/ROW]
[ROW][C]55[/C][C]119.83[/C][C]119.833486111111[/C][C]112.533333333333[/C][C]7.30015277777778[/C][C]-0.00348611111110131[/C][/ROW]
[ROW][C]56[/C][C]119.84[/C][C]119.641319444444[/C][C]112.5375[/C][C]7.10381944444445[/C][C]0.198680555555569[/C][/ROW]
[ROW][C]57[/C][C]113.73[/C][C]116.318902777778[/C][C]112.543333333333[/C][C]3.77556944444444[/C][C]-2.58890277777779[/C][/ROW]
[ROW][C]58[/C][C]110.5[/C][C]110.737569444444[/C][C]112.66625[/C][C]-1.92868055555555[/C][C]-0.23756944444446[/C][/ROW]
[ROW][C]59[/C][C]110.12[/C][C]110.290236111111[/C][C]112.75375[/C][C]-2.46351388888888[/C][C]-0.170236111111123[/C][/ROW]
[ROW][C]60[/C][C]109.86[/C][C]110.030986111111[/C][C]112.8575[/C][C]-2.82651388888888[/C][C]-0.170986111111105[/C][/ROW]
[ROW][C]61[/C][C]110.36[/C][C]110.216402777778[/C][C]113.10625[/C][C]-2.88984722222222[/C][C]0.143597222222212[/C][/ROW]
[ROW][C]62[/C][C]110.36[/C][C]110.368152777778[/C][C]113.295833333333[/C][C]-2.92768055555556[/C][C]-0.00815277777778078[/C][/ROW]
[ROW][C]63[/C][C]110.59[/C][C]110.243569444444[/C][C]113.389166666667[/C][C]-3.14559722222222[/C][C]0.346430555555557[/C][/ROW]
[ROW][C]64[/C][C]112.52[/C][C]110.564402777778[/C][C]113.467916666667[/C][C]-2.9035138888889[/C][C]1.95559722222222[/C][/ROW]
[ROW][C]65[/C][C]112.1[/C][C]110.839069444444[/C][C]113.534583333333[/C][C]-2.69551388888889[/C][C]1.26093055555555[/C][/ROW]
[ROW][C]66[/C][C]115.9[/C][C]117.154236111111[/C][C]113.552916666667[/C][C]3.60131944444444[/C][C]-1.2542361111111[/C][/ROW]
[ROW][C]67[/C][C]122.96[/C][C]NA[/C][C]NA[/C][C]7.30015277777778[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]121.26[/C][C]NA[/C][C]NA[/C][C]7.10381944444445[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]114.55[/C][C]NA[/C][C]NA[/C][C]3.77556944444444[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]111.57[/C][C]NA[/C][C]NA[/C][C]-1.92868055555555[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]110.65[/C][C]NA[/C][C]NA[/C][C]-2.46351388888888[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]109.77[/C][C]NA[/C][C]NA[/C][C]-2.82651388888888[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=195703&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=195703&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	99.42	NA	NA	-2.88984722222222	NA
2	99.42	NA	NA	-2.92768055555556	NA
3	99.42	NA	NA	-3.14559722222222	NA
4	99.42	NA	NA	-2.9035138888889	NA
5	99.42	NA	NA	-2.69551388888889	NA
6	109.26	NA	NA	3.60131944444444	NA
7	110	110.310569444444	103.010416666667	7.30015277777778	-0.310569444444425
8	110	110.166736111111	103.062916666667	7.10381944444445	-0.166736111111092
9	109.26	106.890986111111	103.115416666667	3.77556944444444	2.3690138888889
10	100.07	101.239236111111	103.167916666667	-1.92868055555555	-1.16923611111112
11	100.07	100.756902777778	103.220416666667	-2.46351388888888	-0.686902777777789
12	100.05	100.399736111111	103.22625	-2.82651388888888	-0.349736111111113
13	100.05	100.370986111111	103.260833333333	-2.88984722222222	-0.320986111111125
14	100.05	100.454819444444	103.3825	-2.92768055555556	-0.404819444444456
15	100.05	100.272736111111	103.418333333333	-3.14559722222222	-0.222736111111132
16	100.05	100.611486111111	103.515	-2.9035138888889	-0.561486111111137
17	100.05	101.063652777778	103.759166666667	-2.69551388888889	-1.01365277777779
18	108.77	107.589652777778	103.988333333333	3.60131944444444	1.1803472222222
19	111.32	111.513486111111	104.213333333333	7.30015277777778	-0.193486111111142
20	111.6	111.542152777778	104.438333333333	7.10381944444445	0.0578472222222075
21	108.52	108.438902777778	104.663333333333	3.77556944444444	0.0810972222222119
22	103.13	102.959652777778	104.888333333333	-1.92868055555555	0.170347222222205
23	102.87	102.649819444444	105.113333333333	-2.46351388888888	0.220180555555558
24	102.75	102.668069444444	105.494583333333	-2.82651388888888	0.0819305555555445
25	102.75	103.048902777778	105.93875	-2.88984722222222	-0.298902777777784
26	102.75	103.344819444444	106.2725	-2.92768055555556	-0.594819444444454
27	102.75	103.429819444444	106.575416666667	-3.14559722222222	-0.679819444444433
28	102.75	104.016486111111	106.92	-2.9035138888889	-1.26648611111111
29	102.75	104.614486111111	107.31	-2.69551388888889	-1.86448611111109
30	115.22	111.277569444444	107.67625	3.60131944444444	3.94243055555556
31	115.53	115.328902777778	108.02875	7.30015277777778	0.201097222222231
32	115.4	115.485069444444	108.38125	7.10381944444445	-0.0850694444444287
33	111.99	112.509319444444	108.73375	3.77556944444444	-0.51931944444442
34	107.93	107.157569444444	109.08625	-1.92868055555555	0.772430555555573
35	107.43	106.975236111111	109.43875	-2.46351388888888	0.454763888888905
36	106.98	106.725569444444	109.552083333333	-2.82651388888888	0.254430555555572
37	106.98	106.734319444444	109.624166666667	-2.88984722222222	0.245680555555552
38	106.98	106.962319444444	109.89	-2.92768055555556	0.0176805555555433
39	106.98	107.048986111111	110.194583333333	-3.14559722222222	-0.0689861111111298
40	106.98	107.572736111111	110.47625	-2.9035138888889	-0.592736111111122
41	106.98	107.998236111111	110.69375	-2.69551388888889	-1.01823611111112
42	113.71	114.526319444444	110.925	3.60131944444444	-0.816319444444474
43	118.77	118.468486111111	111.168333333333	7.30015277777778	0.301513888888863
44	118.54	118.549652777778	111.445833333333	7.10381944444445	-0.00965277777777374
45	116.16	115.506819444444	111.73125	3.77556944444444	0.653180555555551
46	110.52	110.060902777778	111.989583333333	-1.92868055555555	0.459097222222226
47	110.06	109.882736111111	112.34625	-2.46351388888888	0.177263888888916
48	109.9	109.720569444444	112.547083333333	-2.82651388888888	0.179430555555584
49	109.9	109.674319444444	112.564166666667	-2.88984722222222	0.22568055555557
50	110.72	109.734819444444	112.6625	-2.92768055555556	0.985180555555573
51	110.09	109.469819444444	112.615416666667	-3.14559722222222	0.620180555555578
52	110.07	109.609819444444	112.513333333333	-2.9035138888889	0.460180555555567
53	112.45	109.819486111111	112.515	-2.69551388888889	2.63051388888893
54	113.06	116.117152777778	112.515833333333	3.60131944444444	-3.05715277777776
55	119.83	119.833486111111	112.533333333333	7.30015277777778	-0.00348611111110131
56	119.84	119.641319444444	112.5375	7.10381944444445	0.198680555555569
57	113.73	116.318902777778	112.543333333333	3.77556944444444	-2.58890277777779
58	110.5	110.737569444444	112.66625	-1.92868055555555	-0.23756944444446
59	110.12	110.290236111111	112.75375	-2.46351388888888	-0.170236111111123
60	109.86	110.030986111111	112.8575	-2.82651388888888	-0.170986111111105
61	110.36	110.216402777778	113.10625	-2.88984722222222	0.143597222222212
62	110.36	110.368152777778	113.295833333333	-2.92768055555556	-0.00815277777778078
63	110.59	110.243569444444	113.389166666667	-3.14559722222222	0.346430555555557
64	112.52	110.564402777778	113.467916666667	-2.9035138888889	1.95559722222222
65	112.1	110.839069444444	113.534583333333	-2.69551388888889	1.26093055555555
66	115.9	117.154236111111	113.552916666667	3.60131944444444	-1.2542361111111
67	122.96	NA	NA	7.30015277777778	NA
68	121.26	NA	NA	7.10381944444445	NA
69	114.55	NA	NA	3.77556944444444	NA
70	111.57	NA	NA	-1.92868055555555	NA
71	110.65	NA	NA	-2.46351388888888	NA
72	109.77	NA	NA	-2.82651388888888	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,m$trend[i]+m$seasonal[i]) else 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