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

Mon, 19 Dec 2011 15:02:25 -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/2011/Dec/19/t1324325046herj3f855l0c6dv.htm/, Retrieved Fri, 09 May 2025 21:50:27 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=157661, Retrieved Fri, 09 May 2025 21:50:27 +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

184

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] [Workshop 8, Class...] [2010-11-28 20:55:54] [d946de7cca328fbcf207448a112523ab]
- R  D    [Classical Decomposition] [Paper Decompositi...] [2010-12-18 18:53:33] [8081b8996d5947580de3eb171e82db4f]
-    D      [Classical Decomposition] [Paper Decompositi...] [2010-12-18 18:57:16] [8081b8996d5947580de3eb171e82db4f]
-    D        [Classical Decomposition] [Paper Decompositi...] [2010-12-18 19:01:17] [8081b8996d5947580de3eb171e82db4f]
-    D          [Classical Decomposition] [Paper Decompositi...] [2010-12-18 19:04:54] [8081b8996d5947580de3eb171e82db4f]
- R  D              [Classical Decomposition] [] [2011-12-19 20:02:25] [eab7a71f9dca93a99c212b8372c46924] [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	1 seconds
R Server	'Gertrude Mary Cox' @ cox.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 & 1 seconds \tabularnewline
R Server & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=157661&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]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gertrude Mary Cox' @ cox.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=157661&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=157661&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	1 seconds
R Server	'Gertrude Mary Cox' @ cox.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	58608	NA	NA	11498.4765625	NA
2	46865	NA	NA	8309.14322916667	NA
3	51378	NA	NA	14103.1640625	NA
4	46235	NA	NA	9742.59114583333	NA
5	47206	NA	NA	182.164062500001	NA
6	45382	NA	NA	3141.64322916667	NA
7	41227	37318.2057291667	41557.125	-4238.91927083333	3908.79427083334
8	33795	31484.1744791667	41727.9583333333	-10243.7838541667	2310.82552083334
9	31295	34939.1640625	42079.8333333333	-7140.66927083333	-3644.16406249999
10	42625	42958.6536458333	42426.9583333333	531.695312499996	-333.653645833336
11	33625	33707.3203125	42444.5	-8737.1796875	-82.3203125
12	21538	24760.2161458333	41908.5416666667	-17148.3255208333	-3222.21614583334
13	56421	52864.0182291667	41365.5416666667	11498.4765625	3556.98177083334
14	53152	49120.4348958333	40811.2916666667	8309.14322916667	4031.56510416666
15	53536	54632.8307291667	40529.6666666667	14103.1640625	-1096.83072916667
16	52408	50106.7161458333	40364.125	9742.59114583333	2301.28385416666
17	41454	40101.0390625	39918.875	182.164062500001	1352.96093750001
18	38271	42675.4348958333	39533.7916666667	3141.64322916667	-4404.43489583332
19	35306	34919.2057291667	39158.125	-4238.91927083333	386.794270833336
20	26414	28284.5078125	38528.2916666667	-10243.7838541667	-1870.50781249999
21	31917	30795.3307291667	37936	-7140.66927083333	1121.66927083334
22	38030	37906.3203125	37374.625	531.695312499996	123.679687500007
23	27534	28119.4869791667	36856.6666666667	-8737.1796875	-585.486979166664
24	18387	19631.8411458333	36780.1666666667	-17148.3255208333	-1244.84114583334
25	50556	48373.1848958333	36874.7083333333	11498.4765625	2182.81510416667
26	43901	45300.3515625	36991.2083333333	8309.14322916667	-1399.35156250001
27	48572	51310.2473958333	37207.0833333333	14103.1640625	-2738.24739583334
28	43899	47247.0078125	37504.4166666667	9742.59114583333	-3348.00781250001
29	37532	37992.4140625	37810.25	182.164062500001	-460.4140625
30	40357	41403.3932291667	38261.75	3141.64322916667	-1046.39322916666
31	35489	34229.8307291667	38468.75	-4238.91927083333	1259.16927083334
32	29027	28354.4244791667	38598.2083333333	-10243.7838541667	672.575520833336
33	34485	32253.2057291667	39393.875	-7140.66927083333	2231.79427083334
34	42598	40872.2369791667	40340.5416666667	531.695312499996	1725.76302083334
35	30306	32093.8619791667	40831.0416666667	-8737.1796875	-1787.86197916666
36	26451	23911.1744791667	41059.5	-17148.3255208333	2539.82552083334
37	47460	52538.3932291667	41039.9166666667	11498.4765625	-5078.39322916666
38	50104	49218.2682291667	40909.125	8309.14322916667	885.731770833328
39	61465	55021.7057291667	40918.5416666667	14103.1640625	6443.29427083334
40	53726	50489.4244791667	40746.8333333333	9742.59114583333	3236.57552083334
41	39477	40925.5807291667	40743.4166666667	182.164062500001	-1448.58072916666
42	43895	43970.0182291667	40828.375	3141.64322916667	-75.0182291666642
43	31481	36698.8307291667	40937.75	-4238.91927083333	-5217.83072916667
44	29896	30671.9661458333	40915.75	-10243.7838541667	-775.966145833328
45	33842	33214.3723958333	40355.0416666667	-7140.66927083333	627.627604166672
46	39120	40298.8619791667	39767.1666666667	531.695312499996	-1178.86197916666
47	33702	30909.4036458333	39646.5833333333	-8737.1796875	2792.59635416667
48	25094	22829.8411458333	39978.1666666667	-17148.3255208333	2264.15885416666
49	51442	51766.4765625	40268	11498.4765625	-324.4765625
50	45594	48775.0182291667	40465.875	8309.14322916667	-3181.01822916666
51	52518	54789.2890625	40686.125	14103.1640625	-2271.2890625
52	48564	50416.9244791667	40674.3333333333	9742.59114583333	-1852.92447916666
53	41745	40852.0390625	40669.875	182.164062500001	892.9609375
54	49585	43722.2265625	40580.5833333333	3141.64322916667	5862.7734375
55	32747	NA	NA	-4238.91927083333	NA
56	33379	NA	NA	-10243.7838541667	NA
57	35645	NA	NA	-7140.66927083333	NA
58	37034	NA	NA	531.695312499996	NA
59	35681	NA	NA	-8737.1796875	NA
60	20972	NA	NA	-17148.3255208333	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 58608 & NA & NA & 11498.4765625 & NA \tabularnewline
2 & 46865 & NA & NA & 8309.14322916667 & NA \tabularnewline
3 & 51378 & NA & NA & 14103.1640625 & NA \tabularnewline
4 & 46235 & NA & NA & 9742.59114583333 & NA \tabularnewline
5 & 47206 & NA & NA & 182.164062500001 & NA \tabularnewline
6 & 45382 & NA & NA & 3141.64322916667 & NA \tabularnewline
7 & 41227 & 37318.2057291667 & 41557.125 & -4238.91927083333 & 3908.79427083334 \tabularnewline
8 & 33795 & 31484.1744791667 & 41727.9583333333 & -10243.7838541667 & 2310.82552083334 \tabularnewline
9 & 31295 & 34939.1640625 & 42079.8333333333 & -7140.66927083333 & -3644.16406249999 \tabularnewline
10 & 42625 & 42958.6536458333 & 42426.9583333333 & 531.695312499996 & -333.653645833336 \tabularnewline
11 & 33625 & 33707.3203125 & 42444.5 & -8737.1796875 & -82.3203125 \tabularnewline
12 & 21538 & 24760.2161458333 & 41908.5416666667 & -17148.3255208333 & -3222.21614583334 \tabularnewline
13 & 56421 & 52864.0182291667 & 41365.5416666667 & 11498.4765625 & 3556.98177083334 \tabularnewline
14 & 53152 & 49120.4348958333 & 40811.2916666667 & 8309.14322916667 & 4031.56510416666 \tabularnewline
15 & 53536 & 54632.8307291667 & 40529.6666666667 & 14103.1640625 & -1096.83072916667 \tabularnewline
16 & 52408 & 50106.7161458333 & 40364.125 & 9742.59114583333 & 2301.28385416666 \tabularnewline
17 & 41454 & 40101.0390625 & 39918.875 & 182.164062500001 & 1352.96093750001 \tabularnewline
18 & 38271 & 42675.4348958333 & 39533.7916666667 & 3141.64322916667 & -4404.43489583332 \tabularnewline
19 & 35306 & 34919.2057291667 & 39158.125 & -4238.91927083333 & 386.794270833336 \tabularnewline
20 & 26414 & 28284.5078125 & 38528.2916666667 & -10243.7838541667 & -1870.50781249999 \tabularnewline
21 & 31917 & 30795.3307291667 & 37936 & -7140.66927083333 & 1121.66927083334 \tabularnewline
22 & 38030 & 37906.3203125 & 37374.625 & 531.695312499996 & 123.679687500007 \tabularnewline
23 & 27534 & 28119.4869791667 & 36856.6666666667 & -8737.1796875 & -585.486979166664 \tabularnewline
24 & 18387 & 19631.8411458333 & 36780.1666666667 & -17148.3255208333 & -1244.84114583334 \tabularnewline
25 & 50556 & 48373.1848958333 & 36874.7083333333 & 11498.4765625 & 2182.81510416667 \tabularnewline
26 & 43901 & 45300.3515625 & 36991.2083333333 & 8309.14322916667 & -1399.35156250001 \tabularnewline
27 & 48572 & 51310.2473958333 & 37207.0833333333 & 14103.1640625 & -2738.24739583334 \tabularnewline
28 & 43899 & 47247.0078125 & 37504.4166666667 & 9742.59114583333 & -3348.00781250001 \tabularnewline
29 & 37532 & 37992.4140625 & 37810.25 & 182.164062500001 & -460.4140625 \tabularnewline
30 & 40357 & 41403.3932291667 & 38261.75 & 3141.64322916667 & -1046.39322916666 \tabularnewline
31 & 35489 & 34229.8307291667 & 38468.75 & -4238.91927083333 & 1259.16927083334 \tabularnewline
32 & 29027 & 28354.4244791667 & 38598.2083333333 & -10243.7838541667 & 672.575520833336 \tabularnewline
33 & 34485 & 32253.2057291667 & 39393.875 & -7140.66927083333 & 2231.79427083334 \tabularnewline
34 & 42598 & 40872.2369791667 & 40340.5416666667 & 531.695312499996 & 1725.76302083334 \tabularnewline
35 & 30306 & 32093.8619791667 & 40831.0416666667 & -8737.1796875 & -1787.86197916666 \tabularnewline
36 & 26451 & 23911.1744791667 & 41059.5 & -17148.3255208333 & 2539.82552083334 \tabularnewline
37 & 47460 & 52538.3932291667 & 41039.9166666667 & 11498.4765625 & -5078.39322916666 \tabularnewline
38 & 50104 & 49218.2682291667 & 40909.125 & 8309.14322916667 & 885.731770833328 \tabularnewline
39 & 61465 & 55021.7057291667 & 40918.5416666667 & 14103.1640625 & 6443.29427083334 \tabularnewline
40 & 53726 & 50489.4244791667 & 40746.8333333333 & 9742.59114583333 & 3236.57552083334 \tabularnewline
41 & 39477 & 40925.5807291667 & 40743.4166666667 & 182.164062500001 & -1448.58072916666 \tabularnewline
42 & 43895 & 43970.0182291667 & 40828.375 & 3141.64322916667 & -75.0182291666642 \tabularnewline
43 & 31481 & 36698.8307291667 & 40937.75 & -4238.91927083333 & -5217.83072916667 \tabularnewline
44 & 29896 & 30671.9661458333 & 40915.75 & -10243.7838541667 & -775.966145833328 \tabularnewline
45 & 33842 & 33214.3723958333 & 40355.0416666667 & -7140.66927083333 & 627.627604166672 \tabularnewline
46 & 39120 & 40298.8619791667 & 39767.1666666667 & 531.695312499996 & -1178.86197916666 \tabularnewline
47 & 33702 & 30909.4036458333 & 39646.5833333333 & -8737.1796875 & 2792.59635416667 \tabularnewline
48 & 25094 & 22829.8411458333 & 39978.1666666667 & -17148.3255208333 & 2264.15885416666 \tabularnewline
49 & 51442 & 51766.4765625 & 40268 & 11498.4765625 & -324.4765625 \tabularnewline
50 & 45594 & 48775.0182291667 & 40465.875 & 8309.14322916667 & -3181.01822916666 \tabularnewline
51 & 52518 & 54789.2890625 & 40686.125 & 14103.1640625 & -2271.2890625 \tabularnewline
52 & 48564 & 50416.9244791667 & 40674.3333333333 & 9742.59114583333 & -1852.92447916666 \tabularnewline
53 & 41745 & 40852.0390625 & 40669.875 & 182.164062500001 & 892.9609375 \tabularnewline
54 & 49585 & 43722.2265625 & 40580.5833333333 & 3141.64322916667 & 5862.7734375 \tabularnewline
55 & 32747 & NA & NA & -4238.91927083333 & NA \tabularnewline
56 & 33379 & NA & NA & -10243.7838541667 & NA \tabularnewline
57 & 35645 & NA & NA & -7140.66927083333 & NA \tabularnewline
58 & 37034 & NA & NA & 531.695312499996 & NA \tabularnewline
59 & 35681 & NA & NA & -8737.1796875 & NA \tabularnewline
60 & 20972 & NA & NA & -17148.3255208333 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=157661&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]58608[/C][C]NA[/C][C]NA[/C][C]11498.4765625[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]46865[/C][C]NA[/C][C]NA[/C][C]8309.14322916667[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]51378[/C][C]NA[/C][C]NA[/C][C]14103.1640625[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]46235[/C][C]NA[/C][C]NA[/C][C]9742.59114583333[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]47206[/C][C]NA[/C][C]NA[/C][C]182.164062500001[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]45382[/C][C]NA[/C][C]NA[/C][C]3141.64322916667[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]41227[/C][C]37318.2057291667[/C][C]41557.125[/C][C]-4238.91927083333[/C][C]3908.79427083334[/C][/ROW]
[ROW][C]8[/C][C]33795[/C][C]31484.1744791667[/C][C]41727.9583333333[/C][C]-10243.7838541667[/C][C]2310.82552083334[/C][/ROW]
[ROW][C]9[/C][C]31295[/C][C]34939.1640625[/C][C]42079.8333333333[/C][C]-7140.66927083333[/C][C]-3644.16406249999[/C][/ROW]
[ROW][C]10[/C][C]42625[/C][C]42958.6536458333[/C][C]42426.9583333333[/C][C]531.695312499996[/C][C]-333.653645833336[/C][/ROW]
[ROW][C]11[/C][C]33625[/C][C]33707.3203125[/C][C]42444.5[/C][C]-8737.1796875[/C][C]-82.3203125[/C][/ROW]
[ROW][C]12[/C][C]21538[/C][C]24760.2161458333[/C][C]41908.5416666667[/C][C]-17148.3255208333[/C][C]-3222.21614583334[/C][/ROW]
[ROW][C]13[/C][C]56421[/C][C]52864.0182291667[/C][C]41365.5416666667[/C][C]11498.4765625[/C][C]3556.98177083334[/C][/ROW]
[ROW][C]14[/C][C]53152[/C][C]49120.4348958333[/C][C]40811.2916666667[/C][C]8309.14322916667[/C][C]4031.56510416666[/C][/ROW]
[ROW][C]15[/C][C]53536[/C][C]54632.8307291667[/C][C]40529.6666666667[/C][C]14103.1640625[/C][C]-1096.83072916667[/C][/ROW]
[ROW][C]16[/C][C]52408[/C][C]50106.7161458333[/C][C]40364.125[/C][C]9742.59114583333[/C][C]2301.28385416666[/C][/ROW]
[ROW][C]17[/C][C]41454[/C][C]40101.0390625[/C][C]39918.875[/C][C]182.164062500001[/C][C]1352.96093750001[/C][/ROW]
[ROW][C]18[/C][C]38271[/C][C]42675.4348958333[/C][C]39533.7916666667[/C][C]3141.64322916667[/C][C]-4404.43489583332[/C][/ROW]
[ROW][C]19[/C][C]35306[/C][C]34919.2057291667[/C][C]39158.125[/C][C]-4238.91927083333[/C][C]386.794270833336[/C][/ROW]
[ROW][C]20[/C][C]26414[/C][C]28284.5078125[/C][C]38528.2916666667[/C][C]-10243.7838541667[/C][C]-1870.50781249999[/C][/ROW]
[ROW][C]21[/C][C]31917[/C][C]30795.3307291667[/C][C]37936[/C][C]-7140.66927083333[/C][C]1121.66927083334[/C][/ROW]
[ROW][C]22[/C][C]38030[/C][C]37906.3203125[/C][C]37374.625[/C][C]531.695312499996[/C][C]123.679687500007[/C][/ROW]
[ROW][C]23[/C][C]27534[/C][C]28119.4869791667[/C][C]36856.6666666667[/C][C]-8737.1796875[/C][C]-585.486979166664[/C][/ROW]
[ROW][C]24[/C][C]18387[/C][C]19631.8411458333[/C][C]36780.1666666667[/C][C]-17148.3255208333[/C][C]-1244.84114583334[/C][/ROW]
[ROW][C]25[/C][C]50556[/C][C]48373.1848958333[/C][C]36874.7083333333[/C][C]11498.4765625[/C][C]2182.81510416667[/C][/ROW]
[ROW][C]26[/C][C]43901[/C][C]45300.3515625[/C][C]36991.2083333333[/C][C]8309.14322916667[/C][C]-1399.35156250001[/C][/ROW]
[ROW][C]27[/C][C]48572[/C][C]51310.2473958333[/C][C]37207.0833333333[/C][C]14103.1640625[/C][C]-2738.24739583334[/C][/ROW]
[ROW][C]28[/C][C]43899[/C][C]47247.0078125[/C][C]37504.4166666667[/C][C]9742.59114583333[/C][C]-3348.00781250001[/C][/ROW]
[ROW][C]29[/C][C]37532[/C][C]37992.4140625[/C][C]37810.25[/C][C]182.164062500001[/C][C]-460.4140625[/C][/ROW]
[ROW][C]30[/C][C]40357[/C][C]41403.3932291667[/C][C]38261.75[/C][C]3141.64322916667[/C][C]-1046.39322916666[/C][/ROW]
[ROW][C]31[/C][C]35489[/C][C]34229.8307291667[/C][C]38468.75[/C][C]-4238.91927083333[/C][C]1259.16927083334[/C][/ROW]
[ROW][C]32[/C][C]29027[/C][C]28354.4244791667[/C][C]38598.2083333333[/C][C]-10243.7838541667[/C][C]672.575520833336[/C][/ROW]
[ROW][C]33[/C][C]34485[/C][C]32253.2057291667[/C][C]39393.875[/C][C]-7140.66927083333[/C][C]2231.79427083334[/C][/ROW]
[ROW][C]34[/C][C]42598[/C][C]40872.2369791667[/C][C]40340.5416666667[/C][C]531.695312499996[/C][C]1725.76302083334[/C][/ROW]
[ROW][C]35[/C][C]30306[/C][C]32093.8619791667[/C][C]40831.0416666667[/C][C]-8737.1796875[/C][C]-1787.86197916666[/C][/ROW]
[ROW][C]36[/C][C]26451[/C][C]23911.1744791667[/C][C]41059.5[/C][C]-17148.3255208333[/C][C]2539.82552083334[/C][/ROW]
[ROW][C]37[/C][C]47460[/C][C]52538.3932291667[/C][C]41039.9166666667[/C][C]11498.4765625[/C][C]-5078.39322916666[/C][/ROW]
[ROW][C]38[/C][C]50104[/C][C]49218.2682291667[/C][C]40909.125[/C][C]8309.14322916667[/C][C]885.731770833328[/C][/ROW]
[ROW][C]39[/C][C]61465[/C][C]55021.7057291667[/C][C]40918.5416666667[/C][C]14103.1640625[/C][C]6443.29427083334[/C][/ROW]
[ROW][C]40[/C][C]53726[/C][C]50489.4244791667[/C][C]40746.8333333333[/C][C]9742.59114583333[/C][C]3236.57552083334[/C][/ROW]
[ROW][C]41[/C][C]39477[/C][C]40925.5807291667[/C][C]40743.4166666667[/C][C]182.164062500001[/C][C]-1448.58072916666[/C][/ROW]
[ROW][C]42[/C][C]43895[/C][C]43970.0182291667[/C][C]40828.375[/C][C]3141.64322916667[/C][C]-75.0182291666642[/C][/ROW]
[ROW][C]43[/C][C]31481[/C][C]36698.8307291667[/C][C]40937.75[/C][C]-4238.91927083333[/C][C]-5217.83072916667[/C][/ROW]
[ROW][C]44[/C][C]29896[/C][C]30671.9661458333[/C][C]40915.75[/C][C]-10243.7838541667[/C][C]-775.966145833328[/C][/ROW]
[ROW][C]45[/C][C]33842[/C][C]33214.3723958333[/C][C]40355.0416666667[/C][C]-7140.66927083333[/C][C]627.627604166672[/C][/ROW]
[ROW][C]46[/C][C]39120[/C][C]40298.8619791667[/C][C]39767.1666666667[/C][C]531.695312499996[/C][C]-1178.86197916666[/C][/ROW]
[ROW][C]47[/C][C]33702[/C][C]30909.4036458333[/C][C]39646.5833333333[/C][C]-8737.1796875[/C][C]2792.59635416667[/C][/ROW]
[ROW][C]48[/C][C]25094[/C][C]22829.8411458333[/C][C]39978.1666666667[/C][C]-17148.3255208333[/C][C]2264.15885416666[/C][/ROW]
[ROW][C]49[/C][C]51442[/C][C]51766.4765625[/C][C]40268[/C][C]11498.4765625[/C][C]-324.4765625[/C][/ROW]
[ROW][C]50[/C][C]45594[/C][C]48775.0182291667[/C][C]40465.875[/C][C]8309.14322916667[/C][C]-3181.01822916666[/C][/ROW]
[ROW][C]51[/C][C]52518[/C][C]54789.2890625[/C][C]40686.125[/C][C]14103.1640625[/C][C]-2271.2890625[/C][/ROW]
[ROW][C]52[/C][C]48564[/C][C]50416.9244791667[/C][C]40674.3333333333[/C][C]9742.59114583333[/C][C]-1852.92447916666[/C][/ROW]
[ROW][C]53[/C][C]41745[/C][C]40852.0390625[/C][C]40669.875[/C][C]182.164062500001[/C][C]892.9609375[/C][/ROW]
[ROW][C]54[/C][C]49585[/C][C]43722.2265625[/C][C]40580.5833333333[/C][C]3141.64322916667[/C][C]5862.7734375[/C][/ROW]
[ROW][C]55[/C][C]32747[/C][C]NA[/C][C]NA[/C][C]-4238.91927083333[/C][C]NA[/C][/ROW]
[ROW][C]56[/C][C]33379[/C][C]NA[/C][C]NA[/C][C]-10243.7838541667[/C][C]NA[/C][/ROW]
[ROW][C]57[/C][C]35645[/C][C]NA[/C][C]NA[/C][C]-7140.66927083333[/C][C]NA[/C][/ROW]
[ROW][C]58[/C][C]37034[/C][C]NA[/C][C]NA[/C][C]531.695312499996[/C][C]NA[/C][/ROW]
[ROW][C]59[/C][C]35681[/C][C]NA[/C][C]NA[/C][C]-8737.1796875[/C][C]NA[/C][/ROW]
[ROW][C]60[/C][C]20972[/C][C]NA[/C][C]NA[/C][C]-17148.3255208333[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=157661&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=157661&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	58608	NA	NA	11498.4765625	NA
2	46865	NA	NA	8309.14322916667	NA
3	51378	NA	NA	14103.1640625	NA
4	46235	NA	NA	9742.59114583333	NA
5	47206	NA	NA	182.164062500001	NA
6	45382	NA	NA	3141.64322916667	NA
7	41227	37318.2057291667	41557.125	-4238.91927083333	3908.79427083334
8	33795	31484.1744791667	41727.9583333333	-10243.7838541667	2310.82552083334
9	31295	34939.1640625	42079.8333333333	-7140.66927083333	-3644.16406249999
10	42625	42958.6536458333	42426.9583333333	531.695312499996	-333.653645833336
11	33625	33707.3203125	42444.5	-8737.1796875	-82.3203125
12	21538	24760.2161458333	41908.5416666667	-17148.3255208333	-3222.21614583334
13	56421	52864.0182291667	41365.5416666667	11498.4765625	3556.98177083334
14	53152	49120.4348958333	40811.2916666667	8309.14322916667	4031.56510416666
15	53536	54632.8307291667	40529.6666666667	14103.1640625	-1096.83072916667
16	52408	50106.7161458333	40364.125	9742.59114583333	2301.28385416666
17	41454	40101.0390625	39918.875	182.164062500001	1352.96093750001
18	38271	42675.4348958333	39533.7916666667	3141.64322916667	-4404.43489583332
19	35306	34919.2057291667	39158.125	-4238.91927083333	386.794270833336
20	26414	28284.5078125	38528.2916666667	-10243.7838541667	-1870.50781249999
21	31917	30795.3307291667	37936	-7140.66927083333	1121.66927083334
22	38030	37906.3203125	37374.625	531.695312499996	123.679687500007
23	27534	28119.4869791667	36856.6666666667	-8737.1796875	-585.486979166664
24	18387	19631.8411458333	36780.1666666667	-17148.3255208333	-1244.84114583334
25	50556	48373.1848958333	36874.7083333333	11498.4765625	2182.81510416667
26	43901	45300.3515625	36991.2083333333	8309.14322916667	-1399.35156250001
27	48572	51310.2473958333	37207.0833333333	14103.1640625	-2738.24739583334
28	43899	47247.0078125	37504.4166666667	9742.59114583333	-3348.00781250001
29	37532	37992.4140625	37810.25	182.164062500001	-460.4140625
30	40357	41403.3932291667	38261.75	3141.64322916667	-1046.39322916666
31	35489	34229.8307291667	38468.75	-4238.91927083333	1259.16927083334
32	29027	28354.4244791667	38598.2083333333	-10243.7838541667	672.575520833336
33	34485	32253.2057291667	39393.875	-7140.66927083333	2231.79427083334
34	42598	40872.2369791667	40340.5416666667	531.695312499996	1725.76302083334
35	30306	32093.8619791667	40831.0416666667	-8737.1796875	-1787.86197916666
36	26451	23911.1744791667	41059.5	-17148.3255208333	2539.82552083334
37	47460	52538.3932291667	41039.9166666667	11498.4765625	-5078.39322916666
38	50104	49218.2682291667	40909.125	8309.14322916667	885.731770833328
39	61465	55021.7057291667	40918.5416666667	14103.1640625	6443.29427083334
40	53726	50489.4244791667	40746.8333333333	9742.59114583333	3236.57552083334
41	39477	40925.5807291667	40743.4166666667	182.164062500001	-1448.58072916666
42	43895	43970.0182291667	40828.375	3141.64322916667	-75.0182291666642
43	31481	36698.8307291667	40937.75	-4238.91927083333	-5217.83072916667
44	29896	30671.9661458333	40915.75	-10243.7838541667	-775.966145833328
45	33842	33214.3723958333	40355.0416666667	-7140.66927083333	627.627604166672
46	39120	40298.8619791667	39767.1666666667	531.695312499996	-1178.86197916666
47	33702	30909.4036458333	39646.5833333333	-8737.1796875	2792.59635416667
48	25094	22829.8411458333	39978.1666666667	-17148.3255208333	2264.15885416666
49	51442	51766.4765625	40268	11498.4765625	-324.4765625
50	45594	48775.0182291667	40465.875	8309.14322916667	-3181.01822916666
51	52518	54789.2890625	40686.125	14103.1640625	-2271.2890625
52	48564	50416.9244791667	40674.3333333333	9742.59114583333	-1852.92447916666
53	41745	40852.0390625	40669.875	182.164062500001	892.9609375
54	49585	43722.2265625	40580.5833333333	3141.64322916667	5862.7734375
55	32747	NA	NA	-4238.91927083333	NA
56	33379	NA	NA	-10243.7838541667	NA
57	35645	NA	NA	-7140.66927083333	NA
58	37034	NA	NA	531.695312499996	NA
59	35681	NA	NA	-8737.1796875	NA
60	20972	NA	NA	-17148.3255208333	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