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

Fri, 04 Dec 2009 09:17:30 -0700

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/2009/Dec/04/t1259943509lluy6om0dk5605y.htm/, Retrieved Sun, 28 Apr 2024 18:49:00 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=63843, Retrieved Sun, 28 Apr 2024 18:49:00 +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

ShwWs9 forcasting1

Estimated Impact

147

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

-     [Univariate Data Series] [data set] [2008-12-01 19:54:57] [b98453cac15ba1066b407e146608df68]
- RMP   [Classical Decomposition] [] [2009-11-27 14:58:37] [b98453cac15ba1066b407e146608df68]
-    D      [Classical Decomposition] [WS9 forcasting1] [2009-12-04 16:17:30] [51108381f3361ca8af49c4f74052c840] [Current]
-             [Classical Decomposition] [workshop Forecast 1] [2010-12-03 09:12:58] [814f53995537cd15c528d8efbf1cf544] 

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=63843&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=63843&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63843&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	58608	NA	NA	1.28959004955486	NA
2	46865	NA	NA	1.20769812338532	NA
3	51378	NA	NA	1.35205990824657	NA
4	46235	NA	NA	1.24280523930081	NA
5	47206	NA	NA	1.00455825076067	NA
6	45382	NA	NA	1.07775085933368	NA
7	41227	37171.8520969575	41557.125	0.894476027804076	1.10909189815093
8	33795	31004.7828093539	41727.9583333333	0.743021802353231	1.08999312163555
9	31295	34634.9384726887	42079.8333333333	0.823076892874783	0.903567362323383
10	42625	42995.4823422151	42426.9583333333	1.01340006522304	0.991383226282558
11	33625	33161.5347363842	42444.5	0.78129168058015	1.01397598957045
12	21538	23899.2301800709	41908.5416666667	0.570271100582818	0.901200575822737
13	56421	53344.5909277803	41365.5416666667	1.28959004955486	1.05767049702161
14	53152	49287.7203587641	40811.2916666667	1.20769812338532	1.07840248266927
15	53536	54798.5373945974	40529.6666666667	1.35205990824657	0.976960381524309
16	52408	50164.7460297929	40364.125	1.24280523930081	1.04471773800818
17	41454	40100.8352423338	39918.875	1.00455825076067	1.03374405419460
18	38271	42607.5779414685	39533.7916666667	1.07775085933368	0.898220500883063
19	35306	35026.0041062555	39158.125	0.894476027804076	1.00799394338261
20	26414	28627.3607157577	38528.2916666667	0.743021802353231	0.92268373121315
21	31917	31224.2450080978	37936	0.823076892874783	1.02218644491556
22	38030	37875.4474126866	37374.625	1.01340006522304	1.0040805481617
23	27534	28795.8070405824	36856.6666666667	0.78129168058015	0.95618087595864
24	18387	20974.6661246195	36780.1666666667	0.570271100582818	0.876628971863245
25	50556	47553.2569469043	36874.7083333333	1.28959004955486	1.06314484529311
26	43901	44674.2128859219	36991.2083333333	1.20769812338532	0.982692187819932
27	48572	50306.2056777892	37207.0833333333	1.35205990824657	0.965527002992498
28	43899	46610.685530254	37504.4166666667	1.24280523930081	0.941822663635918
29	37532	37982.5986008236	37810.25	1.00455825076067	0.9881367095085
30	40357	41236.6339421103	38261.75	1.07775085933368	0.978668628886025
31	35489	34409.3746945881	38468.75	0.894476027804076	1.03137590598476
32	29027	28679.3103234389	38598.2083333333	0.743021802353231	1.01212336254394
33	34485	32424.1882332976	39393.875	0.823076892874783	1.06355785230071
34	42598	40881.1075561327	40340.5416666667	1.01340006522304	1.04199720962819
35	30306	31900.9531635881	40831.0416666667	0.78129168058015	0.950002962124386
36	26451	23415.0462543802	41059.5	0.570271100582818	1.12965824250942
37	47460	52924.668167894	41039.9166666667	1.28959004955486	0.896746293230251
38	50104	49405.8734918353	40909.125	1.20769812338532	1.01413043548921
39	61465	55324.3196914168	40918.5416666667	1.35205990824657	1.11099423079821
40	53726	50640.3779515836	40746.8333333333	1.24280523930081	1.06093205013925
41	39477	40929.1353766798	40743.4166666667	1.00455825076067	0.964520741439674
42	43895	44002.8162414476	40828.375	1.07775085933368	0.997549787703224
43	31481	36617.8360072363	40937.75	0.894476027804076	0.85971765217854
44	29896	30401.2943096342	40915.75	0.743021802353231	0.9833791843042
45	33842	33215.3023068324	40355.0416666667	0.823076892874783	1.01886774015718
46	39120	40300.0492937355	39767.1666666667	1.01340006522304	0.970718415624398
47	33702	30975.5457217609	39646.5833333333	0.78129168058015	1.08801957204336
48	25094	22798.3931042833	39978.1666666667	0.570271100582818	1.10069160950143
49	51442	51929.2121154751	40268	1.28959004955486	0.990617764151867
50	45594	48870.5612986448	40465.875	1.20769812338532	0.932954293718423
51	52518	55010.0784344085	40686.125	1.35205990824657	0.954697784381821
52	48564	50550.2745717343	40674.3333333333	1.24280523930081	0.960706947913495
53	41745	40855.2584886551	40669.875	1.00455825076067	1.02177789455406
54	49585	43735.7585597619	40580.5833333333	1.07775085933368	1.13374048222453
55	32747	NA	NA	0.894476027804076	NA
56	33379	NA	NA	0.743021802353231	NA
57	35645	NA	NA	0.823076892874783	NA
58	37034	NA	NA	1.01340006522304	NA
59	35681	NA	NA	0.78129168058015	NA
60	20972	NA	NA	0.570271100582818	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 58608 & NA & NA & 1.28959004955486 & NA \tabularnewline
2 & 46865 & NA & NA & 1.20769812338532 & NA \tabularnewline
3 & 51378 & NA & NA & 1.35205990824657 & NA \tabularnewline
4 & 46235 & NA & NA & 1.24280523930081 & NA \tabularnewline
5 & 47206 & NA & NA & 1.00455825076067 & NA \tabularnewline
6 & 45382 & NA & NA & 1.07775085933368 & NA \tabularnewline
7 & 41227 & 37171.8520969575 & 41557.125 & 0.894476027804076 & 1.10909189815093 \tabularnewline
8 & 33795 & 31004.7828093539 & 41727.9583333333 & 0.743021802353231 & 1.08999312163555 \tabularnewline
9 & 31295 & 34634.9384726887 & 42079.8333333333 & 0.823076892874783 & 0.903567362323383 \tabularnewline
10 & 42625 & 42995.4823422151 & 42426.9583333333 & 1.01340006522304 & 0.991383226282558 \tabularnewline
11 & 33625 & 33161.5347363842 & 42444.5 & 0.78129168058015 & 1.01397598957045 \tabularnewline
12 & 21538 & 23899.2301800709 & 41908.5416666667 & 0.570271100582818 & 0.901200575822737 \tabularnewline
13 & 56421 & 53344.5909277803 & 41365.5416666667 & 1.28959004955486 & 1.05767049702161 \tabularnewline
14 & 53152 & 49287.7203587641 & 40811.2916666667 & 1.20769812338532 & 1.07840248266927 \tabularnewline
15 & 53536 & 54798.5373945974 & 40529.6666666667 & 1.35205990824657 & 0.976960381524309 \tabularnewline
16 & 52408 & 50164.7460297929 & 40364.125 & 1.24280523930081 & 1.04471773800818 \tabularnewline
17 & 41454 & 40100.8352423338 & 39918.875 & 1.00455825076067 & 1.03374405419460 \tabularnewline
18 & 38271 & 42607.5779414685 & 39533.7916666667 & 1.07775085933368 & 0.898220500883063 \tabularnewline
19 & 35306 & 35026.0041062555 & 39158.125 & 0.894476027804076 & 1.00799394338261 \tabularnewline
20 & 26414 & 28627.3607157577 & 38528.2916666667 & 0.743021802353231 & 0.92268373121315 \tabularnewline
21 & 31917 & 31224.2450080978 & 37936 & 0.823076892874783 & 1.02218644491556 \tabularnewline
22 & 38030 & 37875.4474126866 & 37374.625 & 1.01340006522304 & 1.0040805481617 \tabularnewline
23 & 27534 & 28795.8070405824 & 36856.6666666667 & 0.78129168058015 & 0.95618087595864 \tabularnewline
24 & 18387 & 20974.6661246195 & 36780.1666666667 & 0.570271100582818 & 0.876628971863245 \tabularnewline
25 & 50556 & 47553.2569469043 & 36874.7083333333 & 1.28959004955486 & 1.06314484529311 \tabularnewline
26 & 43901 & 44674.2128859219 & 36991.2083333333 & 1.20769812338532 & 0.982692187819932 \tabularnewline
27 & 48572 & 50306.2056777892 & 37207.0833333333 & 1.35205990824657 & 0.965527002992498 \tabularnewline
28 & 43899 & 46610.685530254 & 37504.4166666667 & 1.24280523930081 & 0.941822663635918 \tabularnewline
29 & 37532 & 37982.5986008236 & 37810.25 & 1.00455825076067 & 0.9881367095085 \tabularnewline
30 & 40357 & 41236.6339421103 & 38261.75 & 1.07775085933368 & 0.978668628886025 \tabularnewline
31 & 35489 & 34409.3746945881 & 38468.75 & 0.894476027804076 & 1.03137590598476 \tabularnewline
32 & 29027 & 28679.3103234389 & 38598.2083333333 & 0.743021802353231 & 1.01212336254394 \tabularnewline
33 & 34485 & 32424.1882332976 & 39393.875 & 0.823076892874783 & 1.06355785230071 \tabularnewline
34 & 42598 & 40881.1075561327 & 40340.5416666667 & 1.01340006522304 & 1.04199720962819 \tabularnewline
35 & 30306 & 31900.9531635881 & 40831.0416666667 & 0.78129168058015 & 0.950002962124386 \tabularnewline
36 & 26451 & 23415.0462543802 & 41059.5 & 0.570271100582818 & 1.12965824250942 \tabularnewline
37 & 47460 & 52924.668167894 & 41039.9166666667 & 1.28959004955486 & 0.896746293230251 \tabularnewline
38 & 50104 & 49405.8734918353 & 40909.125 & 1.20769812338532 & 1.01413043548921 \tabularnewline
39 & 61465 & 55324.3196914168 & 40918.5416666667 & 1.35205990824657 & 1.11099423079821 \tabularnewline
40 & 53726 & 50640.3779515836 & 40746.8333333333 & 1.24280523930081 & 1.06093205013925 \tabularnewline
41 & 39477 & 40929.1353766798 & 40743.4166666667 & 1.00455825076067 & 0.964520741439674 \tabularnewline
42 & 43895 & 44002.8162414476 & 40828.375 & 1.07775085933368 & 0.997549787703224 \tabularnewline
43 & 31481 & 36617.8360072363 & 40937.75 & 0.894476027804076 & 0.85971765217854 \tabularnewline
44 & 29896 & 30401.2943096342 & 40915.75 & 0.743021802353231 & 0.9833791843042 \tabularnewline
45 & 33842 & 33215.3023068324 & 40355.0416666667 & 0.823076892874783 & 1.01886774015718 \tabularnewline
46 & 39120 & 40300.0492937355 & 39767.1666666667 & 1.01340006522304 & 0.970718415624398 \tabularnewline
47 & 33702 & 30975.5457217609 & 39646.5833333333 & 0.78129168058015 & 1.08801957204336 \tabularnewline
48 & 25094 & 22798.3931042833 & 39978.1666666667 & 0.570271100582818 & 1.10069160950143 \tabularnewline
49 & 51442 & 51929.2121154751 & 40268 & 1.28959004955486 & 0.990617764151867 \tabularnewline
50 & 45594 & 48870.5612986448 & 40465.875 & 1.20769812338532 & 0.932954293718423 \tabularnewline
51 & 52518 & 55010.0784344085 & 40686.125 & 1.35205990824657 & 0.954697784381821 \tabularnewline
52 & 48564 & 50550.2745717343 & 40674.3333333333 & 1.24280523930081 & 0.960706947913495 \tabularnewline
53 & 41745 & 40855.2584886551 & 40669.875 & 1.00455825076067 & 1.02177789455406 \tabularnewline
54 & 49585 & 43735.7585597619 & 40580.5833333333 & 1.07775085933368 & 1.13374048222453 \tabularnewline
55 & 32747 & NA & NA & 0.894476027804076 & NA \tabularnewline
56 & 33379 & NA & NA & 0.743021802353231 & NA \tabularnewline
57 & 35645 & NA & NA & 0.823076892874783 & NA \tabularnewline
58 & 37034 & NA & NA & 1.01340006522304 & NA \tabularnewline
59 & 35681 & NA & NA & 0.78129168058015 & NA \tabularnewline
60 & 20972 & NA & NA & 0.570271100582818 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63843&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]1.28959004955486[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]46865[/C][C]NA[/C][C]NA[/C][C]1.20769812338532[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]51378[/C][C]NA[/C][C]NA[/C][C]1.35205990824657[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]46235[/C][C]NA[/C][C]NA[/C][C]1.24280523930081[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]47206[/C][C]NA[/C][C]NA[/C][C]1.00455825076067[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]45382[/C][C]NA[/C][C]NA[/C][C]1.07775085933368[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]41227[/C][C]37171.8520969575[/C][C]41557.125[/C][C]0.894476027804076[/C][C]1.10909189815093[/C][/ROW]
[ROW][C]8[/C][C]33795[/C][C]31004.7828093539[/C][C]41727.9583333333[/C][C]0.743021802353231[/C][C]1.08999312163555[/C][/ROW]
[ROW][C]9[/C][C]31295[/C][C]34634.9384726887[/C][C]42079.8333333333[/C][C]0.823076892874783[/C][C]0.903567362323383[/C][/ROW]
[ROW][C]10[/C][C]42625[/C][C]42995.4823422151[/C][C]42426.9583333333[/C][C]1.01340006522304[/C][C]0.991383226282558[/C][/ROW]
[ROW][C]11[/C][C]33625[/C][C]33161.5347363842[/C][C]42444.5[/C][C]0.78129168058015[/C][C]1.01397598957045[/C][/ROW]
[ROW][C]12[/C][C]21538[/C][C]23899.2301800709[/C][C]41908.5416666667[/C][C]0.570271100582818[/C][C]0.901200575822737[/C][/ROW]
[ROW][C]13[/C][C]56421[/C][C]53344.5909277803[/C][C]41365.5416666667[/C][C]1.28959004955486[/C][C]1.05767049702161[/C][/ROW]
[ROW][C]14[/C][C]53152[/C][C]49287.7203587641[/C][C]40811.2916666667[/C][C]1.20769812338532[/C][C]1.07840248266927[/C][/ROW]
[ROW][C]15[/C][C]53536[/C][C]54798.5373945974[/C][C]40529.6666666667[/C][C]1.35205990824657[/C][C]0.976960381524309[/C][/ROW]
[ROW][C]16[/C][C]52408[/C][C]50164.7460297929[/C][C]40364.125[/C][C]1.24280523930081[/C][C]1.04471773800818[/C][/ROW]
[ROW][C]17[/C][C]41454[/C][C]40100.8352423338[/C][C]39918.875[/C][C]1.00455825076067[/C][C]1.03374405419460[/C][/ROW]
[ROW][C]18[/C][C]38271[/C][C]42607.5779414685[/C][C]39533.7916666667[/C][C]1.07775085933368[/C][C]0.898220500883063[/C][/ROW]
[ROW][C]19[/C][C]35306[/C][C]35026.0041062555[/C][C]39158.125[/C][C]0.894476027804076[/C][C]1.00799394338261[/C][/ROW]
[ROW][C]20[/C][C]26414[/C][C]28627.3607157577[/C][C]38528.2916666667[/C][C]0.743021802353231[/C][C]0.92268373121315[/C][/ROW]
[ROW][C]21[/C][C]31917[/C][C]31224.2450080978[/C][C]37936[/C][C]0.823076892874783[/C][C]1.02218644491556[/C][/ROW]
[ROW][C]22[/C][C]38030[/C][C]37875.4474126866[/C][C]37374.625[/C][C]1.01340006522304[/C][C]1.0040805481617[/C][/ROW]
[ROW][C]23[/C][C]27534[/C][C]28795.8070405824[/C][C]36856.6666666667[/C][C]0.78129168058015[/C][C]0.95618087595864[/C][/ROW]
[ROW][C]24[/C][C]18387[/C][C]20974.6661246195[/C][C]36780.1666666667[/C][C]0.570271100582818[/C][C]0.876628971863245[/C][/ROW]
[ROW][C]25[/C][C]50556[/C][C]47553.2569469043[/C][C]36874.7083333333[/C][C]1.28959004955486[/C][C]1.06314484529311[/C][/ROW]
[ROW][C]26[/C][C]43901[/C][C]44674.2128859219[/C][C]36991.2083333333[/C][C]1.20769812338532[/C][C]0.982692187819932[/C][/ROW]
[ROW][C]27[/C][C]48572[/C][C]50306.2056777892[/C][C]37207.0833333333[/C][C]1.35205990824657[/C][C]0.965527002992498[/C][/ROW]
[ROW][C]28[/C][C]43899[/C][C]46610.685530254[/C][C]37504.4166666667[/C][C]1.24280523930081[/C][C]0.941822663635918[/C][/ROW]
[ROW][C]29[/C][C]37532[/C][C]37982.5986008236[/C][C]37810.25[/C][C]1.00455825076067[/C][C]0.9881367095085[/C][/ROW]
[ROW][C]30[/C][C]40357[/C][C]41236.6339421103[/C][C]38261.75[/C][C]1.07775085933368[/C][C]0.978668628886025[/C][/ROW]
[ROW][C]31[/C][C]35489[/C][C]34409.3746945881[/C][C]38468.75[/C][C]0.894476027804076[/C][C]1.03137590598476[/C][/ROW]
[ROW][C]32[/C][C]29027[/C][C]28679.3103234389[/C][C]38598.2083333333[/C][C]0.743021802353231[/C][C]1.01212336254394[/C][/ROW]
[ROW][C]33[/C][C]34485[/C][C]32424.1882332976[/C][C]39393.875[/C][C]0.823076892874783[/C][C]1.06355785230071[/C][/ROW]
[ROW][C]34[/C][C]42598[/C][C]40881.1075561327[/C][C]40340.5416666667[/C][C]1.01340006522304[/C][C]1.04199720962819[/C][/ROW]
[ROW][C]35[/C][C]30306[/C][C]31900.9531635881[/C][C]40831.0416666667[/C][C]0.78129168058015[/C][C]0.950002962124386[/C][/ROW]
[ROW][C]36[/C][C]26451[/C][C]23415.0462543802[/C][C]41059.5[/C][C]0.570271100582818[/C][C]1.12965824250942[/C][/ROW]
[ROW][C]37[/C][C]47460[/C][C]52924.668167894[/C][C]41039.9166666667[/C][C]1.28959004955486[/C][C]0.896746293230251[/C][/ROW]
[ROW][C]38[/C][C]50104[/C][C]49405.8734918353[/C][C]40909.125[/C][C]1.20769812338532[/C][C]1.01413043548921[/C][/ROW]
[ROW][C]39[/C][C]61465[/C][C]55324.3196914168[/C][C]40918.5416666667[/C][C]1.35205990824657[/C][C]1.11099423079821[/C][/ROW]
[ROW][C]40[/C][C]53726[/C][C]50640.3779515836[/C][C]40746.8333333333[/C][C]1.24280523930081[/C][C]1.06093205013925[/C][/ROW]
[ROW][C]41[/C][C]39477[/C][C]40929.1353766798[/C][C]40743.4166666667[/C][C]1.00455825076067[/C][C]0.964520741439674[/C][/ROW]
[ROW][C]42[/C][C]43895[/C][C]44002.8162414476[/C][C]40828.375[/C][C]1.07775085933368[/C][C]0.997549787703224[/C][/ROW]
[ROW][C]43[/C][C]31481[/C][C]36617.8360072363[/C][C]40937.75[/C][C]0.894476027804076[/C][C]0.85971765217854[/C][/ROW]
[ROW][C]44[/C][C]29896[/C][C]30401.2943096342[/C][C]40915.75[/C][C]0.743021802353231[/C][C]0.9833791843042[/C][/ROW]
[ROW][C]45[/C][C]33842[/C][C]33215.3023068324[/C][C]40355.0416666667[/C][C]0.823076892874783[/C][C]1.01886774015718[/C][/ROW]
[ROW][C]46[/C][C]39120[/C][C]40300.0492937355[/C][C]39767.1666666667[/C][C]1.01340006522304[/C][C]0.970718415624398[/C][/ROW]
[ROW][C]47[/C][C]33702[/C][C]30975.5457217609[/C][C]39646.5833333333[/C][C]0.78129168058015[/C][C]1.08801957204336[/C][/ROW]
[ROW][C]48[/C][C]25094[/C][C]22798.3931042833[/C][C]39978.1666666667[/C][C]0.570271100582818[/C][C]1.10069160950143[/C][/ROW]
[ROW][C]49[/C][C]51442[/C][C]51929.2121154751[/C][C]40268[/C][C]1.28959004955486[/C][C]0.990617764151867[/C][/ROW]
[ROW][C]50[/C][C]45594[/C][C]48870.5612986448[/C][C]40465.875[/C][C]1.20769812338532[/C][C]0.932954293718423[/C][/ROW]
[ROW][C]51[/C][C]52518[/C][C]55010.0784344085[/C][C]40686.125[/C][C]1.35205990824657[/C][C]0.954697784381821[/C][/ROW]
[ROW][C]52[/C][C]48564[/C][C]50550.2745717343[/C][C]40674.3333333333[/C][C]1.24280523930081[/C][C]0.960706947913495[/C][/ROW]
[ROW][C]53[/C][C]41745[/C][C]40855.2584886551[/C][C]40669.875[/C][C]1.00455825076067[/C][C]1.02177789455406[/C][/ROW]
[ROW][C]54[/C][C]49585[/C][C]43735.7585597619[/C][C]40580.5833333333[/C][C]1.07775085933368[/C][C]1.13374048222453[/C][/ROW]
[ROW][C]55[/C][C]32747[/C][C]NA[/C][C]NA[/C][C]0.894476027804076[/C][C]NA[/C][/ROW]
[ROW][C]56[/C][C]33379[/C][C]NA[/C][C]NA[/C][C]0.743021802353231[/C][C]NA[/C][/ROW]
[ROW][C]57[/C][C]35645[/C][C]NA[/C][C]NA[/C][C]0.823076892874783[/C][C]NA[/C][/ROW]
[ROW][C]58[/C][C]37034[/C][C]NA[/C][C]NA[/C][C]1.01340006522304[/C][C]NA[/C][/ROW]
[ROW][C]59[/C][C]35681[/C][C]NA[/C][C]NA[/C][C]0.78129168058015[/C][C]NA[/C][/ROW]
[ROW][C]60[/C][C]20972[/C][C]NA[/C][C]NA[/C][C]0.570271100582818[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63843&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63843&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	1.28959004955486	NA
2	46865	NA	NA	1.20769812338532	NA
3	51378	NA	NA	1.35205990824657	NA
4	46235	NA	NA	1.24280523930081	NA
5	47206	NA	NA	1.00455825076067	NA
6	45382	NA	NA	1.07775085933368	NA
7	41227	37171.8520969575	41557.125	0.894476027804076	1.10909189815093
8	33795	31004.7828093539	41727.9583333333	0.743021802353231	1.08999312163555
9	31295	34634.9384726887	42079.8333333333	0.823076892874783	0.903567362323383
10	42625	42995.4823422151	42426.9583333333	1.01340006522304	0.991383226282558
11	33625	33161.5347363842	42444.5	0.78129168058015	1.01397598957045
12	21538	23899.2301800709	41908.5416666667	0.570271100582818	0.901200575822737
13	56421	53344.5909277803	41365.5416666667	1.28959004955486	1.05767049702161
14	53152	49287.7203587641	40811.2916666667	1.20769812338532	1.07840248266927
15	53536	54798.5373945974	40529.6666666667	1.35205990824657	0.976960381524309
16	52408	50164.7460297929	40364.125	1.24280523930081	1.04471773800818
17	41454	40100.8352423338	39918.875	1.00455825076067	1.03374405419460
18	38271	42607.5779414685	39533.7916666667	1.07775085933368	0.898220500883063
19	35306	35026.0041062555	39158.125	0.894476027804076	1.00799394338261
20	26414	28627.3607157577	38528.2916666667	0.743021802353231	0.92268373121315
21	31917	31224.2450080978	37936	0.823076892874783	1.02218644491556
22	38030	37875.4474126866	37374.625	1.01340006522304	1.0040805481617
23	27534	28795.8070405824	36856.6666666667	0.78129168058015	0.95618087595864
24	18387	20974.6661246195	36780.1666666667	0.570271100582818	0.876628971863245
25	50556	47553.2569469043	36874.7083333333	1.28959004955486	1.06314484529311
26	43901	44674.2128859219	36991.2083333333	1.20769812338532	0.982692187819932
27	48572	50306.2056777892	37207.0833333333	1.35205990824657	0.965527002992498
28	43899	46610.685530254	37504.4166666667	1.24280523930081	0.941822663635918
29	37532	37982.5986008236	37810.25	1.00455825076067	0.9881367095085
30	40357	41236.6339421103	38261.75	1.07775085933368	0.978668628886025
31	35489	34409.3746945881	38468.75	0.894476027804076	1.03137590598476
32	29027	28679.3103234389	38598.2083333333	0.743021802353231	1.01212336254394
33	34485	32424.1882332976	39393.875	0.823076892874783	1.06355785230071
34	42598	40881.1075561327	40340.5416666667	1.01340006522304	1.04199720962819
35	30306	31900.9531635881	40831.0416666667	0.78129168058015	0.950002962124386
36	26451	23415.0462543802	41059.5	0.570271100582818	1.12965824250942
37	47460	52924.668167894	41039.9166666667	1.28959004955486	0.896746293230251
38	50104	49405.8734918353	40909.125	1.20769812338532	1.01413043548921
39	61465	55324.3196914168	40918.5416666667	1.35205990824657	1.11099423079821
40	53726	50640.3779515836	40746.8333333333	1.24280523930081	1.06093205013925
41	39477	40929.1353766798	40743.4166666667	1.00455825076067	0.964520741439674
42	43895	44002.8162414476	40828.375	1.07775085933368	0.997549787703224
43	31481	36617.8360072363	40937.75	0.894476027804076	0.85971765217854
44	29896	30401.2943096342	40915.75	0.743021802353231	0.9833791843042
45	33842	33215.3023068324	40355.0416666667	0.823076892874783	1.01886774015718
46	39120	40300.0492937355	39767.1666666667	1.01340006522304	0.970718415624398
47	33702	30975.5457217609	39646.5833333333	0.78129168058015	1.08801957204336
48	25094	22798.3931042833	39978.1666666667	0.570271100582818	1.10069160950143
49	51442	51929.2121154751	40268	1.28959004955486	0.990617764151867
50	45594	48870.5612986448	40465.875	1.20769812338532	0.932954293718423
51	52518	55010.0784344085	40686.125	1.35205990824657	0.954697784381821
52	48564	50550.2745717343	40674.3333333333	1.24280523930081	0.960706947913495
53	41745	40855.2584886551	40669.875	1.00455825076067	1.02177789455406
54	49585	43735.7585597619	40580.5833333333	1.07775085933368	1.13374048222453
55	32747	NA	NA	0.894476027804076	NA
56	33379	NA	NA	0.743021802353231	NA
57	35645	NA	NA	0.823076892874783	NA
58	37034	NA	NA	1.01340006522304	NA
59	35681	NA	NA	0.78129168058015	NA
60	20972	NA	NA	0.570271100582818	NA

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Figure 3

PNG link

Postscript link

PDF link

Figure 4

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = multiplicative ; par2 = 12 ;

Parameters (R input):

par1 = multiplicative ; par2 = 12 ;

R code (references can be found in the software module):

par2 <- as.numeric(par2)
x <- ts(x,freq=par2)
m <- decompose(x,type=par1)
m$figure
bitmap(file='test1.png')
plot(m)
dev.off()
mylagmax <- length(x)/2
bitmap(file='test2.png')
op <- par(mfrow = c(2,2))
acf(as.numeric(x),lag.max = mylagmax,main='Observed')
acf(as.numeric(m$trend),na.action=na.pass,lag.max = mylagmax,main='Trend')
acf(as.numeric(m$seasonal),na.action=na.pass,lag.max = mylagmax,main='Seasonal')
acf(as.numeric(m$random),na.action=na.pass,lag.max = mylagmax,main='Random')
par(op)
dev.off()
bitmap(file='test3.png')
op <- par(mfrow = c(2,2))
spectrum(as.numeric(x),main='Observed')
spectrum(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
spectrum(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
spectrum(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
bitmap(file='test4.png')
op <- par(mfrow = c(2,2))
cpgram(as.numeric(x),main='Observed')
cpgram(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
cpgram(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
cpgram(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Classical Decomposition by Moving Averages',6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Observations',header=TRUE)
a<-table.element(a,'Fit',header=TRUE)
a<-table.element(a,'Trend',header=TRUE)
a<-table.element(a,'Seasonal',header=TRUE)
a<-table.element(a,'Random',header=TRUE)
a<-table.row.end(a)
for (i in 1:length(m$trend)) {
a<-table.row.start(a)
a<-table.element(a,i,header=TRUE)
a<-table.element(a,x[i])
if (par1 == 'additive') a<-table.element(a,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