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

Thu, 03 Dec 2009 16:59:13 -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/t1259884812r0oxctzz0bd6myl.htm/, Retrieved Sun, 28 Apr 2024 04:39:40 +0000

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

140

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]
F    D      [Classical Decomposition] [WS9] [2009-12-03 23:59:13] [557d56ec4b06cd0135c259898de8ce95] [Current]

Feedback Forum

2009-12-14 19:22:02 [f1e24346ff4ab8a20729561498ad5c34] [reply] 
We zien hier 4 grafieken onder elkaar. De oorspronkelijke reeks, de uitgezuiverde trend, uitgezuiverde saisonaliteit en wat overblijft. Als je de laatste 3 reeksen optelt krijg je opnieuw de oorspronkelijke reeks. Bij de ACF van je random reeks zie je dat de reeks nog autocorrelatie bevat en dus nog niet helemaal random is. 

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

10284,5
12792
12823,61538
13845,66667
15335,63636
11188,5
13633,25
12298,46667
15353,63636
12696,15385
12213,93333
13683,72727
11214,14286
13950,23077
11179,13333
11801,875
11188,82353
16456,27273
11110,0625
16530,69231
10038,41176
11681,25
11148,88235
8631
9386,444444
9764,736842
12043,75
12948,06667
10987,125
11648,3125
10633,35294
10219,3
9037,6
10296,31579
11705,41176
10681,94444
9362,947368
11306,35294
10984,45
10062,61905
8118,583333
8867,48
8346,72
8529,307692
10697,18182
8591,84
8695,607143
8125,571429
7009,758621
7883,466667
7527,645161
6763,758621
6682,333333
7855,681818
6738,88
7895,434783
6361,884615
6935,956522
8344,454545
9107,944444

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	'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 & 1 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63155&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]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63155&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63155&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	'Gwilym Jenkins' @ 72.249.127.135

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	10284.5	NA	NA	0.877942965248289	NA
2	12792	NA	NA	1.02694834303885	NA
3	12823.61538	NA	NA	1.02062529748104	NA
4	13845.66667	NA	NA	1.02058053929210	NA
5	15335.63636	NA	NA	0.919357225700753	NA
6	11188.5	NA	NA	1.10783436799676	NA
7	13633.25	12596.7215696045	13051.1589433333	0.965180305005715	1.08228557126297
8	12298.46667	13905.8663095418	13138.1536779167	1.05843382947450	0.884408522003493
9	15353.63636	13434.0784600241	13117.8932079167	1.02410335616367	1.14288720329333
10	12696.15385	12837.0718419931	12964.21513625	0.990192750357763	0.989022575106875
11	12213.93333	12985.6968595530	12706.2732820833	1.02199099383953	0.940568185296486
12	13683.72727	12329.7088769147	12752.9799445833	0.966810026401049	1.10981754772982
13	11214.14286	11296.7885822662	12867.3376625	0.877942965248289	0.992684140128463
14	13950.23077	13287.220003745	12938.547585	1.02694834303885	1.04989838100582
15	11179.13333	13159.3533055915	12893.4226283333	1.02062529748104	0.84951996275151
16	11801.875	12889.592639875	12629.66727625	1.02058053929210	0.915612721808597
17	11188.82353	11531.4999726963	12543.0024916667	0.919357225700753	0.970283445908367
18	16456.27273	13613.1740297568	12288.0950645833	1.10783436799676	1.20884906738344
19	11110.0625	11583.5252022828	12001.410661	0.965180305005715	0.95912619914795
20	16530.69231	12437.5087866838	11750.86098	1.05843382947450	1.32909995028092
21	10038.41176	11892.3911030421	11612.49109425	1.02410335616367	0.844103735995709
22	11681.25	11581.5664884799	11696.2747750833	0.990192750357763	1.00860708364618
23	11148.88235	11993.7067933919	11735.6286559167	1.02199099383953	0.9295610224641
24	8631	11144.3156040757	11526.89287425	0.966810026401049	0.774475553872817
25	9386.444444	9926.63623237714	11306.6982996667	0.877942965248289	0.945581587183056
26	9764.736842	11320.9355020922	11023.86072175	1.02694834303885	0.8625379802045
27	12043.75	10940.2719429345	10719.1855521667	1.02062529748104	1.10086385994985
28	12948.06667	10838.3402587408	10619.7794700833	1.02058053929210	1.19465401167469
29	10987.125	9731.63766039107	10585.2626034167	0.919357225700753	1.12901090067491
30	11648.3125	11847.0780873643	10693.9073471667	1.10783436799676	0.983222395775691
31	10633.35294	10403.0842660899	10778.3843206667	0.965180305005715	1.02213465430254
32	10219.3	11475.1577808233	10841.6392799167	1.05843382947450	0.890558560953119
33	9037.6	11123.5400701574	10861.735784	1.02410335616367	0.812475160155745
34	10296.31579	10592.4595089802	10697.3712998333	0.990192750357763	0.972042024920737
35	11705.41176	10687.5952416053	10457.6217462083	1.02199099383953	1.09523344544641
36	10681.94444	9882.9555737294	10222.2311559167	0.966810026401049	1.08084513385798
37	9362.947368	8789.1631977003	10011.0867625833	0.877942965248289	1.06528313986135
38	11306.35294	10110.7110999647	9845.39404391667	1.02694834303885	1.11825497022058
39	10984.45	10047.1649868338	9844.12694025	1.02062529748104	1.09328850619996
40	10062.61905	10044.8153018688	9842.25635816667	1.02058053929210	1.00177243160736
41	8118.583333	8867.96167690658	9645.828007875	0.919357225700753	0.915495987555058
42	8867.48	10429.0463217983	9413.90394004167	1.10783436799676	0.850267582134106
43	8346.72	8888.67249635097	9209.33886679167	0.965180305005715	0.939028859869294
44	8529.307692	9492.74275359201	8968.66907429167	1.05843382947450	0.898508251345223
45	10697.18182	8891.28098442138	8682.01527795833	1.02410335616367	1.20310918513798
46	8591.84	8318.1431378873	8400.529225125	0.990192750357763	1.03290360090897
47	8695.607143	8383.63020267708	8203.23295725	1.02199099383953	1.03721263137576
48	8125.571429	7832.35130832822	8101.23094966667	0.966810026401049	1.03743704912214
49	7009.758621	7016.58985072062	7992.07935875	0.877942965248289	0.999026417409888
50	7883.466667	8111.53084834217	7898.67465420833	1.02694834303885	0.971883953151854
51	7527.645161	7850.26797174752	7691.62589945833	1.02062529748104	0.958902955681436
52	6763.758621	7595.1536079834	7441.993371	1.02058053929210	0.890536119492105
53	6682.333333	6764.96774929959	7358.36686783333	0.919357225700753	0.98778495044442
54	7855.681818	8180.98869483667	7384.66771854167	1.10783436799676	0.960236239289514
55	6738.88	NA	NA	0.965180305005715	NA
56	7895.434783	NA	NA	1.05843382947450	NA
57	6361.884615	NA	NA	1.02410335616367	NA
58	6935.956522	NA	NA	0.990192750357763	NA
59	8344.454545	NA	NA	1.02199099383953	NA
60	9107.944444	NA	NA	0.966810026401049	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 10284.5 & NA & NA & 0.877942965248289 & NA \tabularnewline
2 & 12792 & NA & NA & 1.02694834303885 & NA \tabularnewline
3 & 12823.61538 & NA & NA & 1.02062529748104 & NA \tabularnewline
4 & 13845.66667 & NA & NA & 1.02058053929210 & NA \tabularnewline
5 & 15335.63636 & NA & NA & 0.919357225700753 & NA \tabularnewline
6 & 11188.5 & NA & NA & 1.10783436799676 & NA \tabularnewline
7 & 13633.25 & 12596.7215696045 & 13051.1589433333 & 0.965180305005715 & 1.08228557126297 \tabularnewline
8 & 12298.46667 & 13905.8663095418 & 13138.1536779167 & 1.05843382947450 & 0.884408522003493 \tabularnewline
9 & 15353.63636 & 13434.0784600241 & 13117.8932079167 & 1.02410335616367 & 1.14288720329333 \tabularnewline
10 & 12696.15385 & 12837.0718419931 & 12964.21513625 & 0.990192750357763 & 0.989022575106875 \tabularnewline
11 & 12213.93333 & 12985.6968595530 & 12706.2732820833 & 1.02199099383953 & 0.940568185296486 \tabularnewline
12 & 13683.72727 & 12329.7088769147 & 12752.9799445833 & 0.966810026401049 & 1.10981754772982 \tabularnewline
13 & 11214.14286 & 11296.7885822662 & 12867.3376625 & 0.877942965248289 & 0.992684140128463 \tabularnewline
14 & 13950.23077 & 13287.220003745 & 12938.547585 & 1.02694834303885 & 1.04989838100582 \tabularnewline
15 & 11179.13333 & 13159.3533055915 & 12893.4226283333 & 1.02062529748104 & 0.84951996275151 \tabularnewline
16 & 11801.875 & 12889.592639875 & 12629.66727625 & 1.02058053929210 & 0.915612721808597 \tabularnewline
17 & 11188.82353 & 11531.4999726963 & 12543.0024916667 & 0.919357225700753 & 0.970283445908367 \tabularnewline
18 & 16456.27273 & 13613.1740297568 & 12288.0950645833 & 1.10783436799676 & 1.20884906738344 \tabularnewline
19 & 11110.0625 & 11583.5252022828 & 12001.410661 & 0.965180305005715 & 0.95912619914795 \tabularnewline
20 & 16530.69231 & 12437.5087866838 & 11750.86098 & 1.05843382947450 & 1.32909995028092 \tabularnewline
21 & 10038.41176 & 11892.3911030421 & 11612.49109425 & 1.02410335616367 & 0.844103735995709 \tabularnewline
22 & 11681.25 & 11581.5664884799 & 11696.2747750833 & 0.990192750357763 & 1.00860708364618 \tabularnewline
23 & 11148.88235 & 11993.7067933919 & 11735.6286559167 & 1.02199099383953 & 0.9295610224641 \tabularnewline
24 & 8631 & 11144.3156040757 & 11526.89287425 & 0.966810026401049 & 0.774475553872817 \tabularnewline
25 & 9386.444444 & 9926.63623237714 & 11306.6982996667 & 0.877942965248289 & 0.945581587183056 \tabularnewline
26 & 9764.736842 & 11320.9355020922 & 11023.86072175 & 1.02694834303885 & 0.8625379802045 \tabularnewline
27 & 12043.75 & 10940.2719429345 & 10719.1855521667 & 1.02062529748104 & 1.10086385994985 \tabularnewline
28 & 12948.06667 & 10838.3402587408 & 10619.7794700833 & 1.02058053929210 & 1.19465401167469 \tabularnewline
29 & 10987.125 & 9731.63766039107 & 10585.2626034167 & 0.919357225700753 & 1.12901090067491 \tabularnewline
30 & 11648.3125 & 11847.0780873643 & 10693.9073471667 & 1.10783436799676 & 0.983222395775691 \tabularnewline
31 & 10633.35294 & 10403.0842660899 & 10778.3843206667 & 0.965180305005715 & 1.02213465430254 \tabularnewline
32 & 10219.3 & 11475.1577808233 & 10841.6392799167 & 1.05843382947450 & 0.890558560953119 \tabularnewline
33 & 9037.6 & 11123.5400701574 & 10861.735784 & 1.02410335616367 & 0.812475160155745 \tabularnewline
34 & 10296.31579 & 10592.4595089802 & 10697.3712998333 & 0.990192750357763 & 0.972042024920737 \tabularnewline
35 & 11705.41176 & 10687.5952416053 & 10457.6217462083 & 1.02199099383953 & 1.09523344544641 \tabularnewline
36 & 10681.94444 & 9882.9555737294 & 10222.2311559167 & 0.966810026401049 & 1.08084513385798 \tabularnewline
37 & 9362.947368 & 8789.1631977003 & 10011.0867625833 & 0.877942965248289 & 1.06528313986135 \tabularnewline
38 & 11306.35294 & 10110.7110999647 & 9845.39404391667 & 1.02694834303885 & 1.11825497022058 \tabularnewline
39 & 10984.45 & 10047.1649868338 & 9844.12694025 & 1.02062529748104 & 1.09328850619996 \tabularnewline
40 & 10062.61905 & 10044.8153018688 & 9842.25635816667 & 1.02058053929210 & 1.00177243160736 \tabularnewline
41 & 8118.583333 & 8867.96167690658 & 9645.828007875 & 0.919357225700753 & 0.915495987555058 \tabularnewline
42 & 8867.48 & 10429.0463217983 & 9413.90394004167 & 1.10783436799676 & 0.850267582134106 \tabularnewline
43 & 8346.72 & 8888.67249635097 & 9209.33886679167 & 0.965180305005715 & 0.939028859869294 \tabularnewline
44 & 8529.307692 & 9492.74275359201 & 8968.66907429167 & 1.05843382947450 & 0.898508251345223 \tabularnewline
45 & 10697.18182 & 8891.28098442138 & 8682.01527795833 & 1.02410335616367 & 1.20310918513798 \tabularnewline
46 & 8591.84 & 8318.1431378873 & 8400.529225125 & 0.990192750357763 & 1.03290360090897 \tabularnewline
47 & 8695.607143 & 8383.63020267708 & 8203.23295725 & 1.02199099383953 & 1.03721263137576 \tabularnewline
48 & 8125.571429 & 7832.35130832822 & 8101.23094966667 & 0.966810026401049 & 1.03743704912214 \tabularnewline
49 & 7009.758621 & 7016.58985072062 & 7992.07935875 & 0.877942965248289 & 0.999026417409888 \tabularnewline
50 & 7883.466667 & 8111.53084834217 & 7898.67465420833 & 1.02694834303885 & 0.971883953151854 \tabularnewline
51 & 7527.645161 & 7850.26797174752 & 7691.62589945833 & 1.02062529748104 & 0.958902955681436 \tabularnewline
52 & 6763.758621 & 7595.1536079834 & 7441.993371 & 1.02058053929210 & 0.890536119492105 \tabularnewline
53 & 6682.333333 & 6764.96774929959 & 7358.36686783333 & 0.919357225700753 & 0.98778495044442 \tabularnewline
54 & 7855.681818 & 8180.98869483667 & 7384.66771854167 & 1.10783436799676 & 0.960236239289514 \tabularnewline
55 & 6738.88 & NA & NA & 0.965180305005715 & NA \tabularnewline
56 & 7895.434783 & NA & NA & 1.05843382947450 & NA \tabularnewline
57 & 6361.884615 & NA & NA & 1.02410335616367 & NA \tabularnewline
58 & 6935.956522 & NA & NA & 0.990192750357763 & NA \tabularnewline
59 & 8344.454545 & NA & NA & 1.02199099383953 & NA \tabularnewline
60 & 9107.944444 & NA & NA & 0.966810026401049 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63155&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]10284.5[/C][C]NA[/C][C]NA[/C][C]0.877942965248289[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]12792[/C][C]NA[/C][C]NA[/C][C]1.02694834303885[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]12823.61538[/C][C]NA[/C][C]NA[/C][C]1.02062529748104[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]13845.66667[/C][C]NA[/C][C]NA[/C][C]1.02058053929210[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]15335.63636[/C][C]NA[/C][C]NA[/C][C]0.919357225700753[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]11188.5[/C][C]NA[/C][C]NA[/C][C]1.10783436799676[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]13633.25[/C][C]12596.7215696045[/C][C]13051.1589433333[/C][C]0.965180305005715[/C][C]1.08228557126297[/C][/ROW]
[ROW][C]8[/C][C]12298.46667[/C][C]13905.8663095418[/C][C]13138.1536779167[/C][C]1.05843382947450[/C][C]0.884408522003493[/C][/ROW]
[ROW][C]9[/C][C]15353.63636[/C][C]13434.0784600241[/C][C]13117.8932079167[/C][C]1.02410335616367[/C][C]1.14288720329333[/C][/ROW]
[ROW][C]10[/C][C]12696.15385[/C][C]12837.0718419931[/C][C]12964.21513625[/C][C]0.990192750357763[/C][C]0.989022575106875[/C][/ROW]
[ROW][C]11[/C][C]12213.93333[/C][C]12985.6968595530[/C][C]12706.2732820833[/C][C]1.02199099383953[/C][C]0.940568185296486[/C][/ROW]
[ROW][C]12[/C][C]13683.72727[/C][C]12329.7088769147[/C][C]12752.9799445833[/C][C]0.966810026401049[/C][C]1.10981754772982[/C][/ROW]
[ROW][C]13[/C][C]11214.14286[/C][C]11296.7885822662[/C][C]12867.3376625[/C][C]0.877942965248289[/C][C]0.992684140128463[/C][/ROW]
[ROW][C]14[/C][C]13950.23077[/C][C]13287.220003745[/C][C]12938.547585[/C][C]1.02694834303885[/C][C]1.04989838100582[/C][/ROW]
[ROW][C]15[/C][C]11179.13333[/C][C]13159.3533055915[/C][C]12893.4226283333[/C][C]1.02062529748104[/C][C]0.84951996275151[/C][/ROW]
[ROW][C]16[/C][C]11801.875[/C][C]12889.592639875[/C][C]12629.66727625[/C][C]1.02058053929210[/C][C]0.915612721808597[/C][/ROW]
[ROW][C]17[/C][C]11188.82353[/C][C]11531.4999726963[/C][C]12543.0024916667[/C][C]0.919357225700753[/C][C]0.970283445908367[/C][/ROW]
[ROW][C]18[/C][C]16456.27273[/C][C]13613.1740297568[/C][C]12288.0950645833[/C][C]1.10783436799676[/C][C]1.20884906738344[/C][/ROW]
[ROW][C]19[/C][C]11110.0625[/C][C]11583.5252022828[/C][C]12001.410661[/C][C]0.965180305005715[/C][C]0.95912619914795[/C][/ROW]
[ROW][C]20[/C][C]16530.69231[/C][C]12437.5087866838[/C][C]11750.86098[/C][C]1.05843382947450[/C][C]1.32909995028092[/C][/ROW]
[ROW][C]21[/C][C]10038.41176[/C][C]11892.3911030421[/C][C]11612.49109425[/C][C]1.02410335616367[/C][C]0.844103735995709[/C][/ROW]
[ROW][C]22[/C][C]11681.25[/C][C]11581.5664884799[/C][C]11696.2747750833[/C][C]0.990192750357763[/C][C]1.00860708364618[/C][/ROW]
[ROW][C]23[/C][C]11148.88235[/C][C]11993.7067933919[/C][C]11735.6286559167[/C][C]1.02199099383953[/C][C]0.9295610224641[/C][/ROW]
[ROW][C]24[/C][C]8631[/C][C]11144.3156040757[/C][C]11526.89287425[/C][C]0.966810026401049[/C][C]0.774475553872817[/C][/ROW]
[ROW][C]25[/C][C]9386.444444[/C][C]9926.63623237714[/C][C]11306.6982996667[/C][C]0.877942965248289[/C][C]0.945581587183056[/C][/ROW]
[ROW][C]26[/C][C]9764.736842[/C][C]11320.9355020922[/C][C]11023.86072175[/C][C]1.02694834303885[/C][C]0.8625379802045[/C][/ROW]
[ROW][C]27[/C][C]12043.75[/C][C]10940.2719429345[/C][C]10719.1855521667[/C][C]1.02062529748104[/C][C]1.10086385994985[/C][/ROW]
[ROW][C]28[/C][C]12948.06667[/C][C]10838.3402587408[/C][C]10619.7794700833[/C][C]1.02058053929210[/C][C]1.19465401167469[/C][/ROW]
[ROW][C]29[/C][C]10987.125[/C][C]9731.63766039107[/C][C]10585.2626034167[/C][C]0.919357225700753[/C][C]1.12901090067491[/C][/ROW]
[ROW][C]30[/C][C]11648.3125[/C][C]11847.0780873643[/C][C]10693.9073471667[/C][C]1.10783436799676[/C][C]0.983222395775691[/C][/ROW]
[ROW][C]31[/C][C]10633.35294[/C][C]10403.0842660899[/C][C]10778.3843206667[/C][C]0.965180305005715[/C][C]1.02213465430254[/C][/ROW]
[ROW][C]32[/C][C]10219.3[/C][C]11475.1577808233[/C][C]10841.6392799167[/C][C]1.05843382947450[/C][C]0.890558560953119[/C][/ROW]
[ROW][C]33[/C][C]9037.6[/C][C]11123.5400701574[/C][C]10861.735784[/C][C]1.02410335616367[/C][C]0.812475160155745[/C][/ROW]
[ROW][C]34[/C][C]10296.31579[/C][C]10592.4595089802[/C][C]10697.3712998333[/C][C]0.990192750357763[/C][C]0.972042024920737[/C][/ROW]
[ROW][C]35[/C][C]11705.41176[/C][C]10687.5952416053[/C][C]10457.6217462083[/C][C]1.02199099383953[/C][C]1.09523344544641[/C][/ROW]
[ROW][C]36[/C][C]10681.94444[/C][C]9882.9555737294[/C][C]10222.2311559167[/C][C]0.966810026401049[/C][C]1.08084513385798[/C][/ROW]
[ROW][C]37[/C][C]9362.947368[/C][C]8789.1631977003[/C][C]10011.0867625833[/C][C]0.877942965248289[/C][C]1.06528313986135[/C][/ROW]
[ROW][C]38[/C][C]11306.35294[/C][C]10110.7110999647[/C][C]9845.39404391667[/C][C]1.02694834303885[/C][C]1.11825497022058[/C][/ROW]
[ROW][C]39[/C][C]10984.45[/C][C]10047.1649868338[/C][C]9844.12694025[/C][C]1.02062529748104[/C][C]1.09328850619996[/C][/ROW]
[ROW][C]40[/C][C]10062.61905[/C][C]10044.8153018688[/C][C]9842.25635816667[/C][C]1.02058053929210[/C][C]1.00177243160736[/C][/ROW]
[ROW][C]41[/C][C]8118.583333[/C][C]8867.96167690658[/C][C]9645.828007875[/C][C]0.919357225700753[/C][C]0.915495987555058[/C][/ROW]
[ROW][C]42[/C][C]8867.48[/C][C]10429.0463217983[/C][C]9413.90394004167[/C][C]1.10783436799676[/C][C]0.850267582134106[/C][/ROW]
[ROW][C]43[/C][C]8346.72[/C][C]8888.67249635097[/C][C]9209.33886679167[/C][C]0.965180305005715[/C][C]0.939028859869294[/C][/ROW]
[ROW][C]44[/C][C]8529.307692[/C][C]9492.74275359201[/C][C]8968.66907429167[/C][C]1.05843382947450[/C][C]0.898508251345223[/C][/ROW]
[ROW][C]45[/C][C]10697.18182[/C][C]8891.28098442138[/C][C]8682.01527795833[/C][C]1.02410335616367[/C][C]1.20310918513798[/C][/ROW]
[ROW][C]46[/C][C]8591.84[/C][C]8318.1431378873[/C][C]8400.529225125[/C][C]0.990192750357763[/C][C]1.03290360090897[/C][/ROW]
[ROW][C]47[/C][C]8695.607143[/C][C]8383.63020267708[/C][C]8203.23295725[/C][C]1.02199099383953[/C][C]1.03721263137576[/C][/ROW]
[ROW][C]48[/C][C]8125.571429[/C][C]7832.35130832822[/C][C]8101.23094966667[/C][C]0.966810026401049[/C][C]1.03743704912214[/C][/ROW]
[ROW][C]49[/C][C]7009.758621[/C][C]7016.58985072062[/C][C]7992.07935875[/C][C]0.877942965248289[/C][C]0.999026417409888[/C][/ROW]
[ROW][C]50[/C][C]7883.466667[/C][C]8111.53084834217[/C][C]7898.67465420833[/C][C]1.02694834303885[/C][C]0.971883953151854[/C][/ROW]
[ROW][C]51[/C][C]7527.645161[/C][C]7850.26797174752[/C][C]7691.62589945833[/C][C]1.02062529748104[/C][C]0.958902955681436[/C][/ROW]
[ROW][C]52[/C][C]6763.758621[/C][C]7595.1536079834[/C][C]7441.993371[/C][C]1.02058053929210[/C][C]0.890536119492105[/C][/ROW]
[ROW][C]53[/C][C]6682.333333[/C][C]6764.96774929959[/C][C]7358.36686783333[/C][C]0.919357225700753[/C][C]0.98778495044442[/C][/ROW]
[ROW][C]54[/C][C]7855.681818[/C][C]8180.98869483667[/C][C]7384.66771854167[/C][C]1.10783436799676[/C][C]0.960236239289514[/C][/ROW]
[ROW][C]55[/C][C]6738.88[/C][C]NA[/C][C]NA[/C][C]0.965180305005715[/C][C]NA[/C][/ROW]
[ROW][C]56[/C][C]7895.434783[/C][C]NA[/C][C]NA[/C][C]1.05843382947450[/C][C]NA[/C][/ROW]
[ROW][C]57[/C][C]6361.884615[/C][C]NA[/C][C]NA[/C][C]1.02410335616367[/C][C]NA[/C][/ROW]
[ROW][C]58[/C][C]6935.956522[/C][C]NA[/C][C]NA[/C][C]0.990192750357763[/C][C]NA[/C][/ROW]
[ROW][C]59[/C][C]8344.454545[/C][C]NA[/C][C]NA[/C][C]1.02199099383953[/C][C]NA[/C][/ROW]
[ROW][C]60[/C][C]9107.944444[/C][C]NA[/C][C]NA[/C][C]0.966810026401049[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63155&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63155&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	10284.5	NA	NA	0.877942965248289	NA
2	12792	NA	NA	1.02694834303885	NA
3	12823.61538	NA	NA	1.02062529748104	NA
4	13845.66667	NA	NA	1.02058053929210	NA
5	15335.63636	NA	NA	0.919357225700753	NA
6	11188.5	NA	NA	1.10783436799676	NA
7	13633.25	12596.7215696045	13051.1589433333	0.965180305005715	1.08228557126297
8	12298.46667	13905.8663095418	13138.1536779167	1.05843382947450	0.884408522003493
9	15353.63636	13434.0784600241	13117.8932079167	1.02410335616367	1.14288720329333
10	12696.15385	12837.0718419931	12964.21513625	0.990192750357763	0.989022575106875
11	12213.93333	12985.6968595530	12706.2732820833	1.02199099383953	0.940568185296486
12	13683.72727	12329.7088769147	12752.9799445833	0.966810026401049	1.10981754772982
13	11214.14286	11296.7885822662	12867.3376625	0.877942965248289	0.992684140128463
14	13950.23077	13287.220003745	12938.547585	1.02694834303885	1.04989838100582
15	11179.13333	13159.3533055915	12893.4226283333	1.02062529748104	0.84951996275151
16	11801.875	12889.592639875	12629.66727625	1.02058053929210	0.915612721808597
17	11188.82353	11531.4999726963	12543.0024916667	0.919357225700753	0.970283445908367
18	16456.27273	13613.1740297568	12288.0950645833	1.10783436799676	1.20884906738344
19	11110.0625	11583.5252022828	12001.410661	0.965180305005715	0.95912619914795
20	16530.69231	12437.5087866838	11750.86098	1.05843382947450	1.32909995028092
21	10038.41176	11892.3911030421	11612.49109425	1.02410335616367	0.844103735995709
22	11681.25	11581.5664884799	11696.2747750833	0.990192750357763	1.00860708364618
23	11148.88235	11993.7067933919	11735.6286559167	1.02199099383953	0.9295610224641
24	8631	11144.3156040757	11526.89287425	0.966810026401049	0.774475553872817
25	9386.444444	9926.63623237714	11306.6982996667	0.877942965248289	0.945581587183056
26	9764.736842	11320.9355020922	11023.86072175	1.02694834303885	0.8625379802045
27	12043.75	10940.2719429345	10719.1855521667	1.02062529748104	1.10086385994985
28	12948.06667	10838.3402587408	10619.7794700833	1.02058053929210	1.19465401167469
29	10987.125	9731.63766039107	10585.2626034167	0.919357225700753	1.12901090067491
30	11648.3125	11847.0780873643	10693.9073471667	1.10783436799676	0.983222395775691
31	10633.35294	10403.0842660899	10778.3843206667	0.965180305005715	1.02213465430254
32	10219.3	11475.1577808233	10841.6392799167	1.05843382947450	0.890558560953119
33	9037.6	11123.5400701574	10861.735784	1.02410335616367	0.812475160155745
34	10296.31579	10592.4595089802	10697.3712998333	0.990192750357763	0.972042024920737
35	11705.41176	10687.5952416053	10457.6217462083	1.02199099383953	1.09523344544641
36	10681.94444	9882.9555737294	10222.2311559167	0.966810026401049	1.08084513385798
37	9362.947368	8789.1631977003	10011.0867625833	0.877942965248289	1.06528313986135
38	11306.35294	10110.7110999647	9845.39404391667	1.02694834303885	1.11825497022058
39	10984.45	10047.1649868338	9844.12694025	1.02062529748104	1.09328850619996
40	10062.61905	10044.8153018688	9842.25635816667	1.02058053929210	1.00177243160736
41	8118.583333	8867.96167690658	9645.828007875	0.919357225700753	0.915495987555058
42	8867.48	10429.0463217983	9413.90394004167	1.10783436799676	0.850267582134106
43	8346.72	8888.67249635097	9209.33886679167	0.965180305005715	0.939028859869294
44	8529.307692	9492.74275359201	8968.66907429167	1.05843382947450	0.898508251345223
45	10697.18182	8891.28098442138	8682.01527795833	1.02410335616367	1.20310918513798
46	8591.84	8318.1431378873	8400.529225125	0.990192750357763	1.03290360090897
47	8695.607143	8383.63020267708	8203.23295725	1.02199099383953	1.03721263137576
48	8125.571429	7832.35130832822	8101.23094966667	0.966810026401049	1.03743704912214
49	7009.758621	7016.58985072062	7992.07935875	0.877942965248289	0.999026417409888
50	7883.466667	8111.53084834217	7898.67465420833	1.02694834303885	0.971883953151854
51	7527.645161	7850.26797174752	7691.62589945833	1.02062529748104	0.958902955681436
52	6763.758621	7595.1536079834	7441.993371	1.02058053929210	0.890536119492105
53	6682.333333	6764.96774929959	7358.36686783333	0.919357225700753	0.98778495044442
54	7855.681818	8180.98869483667	7384.66771854167	1.10783436799676	0.960236239289514
55	6738.88	NA	NA	0.965180305005715	NA
56	7895.434783	NA	NA	1.05843382947450	NA
57	6361.884615	NA	NA	1.02410335616367	NA
58	6935.956522	NA	NA	0.990192750357763	NA
59	8344.454545	NA	NA	1.02199099383953	NA
60	9107.944444	NA	NA	0.966810026401049	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