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

Wed, 15 Dec 2010 19:20:11 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/15/t1292440691kmymzlh6kwz805o.htm/, Retrieved Fri, 03 May 2024 07:42:01 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=110676, Retrieved Fri, 03 May 2024 07:42:01 +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

135

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

-       [Classical Decomposition] [] [2010-12-15 19:20:11] [1d094c42a82a95b45a19e32ad4bfff5f] [Current]
-    D    [Classical Decomposition] [paper trend depos...] [2010-12-25 22:53:53] [eeb33d252044f8583501f5ba0605ad6d] 
-    D      [Classical Decomposition] [paper trend depos...] [2010-12-25 23:00:31] [eeb33d252044f8583501f5ba0605ad6d] 
-    D      [Classical Decomposition] [paper trend dow j...] [2010-12-25 23:02:54] [eeb33d252044f8583501f5ba0605ad6d] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	3 seconds
R Server	'Gwilym Jenkins' @ 72.249.127.135

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 3 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=110676&T=0

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

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

As an alternative you can also use a QR Code:

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

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	3 seconds
R Server	'Gwilym Jenkins' @ 72.249.127.135

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	130	NA	NA	-2.95659722222222	NA
2	127	NA	NA	-5.56076388888889	NA
3	122	NA	NA	-9.87326388888889	NA
4	117	NA	NA	-11.6545138888889	NA
5	112	NA	NA	-17.9670138888889	NA
6	113	NA	NA	-16.1545138888889	NA
7	149	147.126736111111	133.125	14.0017361111111	1.87326388888889
8	157	151.595486111111	132.75	18.8454861111111	5.40451388888889
9	157	151.053819444444	132.375	18.6788194444444	5.94618055555554
10	147	142.980902777778	132.041666666667	10.9392361111111	4.01909722222223
11	137	134.595486111111	131.875	2.72048611111112	2.40451388888889
12	132	130.772569444444	131.791666666667	-1.01909722222222	1.22743055555557
13	125	128.585069444444	131.541666666667	-2.95659722222222	-3.58506944444444
14	123	125.480902777778	131.041666666667	-5.56076388888889	-2.48090277777777
15	117	120.543402777778	130.416666666667	-9.87326388888889	-3.54340277777777
16	114	117.887152777778	129.541666666667	-11.6545138888889	-3.8871527777778
17	111	110.449652777778	128.416666666667	-17.9670138888889	0.550347222222229
18	112	111.012152777778	127.166666666667	-16.1545138888889	0.987847222222214
19	144	140.168402777778	126.166666666667	14.0017361111111	3.83159722222223
20	150	144.178819444444	125.333333333333	18.8454861111111	5.82118055555556
21	149	143.012152777778	124.333333333333	18.6788194444444	5.98784722222221
22	134	134.272569444444	123.333333333333	10.9392361111111	-0.272569444444443
23	123	124.887152777778	122.166666666667	2.72048611111112	-1.88715277777777
24	116	119.689236111111	120.708333333333	-1.01909722222222	-3.68923611111113
25	117	116.126736111111	119.083333333333	-2.95659722222222	0.873263888888872
26	111	111.855902777778	117.416666666667	-5.56076388888889	-0.855902777777786
27	105	105.668402777778	115.541666666667	-9.87326388888889	-0.668402777777786
28	102	102.053819444444	113.708333333333	-11.6545138888889	-0.0538194444444287
29	95	94.2413194444444	112.208333333333	-17.9670138888889	0.758680555555557
30	93	94.8871527777778	111.041666666667	-16.1545138888889	-1.88715277777777
31	124	124.085069444444	110.083333333333	14.0017361111111	-0.0850694444444429
32	130	128.012152777778	109.166666666667	18.8454861111111	1.98784722222223
33	124	127.012152777778	108.333333333333	18.6788194444444	-3.01215277777776
34	115	118.480902777778	107.541666666667	10.9392361111111	-3.48090277777776
35	106	109.428819444444	106.708333333333	2.72048611111112	-3.42881944444441
36	105	104.980902777778	106	-1.01909722222222	0.0190972222222427
37	105	102.460069444444	105.416666666667	-2.95659722222222	2.53993055555556
38	101	99.1059027777778	104.666666666667	-5.56076388888889	1.89409722222223
39	95	94.0850694444444	103.958333333333	-9.87326388888889	0.914930555555557
40	93	91.7621527777778	103.416666666667	-11.6545138888889	1.23784722222223
41	84	85.1579861111111	103.125	-17.9670138888889	-1.15798611111113
42	87	87.0121527777778	103.166666666667	-16.1545138888889	-0.0121527777777857
43	116	117.418402777778	103.416666666667	14.0017361111111	-1.41840277777779
44	120	122.762152777778	103.916666666667	18.8454861111111	-2.76215277777779
45	117	123.470486111111	104.791666666667	18.6788194444444	-6.4704861111111
46	109	116.855902777778	105.916666666667	10.9392361111111	-7.85590277777779
47	105	109.845486111111	107.125	2.72048611111112	-4.84548611111111
48	107	107.397569444444	108.416666666667	-1.01909722222222	-0.397569444444443
49	109	106.751736111111	109.708333333333	-2.95659722222222	2.2482638888889
50	109	105.480902777778	111.041666666667	-5.56076388888889	3.51909722222223
51	108	102.626736111111	112.5	-9.87326388888889	5.3732638888889
52	107	102.220486111111	113.875	-11.6545138888889	4.77951388888889
53	99	97.0746527777778	115.041666666667	-17.9670138888889	1.92534722222223
54	103	100.012152777778	116.166666666667	-16.1545138888889	2.98784722222224
55	131	131.251736111111	117.25	14.0017361111111	-0.2517361111111
56	137	NA	NA	18.8454861111111	NA
57	135	NA	NA	18.6788194444444	NA
58	124	NA	NA	10.9392361111111	NA
59	118	NA	NA	2.72048611111112	NA
60	121	NA	NA	-1.01909722222222	NA
61	121	NA	NA	NA	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 130 & NA & NA & -2.95659722222222 & NA \tabularnewline
2 & 127 & NA & NA & -5.56076388888889 & NA \tabularnewline
3 & 122 & NA & NA & -9.87326388888889 & NA \tabularnewline
4 & 117 & NA & NA & -11.6545138888889 & NA \tabularnewline
5 & 112 & NA & NA & -17.9670138888889 & NA \tabularnewline
6 & 113 & NA & NA & -16.1545138888889 & NA \tabularnewline
7 & 149 & 147.126736111111 & 133.125 & 14.0017361111111 & 1.87326388888889 \tabularnewline
8 & 157 & 151.595486111111 & 132.75 & 18.8454861111111 & 5.40451388888889 \tabularnewline
9 & 157 & 151.053819444444 & 132.375 & 18.6788194444444 & 5.94618055555554 \tabularnewline
10 & 147 & 142.980902777778 & 132.041666666667 & 10.9392361111111 & 4.01909722222223 \tabularnewline
11 & 137 & 134.595486111111 & 131.875 & 2.72048611111112 & 2.40451388888889 \tabularnewline
12 & 132 & 130.772569444444 & 131.791666666667 & -1.01909722222222 & 1.22743055555557 \tabularnewline
13 & 125 & 128.585069444444 & 131.541666666667 & -2.95659722222222 & -3.58506944444444 \tabularnewline
14 & 123 & 125.480902777778 & 131.041666666667 & -5.56076388888889 & -2.48090277777777 \tabularnewline
15 & 117 & 120.543402777778 & 130.416666666667 & -9.87326388888889 & -3.54340277777777 \tabularnewline
16 & 114 & 117.887152777778 & 129.541666666667 & -11.6545138888889 & -3.8871527777778 \tabularnewline
17 & 111 & 110.449652777778 & 128.416666666667 & -17.9670138888889 & 0.550347222222229 \tabularnewline
18 & 112 & 111.012152777778 & 127.166666666667 & -16.1545138888889 & 0.987847222222214 \tabularnewline
19 & 144 & 140.168402777778 & 126.166666666667 & 14.0017361111111 & 3.83159722222223 \tabularnewline
20 & 150 & 144.178819444444 & 125.333333333333 & 18.8454861111111 & 5.82118055555556 \tabularnewline
21 & 149 & 143.012152777778 & 124.333333333333 & 18.6788194444444 & 5.98784722222221 \tabularnewline
22 & 134 & 134.272569444444 & 123.333333333333 & 10.9392361111111 & -0.272569444444443 \tabularnewline
23 & 123 & 124.887152777778 & 122.166666666667 & 2.72048611111112 & -1.88715277777777 \tabularnewline
24 & 116 & 119.689236111111 & 120.708333333333 & -1.01909722222222 & -3.68923611111113 \tabularnewline
25 & 117 & 116.126736111111 & 119.083333333333 & -2.95659722222222 & 0.873263888888872 \tabularnewline
26 & 111 & 111.855902777778 & 117.416666666667 & -5.56076388888889 & -0.855902777777786 \tabularnewline
27 & 105 & 105.668402777778 & 115.541666666667 & -9.87326388888889 & -0.668402777777786 \tabularnewline
28 & 102 & 102.053819444444 & 113.708333333333 & -11.6545138888889 & -0.0538194444444287 \tabularnewline
29 & 95 & 94.2413194444444 & 112.208333333333 & -17.9670138888889 & 0.758680555555557 \tabularnewline
30 & 93 & 94.8871527777778 & 111.041666666667 & -16.1545138888889 & -1.88715277777777 \tabularnewline
31 & 124 & 124.085069444444 & 110.083333333333 & 14.0017361111111 & -0.0850694444444429 \tabularnewline
32 & 130 & 128.012152777778 & 109.166666666667 & 18.8454861111111 & 1.98784722222223 \tabularnewline
33 & 124 & 127.012152777778 & 108.333333333333 & 18.6788194444444 & -3.01215277777776 \tabularnewline
34 & 115 & 118.480902777778 & 107.541666666667 & 10.9392361111111 & -3.48090277777776 \tabularnewline
35 & 106 & 109.428819444444 & 106.708333333333 & 2.72048611111112 & -3.42881944444441 \tabularnewline
36 & 105 & 104.980902777778 & 106 & -1.01909722222222 & 0.0190972222222427 \tabularnewline
37 & 105 & 102.460069444444 & 105.416666666667 & -2.95659722222222 & 2.53993055555556 \tabularnewline
38 & 101 & 99.1059027777778 & 104.666666666667 & -5.56076388888889 & 1.89409722222223 \tabularnewline
39 & 95 & 94.0850694444444 & 103.958333333333 & -9.87326388888889 & 0.914930555555557 \tabularnewline
40 & 93 & 91.7621527777778 & 103.416666666667 & -11.6545138888889 & 1.23784722222223 \tabularnewline
41 & 84 & 85.1579861111111 & 103.125 & -17.9670138888889 & -1.15798611111113 \tabularnewline
42 & 87 & 87.0121527777778 & 103.166666666667 & -16.1545138888889 & -0.0121527777777857 \tabularnewline
43 & 116 & 117.418402777778 & 103.416666666667 & 14.0017361111111 & -1.41840277777779 \tabularnewline
44 & 120 & 122.762152777778 & 103.916666666667 & 18.8454861111111 & -2.76215277777779 \tabularnewline
45 & 117 & 123.470486111111 & 104.791666666667 & 18.6788194444444 & -6.4704861111111 \tabularnewline
46 & 109 & 116.855902777778 & 105.916666666667 & 10.9392361111111 & -7.85590277777779 \tabularnewline
47 & 105 & 109.845486111111 & 107.125 & 2.72048611111112 & -4.84548611111111 \tabularnewline
48 & 107 & 107.397569444444 & 108.416666666667 & -1.01909722222222 & -0.397569444444443 \tabularnewline
49 & 109 & 106.751736111111 & 109.708333333333 & -2.95659722222222 & 2.2482638888889 \tabularnewline
50 & 109 & 105.480902777778 & 111.041666666667 & -5.56076388888889 & 3.51909722222223 \tabularnewline
51 & 108 & 102.626736111111 & 112.5 & -9.87326388888889 & 5.3732638888889 \tabularnewline
52 & 107 & 102.220486111111 & 113.875 & -11.6545138888889 & 4.77951388888889 \tabularnewline
53 & 99 & 97.0746527777778 & 115.041666666667 & -17.9670138888889 & 1.92534722222223 \tabularnewline
54 & 103 & 100.012152777778 & 116.166666666667 & -16.1545138888889 & 2.98784722222224 \tabularnewline
55 & 131 & 131.251736111111 & 117.25 & 14.0017361111111 & -0.2517361111111 \tabularnewline
56 & 137 & NA & NA & 18.8454861111111 & NA \tabularnewline
57 & 135 & NA & NA & 18.6788194444444 & NA \tabularnewline
58 & 124 & NA & NA & 10.9392361111111 & NA \tabularnewline
59 & 118 & NA & NA & 2.72048611111112 & NA \tabularnewline
60 & 121 & NA & NA & -1.01909722222222 & NA \tabularnewline
61 & 121 & NA & NA & NA & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=110676&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]130[/C][C]NA[/C][C]NA[/C][C]-2.95659722222222[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]127[/C][C]NA[/C][C]NA[/C][C]-5.56076388888889[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]122[/C][C]NA[/C][C]NA[/C][C]-9.87326388888889[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]117[/C][C]NA[/C][C]NA[/C][C]-11.6545138888889[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]112[/C][C]NA[/C][C]NA[/C][C]-17.9670138888889[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]113[/C][C]NA[/C][C]NA[/C][C]-16.1545138888889[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]149[/C][C]147.126736111111[/C][C]133.125[/C][C]14.0017361111111[/C][C]1.87326388888889[/C][/ROW]
[ROW][C]8[/C][C]157[/C][C]151.595486111111[/C][C]132.75[/C][C]18.8454861111111[/C][C]5.40451388888889[/C][/ROW]
[ROW][C]9[/C][C]157[/C][C]151.053819444444[/C][C]132.375[/C][C]18.6788194444444[/C][C]5.94618055555554[/C][/ROW]
[ROW][C]10[/C][C]147[/C][C]142.980902777778[/C][C]132.041666666667[/C][C]10.9392361111111[/C][C]4.01909722222223[/C][/ROW]
[ROW][C]11[/C][C]137[/C][C]134.595486111111[/C][C]131.875[/C][C]2.72048611111112[/C][C]2.40451388888889[/C][/ROW]
[ROW][C]12[/C][C]132[/C][C]130.772569444444[/C][C]131.791666666667[/C][C]-1.01909722222222[/C][C]1.22743055555557[/C][/ROW]
[ROW][C]13[/C][C]125[/C][C]128.585069444444[/C][C]131.541666666667[/C][C]-2.95659722222222[/C][C]-3.58506944444444[/C][/ROW]
[ROW][C]14[/C][C]123[/C][C]125.480902777778[/C][C]131.041666666667[/C][C]-5.56076388888889[/C][C]-2.48090277777777[/C][/ROW]
[ROW][C]15[/C][C]117[/C][C]120.543402777778[/C][C]130.416666666667[/C][C]-9.87326388888889[/C][C]-3.54340277777777[/C][/ROW]
[ROW][C]16[/C][C]114[/C][C]117.887152777778[/C][C]129.541666666667[/C][C]-11.6545138888889[/C][C]-3.8871527777778[/C][/ROW]
[ROW][C]17[/C][C]111[/C][C]110.449652777778[/C][C]128.416666666667[/C][C]-17.9670138888889[/C][C]0.550347222222229[/C][/ROW]
[ROW][C]18[/C][C]112[/C][C]111.012152777778[/C][C]127.166666666667[/C][C]-16.1545138888889[/C][C]0.987847222222214[/C][/ROW]
[ROW][C]19[/C][C]144[/C][C]140.168402777778[/C][C]126.166666666667[/C][C]14.0017361111111[/C][C]3.83159722222223[/C][/ROW]
[ROW][C]20[/C][C]150[/C][C]144.178819444444[/C][C]125.333333333333[/C][C]18.8454861111111[/C][C]5.82118055555556[/C][/ROW]
[ROW][C]21[/C][C]149[/C][C]143.012152777778[/C][C]124.333333333333[/C][C]18.6788194444444[/C][C]5.98784722222221[/C][/ROW]
[ROW][C]22[/C][C]134[/C][C]134.272569444444[/C][C]123.333333333333[/C][C]10.9392361111111[/C][C]-0.272569444444443[/C][/ROW]
[ROW][C]23[/C][C]123[/C][C]124.887152777778[/C][C]122.166666666667[/C][C]2.72048611111112[/C][C]-1.88715277777777[/C][/ROW]
[ROW][C]24[/C][C]116[/C][C]119.689236111111[/C][C]120.708333333333[/C][C]-1.01909722222222[/C][C]-3.68923611111113[/C][/ROW]
[ROW][C]25[/C][C]117[/C][C]116.126736111111[/C][C]119.083333333333[/C][C]-2.95659722222222[/C][C]0.873263888888872[/C][/ROW]
[ROW][C]26[/C][C]111[/C][C]111.855902777778[/C][C]117.416666666667[/C][C]-5.56076388888889[/C][C]-0.855902777777786[/C][/ROW]
[ROW][C]27[/C][C]105[/C][C]105.668402777778[/C][C]115.541666666667[/C][C]-9.87326388888889[/C][C]-0.668402777777786[/C][/ROW]
[ROW][C]28[/C][C]102[/C][C]102.053819444444[/C][C]113.708333333333[/C][C]-11.6545138888889[/C][C]-0.0538194444444287[/C][/ROW]
[ROW][C]29[/C][C]95[/C][C]94.2413194444444[/C][C]112.208333333333[/C][C]-17.9670138888889[/C][C]0.758680555555557[/C][/ROW]
[ROW][C]30[/C][C]93[/C][C]94.8871527777778[/C][C]111.041666666667[/C][C]-16.1545138888889[/C][C]-1.88715277777777[/C][/ROW]
[ROW][C]31[/C][C]124[/C][C]124.085069444444[/C][C]110.083333333333[/C][C]14.0017361111111[/C][C]-0.0850694444444429[/C][/ROW]
[ROW][C]32[/C][C]130[/C][C]128.012152777778[/C][C]109.166666666667[/C][C]18.8454861111111[/C][C]1.98784722222223[/C][/ROW]
[ROW][C]33[/C][C]124[/C][C]127.012152777778[/C][C]108.333333333333[/C][C]18.6788194444444[/C][C]-3.01215277777776[/C][/ROW]
[ROW][C]34[/C][C]115[/C][C]118.480902777778[/C][C]107.541666666667[/C][C]10.9392361111111[/C][C]-3.48090277777776[/C][/ROW]
[ROW][C]35[/C][C]106[/C][C]109.428819444444[/C][C]106.708333333333[/C][C]2.72048611111112[/C][C]-3.42881944444441[/C][/ROW]
[ROW][C]36[/C][C]105[/C][C]104.980902777778[/C][C]106[/C][C]-1.01909722222222[/C][C]0.0190972222222427[/C][/ROW]
[ROW][C]37[/C][C]105[/C][C]102.460069444444[/C][C]105.416666666667[/C][C]-2.95659722222222[/C][C]2.53993055555556[/C][/ROW]
[ROW][C]38[/C][C]101[/C][C]99.1059027777778[/C][C]104.666666666667[/C][C]-5.56076388888889[/C][C]1.89409722222223[/C][/ROW]
[ROW][C]39[/C][C]95[/C][C]94.0850694444444[/C][C]103.958333333333[/C][C]-9.87326388888889[/C][C]0.914930555555557[/C][/ROW]
[ROW][C]40[/C][C]93[/C][C]91.7621527777778[/C][C]103.416666666667[/C][C]-11.6545138888889[/C][C]1.23784722222223[/C][/ROW]
[ROW][C]41[/C][C]84[/C][C]85.1579861111111[/C][C]103.125[/C][C]-17.9670138888889[/C][C]-1.15798611111113[/C][/ROW]
[ROW][C]42[/C][C]87[/C][C]87.0121527777778[/C][C]103.166666666667[/C][C]-16.1545138888889[/C][C]-0.0121527777777857[/C][/ROW]
[ROW][C]43[/C][C]116[/C][C]117.418402777778[/C][C]103.416666666667[/C][C]14.0017361111111[/C][C]-1.41840277777779[/C][/ROW]
[ROW][C]44[/C][C]120[/C][C]122.762152777778[/C][C]103.916666666667[/C][C]18.8454861111111[/C][C]-2.76215277777779[/C][/ROW]
[ROW][C]45[/C][C]117[/C][C]123.470486111111[/C][C]104.791666666667[/C][C]18.6788194444444[/C][C]-6.4704861111111[/C][/ROW]
[ROW][C]46[/C][C]109[/C][C]116.855902777778[/C][C]105.916666666667[/C][C]10.9392361111111[/C][C]-7.85590277777779[/C][/ROW]
[ROW][C]47[/C][C]105[/C][C]109.845486111111[/C][C]107.125[/C][C]2.72048611111112[/C][C]-4.84548611111111[/C][/ROW]
[ROW][C]48[/C][C]107[/C][C]107.397569444444[/C][C]108.416666666667[/C][C]-1.01909722222222[/C][C]-0.397569444444443[/C][/ROW]
[ROW][C]49[/C][C]109[/C][C]106.751736111111[/C][C]109.708333333333[/C][C]-2.95659722222222[/C][C]2.2482638888889[/C][/ROW]
[ROW][C]50[/C][C]109[/C][C]105.480902777778[/C][C]111.041666666667[/C][C]-5.56076388888889[/C][C]3.51909722222223[/C][/ROW]
[ROW][C]51[/C][C]108[/C][C]102.626736111111[/C][C]112.5[/C][C]-9.87326388888889[/C][C]5.3732638888889[/C][/ROW]
[ROW][C]52[/C][C]107[/C][C]102.220486111111[/C][C]113.875[/C][C]-11.6545138888889[/C][C]4.77951388888889[/C][/ROW]
[ROW][C]53[/C][C]99[/C][C]97.0746527777778[/C][C]115.041666666667[/C][C]-17.9670138888889[/C][C]1.92534722222223[/C][/ROW]
[ROW][C]54[/C][C]103[/C][C]100.012152777778[/C][C]116.166666666667[/C][C]-16.1545138888889[/C][C]2.98784722222224[/C][/ROW]
[ROW][C]55[/C][C]131[/C][C]131.251736111111[/C][C]117.25[/C][C]14.0017361111111[/C][C]-0.2517361111111[/C][/ROW]
[ROW][C]56[/C][C]137[/C][C]NA[/C][C]NA[/C][C]18.8454861111111[/C][C]NA[/C][/ROW]
[ROW][C]57[/C][C]135[/C][C]NA[/C][C]NA[/C][C]18.6788194444444[/C][C]NA[/C][/ROW]
[ROW][C]58[/C][C]124[/C][C]NA[/C][C]NA[/C][C]10.9392361111111[/C][C]NA[/C][/ROW]
[ROW][C]59[/C][C]118[/C][C]NA[/C][C]NA[/C][C]2.72048611111112[/C][C]NA[/C][/ROW]
[ROW][C]60[/C][C]121[/C][C]NA[/C][C]NA[/C][C]-1.01909722222222[/C][C]NA[/C][/ROW]
[ROW][C]61[/C][C]121[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=110676&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=110676&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	130	NA	NA	-2.95659722222222	NA
2	127	NA	NA	-5.56076388888889	NA
3	122	NA	NA	-9.87326388888889	NA
4	117	NA	NA	-11.6545138888889	NA
5	112	NA	NA	-17.9670138888889	NA
6	113	NA	NA	-16.1545138888889	NA
7	149	147.126736111111	133.125	14.0017361111111	1.87326388888889
8	157	151.595486111111	132.75	18.8454861111111	5.40451388888889
9	157	151.053819444444	132.375	18.6788194444444	5.94618055555554
10	147	142.980902777778	132.041666666667	10.9392361111111	4.01909722222223
11	137	134.595486111111	131.875	2.72048611111112	2.40451388888889
12	132	130.772569444444	131.791666666667	-1.01909722222222	1.22743055555557
13	125	128.585069444444	131.541666666667	-2.95659722222222	-3.58506944444444
14	123	125.480902777778	131.041666666667	-5.56076388888889	-2.48090277777777
15	117	120.543402777778	130.416666666667	-9.87326388888889	-3.54340277777777
16	114	117.887152777778	129.541666666667	-11.6545138888889	-3.8871527777778
17	111	110.449652777778	128.416666666667	-17.9670138888889	0.550347222222229
18	112	111.012152777778	127.166666666667	-16.1545138888889	0.987847222222214
19	144	140.168402777778	126.166666666667	14.0017361111111	3.83159722222223
20	150	144.178819444444	125.333333333333	18.8454861111111	5.82118055555556
21	149	143.012152777778	124.333333333333	18.6788194444444	5.98784722222221
22	134	134.272569444444	123.333333333333	10.9392361111111	-0.272569444444443
23	123	124.887152777778	122.166666666667	2.72048611111112	-1.88715277777777
24	116	119.689236111111	120.708333333333	-1.01909722222222	-3.68923611111113
25	117	116.126736111111	119.083333333333	-2.95659722222222	0.873263888888872
26	111	111.855902777778	117.416666666667	-5.56076388888889	-0.855902777777786
27	105	105.668402777778	115.541666666667	-9.87326388888889	-0.668402777777786
28	102	102.053819444444	113.708333333333	-11.6545138888889	-0.0538194444444287
29	95	94.2413194444444	112.208333333333	-17.9670138888889	0.758680555555557
30	93	94.8871527777778	111.041666666667	-16.1545138888889	-1.88715277777777
31	124	124.085069444444	110.083333333333	14.0017361111111	-0.0850694444444429
32	130	128.012152777778	109.166666666667	18.8454861111111	1.98784722222223
33	124	127.012152777778	108.333333333333	18.6788194444444	-3.01215277777776
34	115	118.480902777778	107.541666666667	10.9392361111111	-3.48090277777776
35	106	109.428819444444	106.708333333333	2.72048611111112	-3.42881944444441
36	105	104.980902777778	106	-1.01909722222222	0.0190972222222427
37	105	102.460069444444	105.416666666667	-2.95659722222222	2.53993055555556
38	101	99.1059027777778	104.666666666667	-5.56076388888889	1.89409722222223
39	95	94.0850694444444	103.958333333333	-9.87326388888889	0.914930555555557
40	93	91.7621527777778	103.416666666667	-11.6545138888889	1.23784722222223
41	84	85.1579861111111	103.125	-17.9670138888889	-1.15798611111113
42	87	87.0121527777778	103.166666666667	-16.1545138888889	-0.0121527777777857
43	116	117.418402777778	103.416666666667	14.0017361111111	-1.41840277777779
44	120	122.762152777778	103.916666666667	18.8454861111111	-2.76215277777779
45	117	123.470486111111	104.791666666667	18.6788194444444	-6.4704861111111
46	109	116.855902777778	105.916666666667	10.9392361111111	-7.85590277777779
47	105	109.845486111111	107.125	2.72048611111112	-4.84548611111111
48	107	107.397569444444	108.416666666667	-1.01909722222222	-0.397569444444443
49	109	106.751736111111	109.708333333333	-2.95659722222222	2.2482638888889
50	109	105.480902777778	111.041666666667	-5.56076388888889	3.51909722222223
51	108	102.626736111111	112.5	-9.87326388888889	5.3732638888889
52	107	102.220486111111	113.875	-11.6545138888889	4.77951388888889
53	99	97.0746527777778	115.041666666667	-17.9670138888889	1.92534722222223
54	103	100.012152777778	116.166666666667	-16.1545138888889	2.98784722222224
55	131	131.251736111111	117.25	14.0017361111111	-0.2517361111111
56	137	NA	NA	18.8454861111111	NA
57	135	NA	NA	18.6788194444444	NA
58	124	NA	NA	10.9392361111111	NA
59	118	NA	NA	2.72048611111112	NA
60	121	NA	NA	-1.01909722222222	NA
61	121	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])
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