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, 28 Nov 2011 11:44:10 -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/Nov/28/t1322498713pq4g7tzdpg39db2.htm/, Retrieved Fri, 26 Apr 2024 13:22:28 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=147857, Retrieved Fri, 26 Apr 2024 13:22:28 +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

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]
- RM D    [Classical Decomposition] [ws8 classical dec...] [2011-11-28 16:44:10] [cb05b01fd3da20a46af540a30bcf4c06] [Current]
-   P       [Classical Decomposition] [ws8 classical dec...] [2011-11-28 16:45:55] [620e5553455d245695b6e856984b13e0] 
- R PD        [Classical Decomposition] [ws8 classical dec...] [2011-11-28 20:29:42] [620e5553455d245695b6e856984b13e0] 
- RMP       [Decomposition by Loess] [ws8 seasonal deco...] [2011-11-28 16:58:30] [620e5553455d245695b6e856984b13e0] 
- R PD        [Decomposition by Loess] [ws8 seasonal deco...] [2011-11-28 20:30:50] [620e5553455d245695b6e856984b13e0] 
- RMP       [Structural Time Series Models] [ws8 structural ti...] [2011-11-28 17:02:41] [620e5553455d245695b6e856984b13e0] 
- R PD        [Structural Time Series Models] [ws8 structural ti...] [2011-11-28 20:32:01] [620e5553455d245695b6e856984b13e0] 
- R PD      [Classical Decomposition] [ws8 classical dec...] [2011-11-28 20:28:02] [620e5553455d245695b6e856984b13e0] 

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	2 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 & 2 seconds \tabularnewline
R Server & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=147857&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]2 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=147857&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	20995	NA	NA	-177.876736111111	NA
2	17382	NA	NA	-4625.69965277778	NA
3	9367	NA	NA	-10048.1996527778	NA
4	31124	NA	NA	4207.26909722222	NA
5	26551	NA	NA	3365.87326388889	NA
6	30651	NA	NA	7693.88368055556	NA
7	25859	28656.9357638889	22852.2916666667	5804.64409722222	-2797.93576388889
8	25100	24569.6753472222	23111.1666666667	1458.50868055556	530.324652777781
9	25778	25907.5503472222	23352.9583333333	2554.59201388889	-129.550347222223
10	20418	21537.2274305556	23511.8333333333	-1974.60590277778	-1119.22743055555
11	18688	19317.9774305556	23678.5833333333	-4360.60590277778	-629.977430555558
12	20424	19902.8003472222	23800.5833333333	-3897.78298611111	521.199652777777
13	24776	23849.4982638889	24027.375	-177.876736111111	926.501736111109
14	19814	19685.0503472222	24310.75	-4625.69965277778	128.949652777781
15	12738	14336.8420138889	24385.0416666667	-10048.1996527778	-1598.84201388888
16	31566	28627.4774305556	24420.2083333333	4207.26909722222	2938.52256944444
17	30111	27739.7482638889	24373.875	3365.87326388889	2371.25173611111
18	30019	32034.3003472222	24340.4166666667	7693.88368055556	-2015.30034722222
19	31934	30054.9774305556	24250.3333333333	5804.64409722222	1879.02256944445
20	25826	25438.0086805556	23979.5	1458.50868055556	387.991319444449
21	26835	26306.1336805556	23751.5416666667	2554.59201388889	528.866319444445
22	20205	21470.7690972222	23445.375	-1974.60590277778	-1265.76909722222
23	17789	18578.9357638889	22939.5416666667	-4360.60590277778	-789.935763888887
24	20520	18697.8420138889	22595.625	-3897.78298611111	1822.15798611111
25	22518	22085.5815972222	22263.4583333333	-177.876736111111	432.418402777777
26	15572	17177.3836805556	21803.0833333333	-4625.69965277778	-1605.38368055555
27	11509	11363.8003472222	21412	-10048.1996527778	145.199652777781
28	25447	25400.3940972222	21193.125	4207.26909722222	46.6059027777774
29	24090	24475.8732638889	21110	3365.87326388889	-385.873263888887
30	27786	28749.6336805556	21055.75	7693.88368055556	-963.633680555555
31	26195	26838.8524305556	21034.2083333333	5804.64409722222	-643.852430555555
32	20516	22622.9253472222	21164.4166666667	1458.50868055556	-2106.92534722222
33	22759	23976.8003472222	21422.2083333333	2554.59201388889	-1217.80034722222
34	19028	19661.8940972222	21636.5	-1974.60590277778	-633.894097222223
35	16971	17442.9357638889	21803.5416666667	-4360.60590277778	-471.935763888887
36	20036	18271.5503472222	22169.3333333333	-3897.78298611111	1764.44965277778
37	22485	22522.9149305556	22700.7916666667	-177.876736111111	-37.9149305555547
38	18730	18597.6336805556	23223.3333333333	-4625.69965277778	132.366319444445
39	14538	13737.5086805556	23785.7083333333	-10048.1996527778	800.491319444445
40	27561	28374.5607638889	24167.2916666667	4207.26909722222	-813.560763888887
41	25985	27821.2065972222	24455.3333333333	3365.87326388889	-1836.20659722222
42	34670	32320.8420138889	24626.9583333333	7693.88368055556	2349.15798611112
43	32066	30486.1024305556	24681.4583333333	5804.64409722222	1579.89756944445
44	27186	26365.8420138889	24907.3333333333	1458.50868055556	820.157986111109
45	29586	27681.8836805556	25127.2916666667	2554.59201388889	1904.11631944444
46	21359	23209.5607638889	25184.1666666667	-1974.60590277778	-1850.56076388889
47	21553	20908.4774305556	25269.0833333333	-4360.60590277778	644.522569444442
48	19573	21417.3836805556	25315.1666666667	-3897.78298611111	-1844.38368055555
49	24256	24927.5815972222	25105.4583333333	-177.876736111111	-671.581597222223
50	22380	20386.5086805556	25012.2083333333	-4625.69965277778	1993.49131944445
51	16167	14864.4253472222	24912.625	-10048.1996527778	1302.57465277778
52	27297	28819.1440972222	24611.875	4207.26909722222	-1522.14409722222
53	28287	27786.7482638889	24420.875	3365.87326388889	500.251736111117
54	33474	32194.8003472222	24500.9166666667	7693.88368055556	1279.19965277778
55	28229	30394.6440972222	24590	5804.64409722222	-2165.64409722222
56	28785	NA	NA	1458.50868055556	NA
57	25597	NA	NA	2554.59201388889	NA
58	18130	NA	NA	-1974.60590277778	NA
59	20198	NA	NA	-4360.60590277778	NA
60	22849	NA	NA	-3897.78298611111	NA
61	23118	NA	NA	NA	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 20995 & NA & NA & -177.876736111111 & NA \tabularnewline
2 & 17382 & NA & NA & -4625.69965277778 & NA \tabularnewline
3 & 9367 & NA & NA & -10048.1996527778 & NA \tabularnewline
4 & 31124 & NA & NA & 4207.26909722222 & NA \tabularnewline
5 & 26551 & NA & NA & 3365.87326388889 & NA \tabularnewline
6 & 30651 & NA & NA & 7693.88368055556 & NA \tabularnewline
7 & 25859 & 28656.9357638889 & 22852.2916666667 & 5804.64409722222 & -2797.93576388889 \tabularnewline
8 & 25100 & 24569.6753472222 & 23111.1666666667 & 1458.50868055556 & 530.324652777781 \tabularnewline
9 & 25778 & 25907.5503472222 & 23352.9583333333 & 2554.59201388889 & -129.550347222223 \tabularnewline
10 & 20418 & 21537.2274305556 & 23511.8333333333 & -1974.60590277778 & -1119.22743055555 \tabularnewline
11 & 18688 & 19317.9774305556 & 23678.5833333333 & -4360.60590277778 & -629.977430555558 \tabularnewline
12 & 20424 & 19902.8003472222 & 23800.5833333333 & -3897.78298611111 & 521.199652777777 \tabularnewline
13 & 24776 & 23849.4982638889 & 24027.375 & -177.876736111111 & 926.501736111109 \tabularnewline
14 & 19814 & 19685.0503472222 & 24310.75 & -4625.69965277778 & 128.949652777781 \tabularnewline
15 & 12738 & 14336.8420138889 & 24385.0416666667 & -10048.1996527778 & -1598.84201388888 \tabularnewline
16 & 31566 & 28627.4774305556 & 24420.2083333333 & 4207.26909722222 & 2938.52256944444 \tabularnewline
17 & 30111 & 27739.7482638889 & 24373.875 & 3365.87326388889 & 2371.25173611111 \tabularnewline
18 & 30019 & 32034.3003472222 & 24340.4166666667 & 7693.88368055556 & -2015.30034722222 \tabularnewline
19 & 31934 & 30054.9774305556 & 24250.3333333333 & 5804.64409722222 & 1879.02256944445 \tabularnewline
20 & 25826 & 25438.0086805556 & 23979.5 & 1458.50868055556 & 387.991319444449 \tabularnewline
21 & 26835 & 26306.1336805556 & 23751.5416666667 & 2554.59201388889 & 528.866319444445 \tabularnewline
22 & 20205 & 21470.7690972222 & 23445.375 & -1974.60590277778 & -1265.76909722222 \tabularnewline
23 & 17789 & 18578.9357638889 & 22939.5416666667 & -4360.60590277778 & -789.935763888887 \tabularnewline
24 & 20520 & 18697.8420138889 & 22595.625 & -3897.78298611111 & 1822.15798611111 \tabularnewline
25 & 22518 & 22085.5815972222 & 22263.4583333333 & -177.876736111111 & 432.418402777777 \tabularnewline
26 & 15572 & 17177.3836805556 & 21803.0833333333 & -4625.69965277778 & -1605.38368055555 \tabularnewline
27 & 11509 & 11363.8003472222 & 21412 & -10048.1996527778 & 145.199652777781 \tabularnewline
28 & 25447 & 25400.3940972222 & 21193.125 & 4207.26909722222 & 46.6059027777774 \tabularnewline
29 & 24090 & 24475.8732638889 & 21110 & 3365.87326388889 & -385.873263888887 \tabularnewline
30 & 27786 & 28749.6336805556 & 21055.75 & 7693.88368055556 & -963.633680555555 \tabularnewline
31 & 26195 & 26838.8524305556 & 21034.2083333333 & 5804.64409722222 & -643.852430555555 \tabularnewline
32 & 20516 & 22622.9253472222 & 21164.4166666667 & 1458.50868055556 & -2106.92534722222 \tabularnewline
33 & 22759 & 23976.8003472222 & 21422.2083333333 & 2554.59201388889 & -1217.80034722222 \tabularnewline
34 & 19028 & 19661.8940972222 & 21636.5 & -1974.60590277778 & -633.894097222223 \tabularnewline
35 & 16971 & 17442.9357638889 & 21803.5416666667 & -4360.60590277778 & -471.935763888887 \tabularnewline
36 & 20036 & 18271.5503472222 & 22169.3333333333 & -3897.78298611111 & 1764.44965277778 \tabularnewline
37 & 22485 & 22522.9149305556 & 22700.7916666667 & -177.876736111111 & -37.9149305555547 \tabularnewline
38 & 18730 & 18597.6336805556 & 23223.3333333333 & -4625.69965277778 & 132.366319444445 \tabularnewline
39 & 14538 & 13737.5086805556 & 23785.7083333333 & -10048.1996527778 & 800.491319444445 \tabularnewline
40 & 27561 & 28374.5607638889 & 24167.2916666667 & 4207.26909722222 & -813.560763888887 \tabularnewline
41 & 25985 & 27821.2065972222 & 24455.3333333333 & 3365.87326388889 & -1836.20659722222 \tabularnewline
42 & 34670 & 32320.8420138889 & 24626.9583333333 & 7693.88368055556 & 2349.15798611112 \tabularnewline
43 & 32066 & 30486.1024305556 & 24681.4583333333 & 5804.64409722222 & 1579.89756944445 \tabularnewline
44 & 27186 & 26365.8420138889 & 24907.3333333333 & 1458.50868055556 & 820.157986111109 \tabularnewline
45 & 29586 & 27681.8836805556 & 25127.2916666667 & 2554.59201388889 & 1904.11631944444 \tabularnewline
46 & 21359 & 23209.5607638889 & 25184.1666666667 & -1974.60590277778 & -1850.56076388889 \tabularnewline
47 & 21553 & 20908.4774305556 & 25269.0833333333 & -4360.60590277778 & 644.522569444442 \tabularnewline
48 & 19573 & 21417.3836805556 & 25315.1666666667 & -3897.78298611111 & -1844.38368055555 \tabularnewline
49 & 24256 & 24927.5815972222 & 25105.4583333333 & -177.876736111111 & -671.581597222223 \tabularnewline
50 & 22380 & 20386.5086805556 & 25012.2083333333 & -4625.69965277778 & 1993.49131944445 \tabularnewline
51 & 16167 & 14864.4253472222 & 24912.625 & -10048.1996527778 & 1302.57465277778 \tabularnewline
52 & 27297 & 28819.1440972222 & 24611.875 & 4207.26909722222 & -1522.14409722222 \tabularnewline
53 & 28287 & 27786.7482638889 & 24420.875 & 3365.87326388889 & 500.251736111117 \tabularnewline
54 & 33474 & 32194.8003472222 & 24500.9166666667 & 7693.88368055556 & 1279.19965277778 \tabularnewline
55 & 28229 & 30394.6440972222 & 24590 & 5804.64409722222 & -2165.64409722222 \tabularnewline
56 & 28785 & NA & NA & 1458.50868055556 & NA \tabularnewline
57 & 25597 & NA & NA & 2554.59201388889 & NA \tabularnewline
58 & 18130 & NA & NA & -1974.60590277778 & NA \tabularnewline
59 & 20198 & NA & NA & -4360.60590277778 & NA \tabularnewline
60 & 22849 & NA & NA & -3897.78298611111 & NA \tabularnewline
61 & 23118 & NA & NA & NA & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=147857&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]20995[/C][C]NA[/C][C]NA[/C][C]-177.876736111111[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]17382[/C][C]NA[/C][C]NA[/C][C]-4625.69965277778[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]9367[/C][C]NA[/C][C]NA[/C][C]-10048.1996527778[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]31124[/C][C]NA[/C][C]NA[/C][C]4207.26909722222[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]26551[/C][C]NA[/C][C]NA[/C][C]3365.87326388889[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]30651[/C][C]NA[/C][C]NA[/C][C]7693.88368055556[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]25859[/C][C]28656.9357638889[/C][C]22852.2916666667[/C][C]5804.64409722222[/C][C]-2797.93576388889[/C][/ROW]
[ROW][C]8[/C][C]25100[/C][C]24569.6753472222[/C][C]23111.1666666667[/C][C]1458.50868055556[/C][C]530.324652777781[/C][/ROW]
[ROW][C]9[/C][C]25778[/C][C]25907.5503472222[/C][C]23352.9583333333[/C][C]2554.59201388889[/C][C]-129.550347222223[/C][/ROW]
[ROW][C]10[/C][C]20418[/C][C]21537.2274305556[/C][C]23511.8333333333[/C][C]-1974.60590277778[/C][C]-1119.22743055555[/C][/ROW]
[ROW][C]11[/C][C]18688[/C][C]19317.9774305556[/C][C]23678.5833333333[/C][C]-4360.60590277778[/C][C]-629.977430555558[/C][/ROW]
[ROW][C]12[/C][C]20424[/C][C]19902.8003472222[/C][C]23800.5833333333[/C][C]-3897.78298611111[/C][C]521.199652777777[/C][/ROW]
[ROW][C]13[/C][C]24776[/C][C]23849.4982638889[/C][C]24027.375[/C][C]-177.876736111111[/C][C]926.501736111109[/C][/ROW]
[ROW][C]14[/C][C]19814[/C][C]19685.0503472222[/C][C]24310.75[/C][C]-4625.69965277778[/C][C]128.949652777781[/C][/ROW]
[ROW][C]15[/C][C]12738[/C][C]14336.8420138889[/C][C]24385.0416666667[/C][C]-10048.1996527778[/C][C]-1598.84201388888[/C][/ROW]
[ROW][C]16[/C][C]31566[/C][C]28627.4774305556[/C][C]24420.2083333333[/C][C]4207.26909722222[/C][C]2938.52256944444[/C][/ROW]
[ROW][C]17[/C][C]30111[/C][C]27739.7482638889[/C][C]24373.875[/C][C]3365.87326388889[/C][C]2371.25173611111[/C][/ROW]
[ROW][C]18[/C][C]30019[/C][C]32034.3003472222[/C][C]24340.4166666667[/C][C]7693.88368055556[/C][C]-2015.30034722222[/C][/ROW]
[ROW][C]19[/C][C]31934[/C][C]30054.9774305556[/C][C]24250.3333333333[/C][C]5804.64409722222[/C][C]1879.02256944445[/C][/ROW]
[ROW][C]20[/C][C]25826[/C][C]25438.0086805556[/C][C]23979.5[/C][C]1458.50868055556[/C][C]387.991319444449[/C][/ROW]
[ROW][C]21[/C][C]26835[/C][C]26306.1336805556[/C][C]23751.5416666667[/C][C]2554.59201388889[/C][C]528.866319444445[/C][/ROW]
[ROW][C]22[/C][C]20205[/C][C]21470.7690972222[/C][C]23445.375[/C][C]-1974.60590277778[/C][C]-1265.76909722222[/C][/ROW]
[ROW][C]23[/C][C]17789[/C][C]18578.9357638889[/C][C]22939.5416666667[/C][C]-4360.60590277778[/C][C]-789.935763888887[/C][/ROW]
[ROW][C]24[/C][C]20520[/C][C]18697.8420138889[/C][C]22595.625[/C][C]-3897.78298611111[/C][C]1822.15798611111[/C][/ROW]
[ROW][C]25[/C][C]22518[/C][C]22085.5815972222[/C][C]22263.4583333333[/C][C]-177.876736111111[/C][C]432.418402777777[/C][/ROW]
[ROW][C]26[/C][C]15572[/C][C]17177.3836805556[/C][C]21803.0833333333[/C][C]-4625.69965277778[/C][C]-1605.38368055555[/C][/ROW]
[ROW][C]27[/C][C]11509[/C][C]11363.8003472222[/C][C]21412[/C][C]-10048.1996527778[/C][C]145.199652777781[/C][/ROW]
[ROW][C]28[/C][C]25447[/C][C]25400.3940972222[/C][C]21193.125[/C][C]4207.26909722222[/C][C]46.6059027777774[/C][/ROW]
[ROW][C]29[/C][C]24090[/C][C]24475.8732638889[/C][C]21110[/C][C]3365.87326388889[/C][C]-385.873263888887[/C][/ROW]
[ROW][C]30[/C][C]27786[/C][C]28749.6336805556[/C][C]21055.75[/C][C]7693.88368055556[/C][C]-963.633680555555[/C][/ROW]
[ROW][C]31[/C][C]26195[/C][C]26838.8524305556[/C][C]21034.2083333333[/C][C]5804.64409722222[/C][C]-643.852430555555[/C][/ROW]
[ROW][C]32[/C][C]20516[/C][C]22622.9253472222[/C][C]21164.4166666667[/C][C]1458.50868055556[/C][C]-2106.92534722222[/C][/ROW]
[ROW][C]33[/C][C]22759[/C][C]23976.8003472222[/C][C]21422.2083333333[/C][C]2554.59201388889[/C][C]-1217.80034722222[/C][/ROW]
[ROW][C]34[/C][C]19028[/C][C]19661.8940972222[/C][C]21636.5[/C][C]-1974.60590277778[/C][C]-633.894097222223[/C][/ROW]
[ROW][C]35[/C][C]16971[/C][C]17442.9357638889[/C][C]21803.5416666667[/C][C]-4360.60590277778[/C][C]-471.935763888887[/C][/ROW]
[ROW][C]36[/C][C]20036[/C][C]18271.5503472222[/C][C]22169.3333333333[/C][C]-3897.78298611111[/C][C]1764.44965277778[/C][/ROW]
[ROW][C]37[/C][C]22485[/C][C]22522.9149305556[/C][C]22700.7916666667[/C][C]-177.876736111111[/C][C]-37.9149305555547[/C][/ROW]
[ROW][C]38[/C][C]18730[/C][C]18597.6336805556[/C][C]23223.3333333333[/C][C]-4625.69965277778[/C][C]132.366319444445[/C][/ROW]
[ROW][C]39[/C][C]14538[/C][C]13737.5086805556[/C][C]23785.7083333333[/C][C]-10048.1996527778[/C][C]800.491319444445[/C][/ROW]
[ROW][C]40[/C][C]27561[/C][C]28374.5607638889[/C][C]24167.2916666667[/C][C]4207.26909722222[/C][C]-813.560763888887[/C][/ROW]
[ROW][C]41[/C][C]25985[/C][C]27821.2065972222[/C][C]24455.3333333333[/C][C]3365.87326388889[/C][C]-1836.20659722222[/C][/ROW]
[ROW][C]42[/C][C]34670[/C][C]32320.8420138889[/C][C]24626.9583333333[/C][C]7693.88368055556[/C][C]2349.15798611112[/C][/ROW]
[ROW][C]43[/C][C]32066[/C][C]30486.1024305556[/C][C]24681.4583333333[/C][C]5804.64409722222[/C][C]1579.89756944445[/C][/ROW]
[ROW][C]44[/C][C]27186[/C][C]26365.8420138889[/C][C]24907.3333333333[/C][C]1458.50868055556[/C][C]820.157986111109[/C][/ROW]
[ROW][C]45[/C][C]29586[/C][C]27681.8836805556[/C][C]25127.2916666667[/C][C]2554.59201388889[/C][C]1904.11631944444[/C][/ROW]
[ROW][C]46[/C][C]21359[/C][C]23209.5607638889[/C][C]25184.1666666667[/C][C]-1974.60590277778[/C][C]-1850.56076388889[/C][/ROW]
[ROW][C]47[/C][C]21553[/C][C]20908.4774305556[/C][C]25269.0833333333[/C][C]-4360.60590277778[/C][C]644.522569444442[/C][/ROW]
[ROW][C]48[/C][C]19573[/C][C]21417.3836805556[/C][C]25315.1666666667[/C][C]-3897.78298611111[/C][C]-1844.38368055555[/C][/ROW]
[ROW][C]49[/C][C]24256[/C][C]24927.5815972222[/C][C]25105.4583333333[/C][C]-177.876736111111[/C][C]-671.581597222223[/C][/ROW]
[ROW][C]50[/C][C]22380[/C][C]20386.5086805556[/C][C]25012.2083333333[/C][C]-4625.69965277778[/C][C]1993.49131944445[/C][/ROW]
[ROW][C]51[/C][C]16167[/C][C]14864.4253472222[/C][C]24912.625[/C][C]-10048.1996527778[/C][C]1302.57465277778[/C][/ROW]
[ROW][C]52[/C][C]27297[/C][C]28819.1440972222[/C][C]24611.875[/C][C]4207.26909722222[/C][C]-1522.14409722222[/C][/ROW]
[ROW][C]53[/C][C]28287[/C][C]27786.7482638889[/C][C]24420.875[/C][C]3365.87326388889[/C][C]500.251736111117[/C][/ROW]
[ROW][C]54[/C][C]33474[/C][C]32194.8003472222[/C][C]24500.9166666667[/C][C]7693.88368055556[/C][C]1279.19965277778[/C][/ROW]
[ROW][C]55[/C][C]28229[/C][C]30394.6440972222[/C][C]24590[/C][C]5804.64409722222[/C][C]-2165.64409722222[/C][/ROW]
[ROW][C]56[/C][C]28785[/C][C]NA[/C][C]NA[/C][C]1458.50868055556[/C][C]NA[/C][/ROW]
[ROW][C]57[/C][C]25597[/C][C]NA[/C][C]NA[/C][C]2554.59201388889[/C][C]NA[/C][/ROW]
[ROW][C]58[/C][C]18130[/C][C]NA[/C][C]NA[/C][C]-1974.60590277778[/C][C]NA[/C][/ROW]
[ROW][C]59[/C][C]20198[/C][C]NA[/C][C]NA[/C][C]-4360.60590277778[/C][C]NA[/C][/ROW]
[ROW][C]60[/C][C]22849[/C][C]NA[/C][C]NA[/C][C]-3897.78298611111[/C][C]NA[/C][/ROW]
[ROW][C]61[/C][C]23118[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=147857&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=147857&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	20995	NA	NA	-177.876736111111	NA
2	17382	NA	NA	-4625.69965277778	NA
3	9367	NA	NA	-10048.1996527778	NA
4	31124	NA	NA	4207.26909722222	NA
5	26551	NA	NA	3365.87326388889	NA
6	30651	NA	NA	7693.88368055556	NA
7	25859	28656.9357638889	22852.2916666667	5804.64409722222	-2797.93576388889
8	25100	24569.6753472222	23111.1666666667	1458.50868055556	530.324652777781
9	25778	25907.5503472222	23352.9583333333	2554.59201388889	-129.550347222223
10	20418	21537.2274305556	23511.8333333333	-1974.60590277778	-1119.22743055555
11	18688	19317.9774305556	23678.5833333333	-4360.60590277778	-629.977430555558
12	20424	19902.8003472222	23800.5833333333	-3897.78298611111	521.199652777777
13	24776	23849.4982638889	24027.375	-177.876736111111	926.501736111109
14	19814	19685.0503472222	24310.75	-4625.69965277778	128.949652777781
15	12738	14336.8420138889	24385.0416666667	-10048.1996527778	-1598.84201388888
16	31566	28627.4774305556	24420.2083333333	4207.26909722222	2938.52256944444
17	30111	27739.7482638889	24373.875	3365.87326388889	2371.25173611111
18	30019	32034.3003472222	24340.4166666667	7693.88368055556	-2015.30034722222
19	31934	30054.9774305556	24250.3333333333	5804.64409722222	1879.02256944445
20	25826	25438.0086805556	23979.5	1458.50868055556	387.991319444449
21	26835	26306.1336805556	23751.5416666667	2554.59201388889	528.866319444445
22	20205	21470.7690972222	23445.375	-1974.60590277778	-1265.76909722222
23	17789	18578.9357638889	22939.5416666667	-4360.60590277778	-789.935763888887
24	20520	18697.8420138889	22595.625	-3897.78298611111	1822.15798611111
25	22518	22085.5815972222	22263.4583333333	-177.876736111111	432.418402777777
26	15572	17177.3836805556	21803.0833333333	-4625.69965277778	-1605.38368055555
27	11509	11363.8003472222	21412	-10048.1996527778	145.199652777781
28	25447	25400.3940972222	21193.125	4207.26909722222	46.6059027777774
29	24090	24475.8732638889	21110	3365.87326388889	-385.873263888887
30	27786	28749.6336805556	21055.75	7693.88368055556	-963.633680555555
31	26195	26838.8524305556	21034.2083333333	5804.64409722222	-643.852430555555
32	20516	22622.9253472222	21164.4166666667	1458.50868055556	-2106.92534722222
33	22759	23976.8003472222	21422.2083333333	2554.59201388889	-1217.80034722222
34	19028	19661.8940972222	21636.5	-1974.60590277778	-633.894097222223
35	16971	17442.9357638889	21803.5416666667	-4360.60590277778	-471.935763888887
36	20036	18271.5503472222	22169.3333333333	-3897.78298611111	1764.44965277778
37	22485	22522.9149305556	22700.7916666667	-177.876736111111	-37.9149305555547
38	18730	18597.6336805556	23223.3333333333	-4625.69965277778	132.366319444445
39	14538	13737.5086805556	23785.7083333333	-10048.1996527778	800.491319444445
40	27561	28374.5607638889	24167.2916666667	4207.26909722222	-813.560763888887
41	25985	27821.2065972222	24455.3333333333	3365.87326388889	-1836.20659722222
42	34670	32320.8420138889	24626.9583333333	7693.88368055556	2349.15798611112
43	32066	30486.1024305556	24681.4583333333	5804.64409722222	1579.89756944445
44	27186	26365.8420138889	24907.3333333333	1458.50868055556	820.157986111109
45	29586	27681.8836805556	25127.2916666667	2554.59201388889	1904.11631944444
46	21359	23209.5607638889	25184.1666666667	-1974.60590277778	-1850.56076388889
47	21553	20908.4774305556	25269.0833333333	-4360.60590277778	644.522569444442
48	19573	21417.3836805556	25315.1666666667	-3897.78298611111	-1844.38368055555
49	24256	24927.5815972222	25105.4583333333	-177.876736111111	-671.581597222223
50	22380	20386.5086805556	25012.2083333333	-4625.69965277778	1993.49131944445
51	16167	14864.4253472222	24912.625	-10048.1996527778	1302.57465277778
52	27297	28819.1440972222	24611.875	4207.26909722222	-1522.14409722222
53	28287	27786.7482638889	24420.875	3365.87326388889	500.251736111117
54	33474	32194.8003472222	24500.9166666667	7693.88368055556	1279.19965277778
55	28229	30394.6440972222	24590	5804.64409722222	-2165.64409722222
56	28785	NA	NA	1458.50868055556	NA
57	25597	NA	NA	2554.59201388889	NA
58	18130	NA	NA	-1974.60590277778	NA
59	20198	NA	NA	-4360.60590277778	NA
60	22849	NA	NA	-3897.78298611111	NA
61	23118	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