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

Sat, 18 Dec 2010 12:23:01 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/18/t12926748572p9xd20ew47xyj6.htm/, Retrieved Tue, 30 Apr 2024 02:18:54 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=111884, Retrieved Tue, 30 Apr 2024 02:18:54 +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

169

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] [Unemployment] [2010-11-30 13:33:27] [b98453cac15ba1066b407e146608df68]
-         [Classical Decomposition] [] [2010-12-08 17:53:12] [58af523ef9b33032fd2497c80088399b]
-    D        [Classical Decomposition] [] [2010-12-18 12:23:01] [7c1b7ddc8e9000e55b944088fdfb52dc] [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	4 seconds
R Server	'George Udny Yule' @ 72.249.76.132

\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 & 4 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=111884&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]4 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=111884&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=111884&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	4 seconds
R Server	'George Udny Yule' @ 72.249.76.132

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	104.31	NA	NA	-0.180243055555559	NA
2	103.88	NA	NA	-0.168993055555569	NA
3	103.88	NA	NA	-0.09135416666667	NA
4	103.86	NA	NA	-0.0503819444444377	NA
5	103.89	NA	NA	-0.082048611111104	NA
6	103.98	NA	NA	-0.0519097222222141	NA
7	103.98	103.869479166667	103.97375	-0.104270833333330	0.110520833333339
8	104.29	104.063090277778	103.914166666667	0.148923611111102	0.22690972222226
9	104.29	104.087534722222	103.866666666667	0.220868055555552	0.20246527777779
10	104.24	104.059618055556	103.8175	0.242118055555557	0.180381944444463
11	103.98	103.945173611111	103.76125	0.183923611111104	0.0348263888889306
12	103.54	103.627118055556	103.69375	-0.0666319444444324	-0.0871180555555355
13	103.44	103.432673611111	103.612916666667	-0.180243055555559	0.0073263888888988
14	103.32	103.355173611111	103.524166666667	-0.168993055555569	-0.0351736111111052
15	103.3	103.344479166667	103.435833333333	-0.09135416666667	-0.0444791666666617
16	103.26	103.295451388889	103.345833333333	-0.0503819444444377	-0.0354513888888874
17	103.14	103.173368055556	103.255416666667	-0.082048611111104	-0.033368055555556
18	103.11	103.112256944444	103.164166666667	-0.0519097222222141	-0.00225694444445423
19	102.91	102.957395833333	103.061666666667	-0.104270833333330	-0.04739583333334
20	103.23	103.102673611111	102.95375	0.148923611111102	0.127326388888889
21	103.23	103.070868055556	102.85	0.220868055555552	0.159131944444454
22	103.14	102.987118055556	102.745	0.242118055555557	0.152881944444474
23	102.91	102.821006944444	102.637083333333	0.183923611111104	0.0889930555555765
24	102.42	102.459201388889	102.525833333333	-0.0666319444444324	-0.0392013888888698
25	102.1	102.232673611111	102.412916666667	-0.180243055555559	-0.132673611111102
26	102.07	102.122256944444	102.29125	-0.168993055555569	-0.0522569444444372
27	102.06	102.068645833333	102.16	-0.09135416666667	-0.00864583333331836
28	101.98	101.980034722222	102.030416666667	-0.0503819444444377	-3.47222221961374e-05
29	101.83	101.826701388889	101.90875	-0.082048611111104	0.00329861111113416
30	101.75	101.752673611111	101.804583333333	-0.0519097222222141	-0.00267361111107789
31	101.56	101.616145833333	101.720416666667	-0.104270833333330	-0.0561458333333036
32	101.66	101.791423611111	101.6425	0.148923611111102	-0.131423611111089
33	101.65	101.783368055556	101.5625	0.220868055555552	-0.133368055555550
34	101.61	101.726701388889	101.484583333333	0.242118055555557	-0.116701388888899
35	101.52	101.595173611111	101.41125	0.183923611111104	-0.0751736111111256
36	101.31	101.275034722222	101.341666666667	-0.0666319444444324	0.0349652777777862
37	101.19	101.100590277778	101.280833333333	-0.180243055555559	0.0894097222222427
38	101.11	101.058506944444	101.2275	-0.168993055555569	0.0514930555555821
39	101.1	101.0828125	101.174166666667	-0.09135416666667	0.0171875000000199
40	101.07	101.070451388889	101.120833333333	-0.0503819444444377	-0.000451388888890847
41	100.98	100.985868055556	101.067916666667	-0.082048611111104	-0.00586805555555259
42	100.93	100.961006944444	101.012916666667	-0.0519097222222141	-0.0310069444444281
43	100.92	100.852395833333	100.956666666667	-0.104270833333330	0.0676041666666691
44	101.02	101.051840277778	100.902916666667	0.148923611111102	-0.0318402777777749
45	101.01	101.071701388889	100.850833333333	0.220868055555552	-0.061701388888892
46	100.97	101.042118055556	100.8	0.242118055555557	-0.072118055555535
47	100.89	100.939756944444	100.755833333333	0.183923611111104	-0.049756944444411
48	100.62	100.651701388889	100.718333333333	-0.0666319444444324	-0.0317013888888766
49	100.53	NA	100.68125	NA	NA
50	100.48	NA	100.638333333333	NA	NA
51	100.48	NA	NA	NA	NA
52	100.47	NA	NA	NA	NA
53	100.52	NA	NA	NA	NA
54	100.49	NA	NA	NA	NA
55	100.47	NA	NA	NA	NA
56	100.44	NA	NA	NA	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 104.31 & NA & NA & -0.180243055555559 & NA \tabularnewline
2 & 103.88 & NA & NA & -0.168993055555569 & NA \tabularnewline
3 & 103.88 & NA & NA & -0.09135416666667 & NA \tabularnewline
4 & 103.86 & NA & NA & -0.0503819444444377 & NA \tabularnewline
5 & 103.89 & NA & NA & -0.082048611111104 & NA \tabularnewline
6 & 103.98 & NA & NA & -0.0519097222222141 & NA \tabularnewline
7 & 103.98 & 103.869479166667 & 103.97375 & -0.104270833333330 & 0.110520833333339 \tabularnewline
8 & 104.29 & 104.063090277778 & 103.914166666667 & 0.148923611111102 & 0.22690972222226 \tabularnewline
9 & 104.29 & 104.087534722222 & 103.866666666667 & 0.220868055555552 & 0.20246527777779 \tabularnewline
10 & 104.24 & 104.059618055556 & 103.8175 & 0.242118055555557 & 0.180381944444463 \tabularnewline
11 & 103.98 & 103.945173611111 & 103.76125 & 0.183923611111104 & 0.0348263888889306 \tabularnewline
12 & 103.54 & 103.627118055556 & 103.69375 & -0.0666319444444324 & -0.0871180555555355 \tabularnewline
13 & 103.44 & 103.432673611111 & 103.612916666667 & -0.180243055555559 & 0.0073263888888988 \tabularnewline
14 & 103.32 & 103.355173611111 & 103.524166666667 & -0.168993055555569 & -0.0351736111111052 \tabularnewline
15 & 103.3 & 103.344479166667 & 103.435833333333 & -0.09135416666667 & -0.0444791666666617 \tabularnewline
16 & 103.26 & 103.295451388889 & 103.345833333333 & -0.0503819444444377 & -0.0354513888888874 \tabularnewline
17 & 103.14 & 103.173368055556 & 103.255416666667 & -0.082048611111104 & -0.033368055555556 \tabularnewline
18 & 103.11 & 103.112256944444 & 103.164166666667 & -0.0519097222222141 & -0.00225694444445423 \tabularnewline
19 & 102.91 & 102.957395833333 & 103.061666666667 & -0.104270833333330 & -0.04739583333334 \tabularnewline
20 & 103.23 & 103.102673611111 & 102.95375 & 0.148923611111102 & 0.127326388888889 \tabularnewline
21 & 103.23 & 103.070868055556 & 102.85 & 0.220868055555552 & 0.159131944444454 \tabularnewline
22 & 103.14 & 102.987118055556 & 102.745 & 0.242118055555557 & 0.152881944444474 \tabularnewline
23 & 102.91 & 102.821006944444 & 102.637083333333 & 0.183923611111104 & 0.0889930555555765 \tabularnewline
24 & 102.42 & 102.459201388889 & 102.525833333333 & -0.0666319444444324 & -0.0392013888888698 \tabularnewline
25 & 102.1 & 102.232673611111 & 102.412916666667 & -0.180243055555559 & -0.132673611111102 \tabularnewline
26 & 102.07 & 102.122256944444 & 102.29125 & -0.168993055555569 & -0.0522569444444372 \tabularnewline
27 & 102.06 & 102.068645833333 & 102.16 & -0.09135416666667 & -0.00864583333331836 \tabularnewline
28 & 101.98 & 101.980034722222 & 102.030416666667 & -0.0503819444444377 & -3.47222221961374e-05 \tabularnewline
29 & 101.83 & 101.826701388889 & 101.90875 & -0.082048611111104 & 0.00329861111113416 \tabularnewline
30 & 101.75 & 101.752673611111 & 101.804583333333 & -0.0519097222222141 & -0.00267361111107789 \tabularnewline
31 & 101.56 & 101.616145833333 & 101.720416666667 & -0.104270833333330 & -0.0561458333333036 \tabularnewline
32 & 101.66 & 101.791423611111 & 101.6425 & 0.148923611111102 & -0.131423611111089 \tabularnewline
33 & 101.65 & 101.783368055556 & 101.5625 & 0.220868055555552 & -0.133368055555550 \tabularnewline
34 & 101.61 & 101.726701388889 & 101.484583333333 & 0.242118055555557 & -0.116701388888899 \tabularnewline
35 & 101.52 & 101.595173611111 & 101.41125 & 0.183923611111104 & -0.0751736111111256 \tabularnewline
36 & 101.31 & 101.275034722222 & 101.341666666667 & -0.0666319444444324 & 0.0349652777777862 \tabularnewline
37 & 101.19 & 101.100590277778 & 101.280833333333 & -0.180243055555559 & 0.0894097222222427 \tabularnewline
38 & 101.11 & 101.058506944444 & 101.2275 & -0.168993055555569 & 0.0514930555555821 \tabularnewline
39 & 101.1 & 101.0828125 & 101.174166666667 & -0.09135416666667 & 0.0171875000000199 \tabularnewline
40 & 101.07 & 101.070451388889 & 101.120833333333 & -0.0503819444444377 & -0.000451388888890847 \tabularnewline
41 & 100.98 & 100.985868055556 & 101.067916666667 & -0.082048611111104 & -0.00586805555555259 \tabularnewline
42 & 100.93 & 100.961006944444 & 101.012916666667 & -0.0519097222222141 & -0.0310069444444281 \tabularnewline
43 & 100.92 & 100.852395833333 & 100.956666666667 & -0.104270833333330 & 0.0676041666666691 \tabularnewline
44 & 101.02 & 101.051840277778 & 100.902916666667 & 0.148923611111102 & -0.0318402777777749 \tabularnewline
45 & 101.01 & 101.071701388889 & 100.850833333333 & 0.220868055555552 & -0.061701388888892 \tabularnewline
46 & 100.97 & 101.042118055556 & 100.8 & 0.242118055555557 & -0.072118055555535 \tabularnewline
47 & 100.89 & 100.939756944444 & 100.755833333333 & 0.183923611111104 & -0.049756944444411 \tabularnewline
48 & 100.62 & 100.651701388889 & 100.718333333333 & -0.0666319444444324 & -0.0317013888888766 \tabularnewline
49 & 100.53 & NA & 100.68125 & NA & NA \tabularnewline
50 & 100.48 & NA & 100.638333333333 & NA & NA \tabularnewline
51 & 100.48 & NA & NA & NA & NA \tabularnewline
52 & 100.47 & NA & NA & NA & NA \tabularnewline
53 & 100.52 & NA & NA & NA & NA \tabularnewline
54 & 100.49 & NA & NA & NA & NA \tabularnewline
55 & 100.47 & NA & NA & NA & NA \tabularnewline
56 & 100.44 & NA & NA & NA & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=111884&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]104.31[/C][C]NA[/C][C]NA[/C][C]-0.180243055555559[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]103.88[/C][C]NA[/C][C]NA[/C][C]-0.168993055555569[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]103.88[/C][C]NA[/C][C]NA[/C][C]-0.09135416666667[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]103.86[/C][C]NA[/C][C]NA[/C][C]-0.0503819444444377[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]103.89[/C][C]NA[/C][C]NA[/C][C]-0.082048611111104[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]103.98[/C][C]NA[/C][C]NA[/C][C]-0.0519097222222141[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]103.98[/C][C]103.869479166667[/C][C]103.97375[/C][C]-0.104270833333330[/C][C]0.110520833333339[/C][/ROW]
[ROW][C]8[/C][C]104.29[/C][C]104.063090277778[/C][C]103.914166666667[/C][C]0.148923611111102[/C][C]0.22690972222226[/C][/ROW]
[ROW][C]9[/C][C]104.29[/C][C]104.087534722222[/C][C]103.866666666667[/C][C]0.220868055555552[/C][C]0.20246527777779[/C][/ROW]
[ROW][C]10[/C][C]104.24[/C][C]104.059618055556[/C][C]103.8175[/C][C]0.242118055555557[/C][C]0.180381944444463[/C][/ROW]
[ROW][C]11[/C][C]103.98[/C][C]103.945173611111[/C][C]103.76125[/C][C]0.183923611111104[/C][C]0.0348263888889306[/C][/ROW]
[ROW][C]12[/C][C]103.54[/C][C]103.627118055556[/C][C]103.69375[/C][C]-0.0666319444444324[/C][C]-0.0871180555555355[/C][/ROW]
[ROW][C]13[/C][C]103.44[/C][C]103.432673611111[/C][C]103.612916666667[/C][C]-0.180243055555559[/C][C]0.0073263888888988[/C][/ROW]
[ROW][C]14[/C][C]103.32[/C][C]103.355173611111[/C][C]103.524166666667[/C][C]-0.168993055555569[/C][C]-0.0351736111111052[/C][/ROW]
[ROW][C]15[/C][C]103.3[/C][C]103.344479166667[/C][C]103.435833333333[/C][C]-0.09135416666667[/C][C]-0.0444791666666617[/C][/ROW]
[ROW][C]16[/C][C]103.26[/C][C]103.295451388889[/C][C]103.345833333333[/C][C]-0.0503819444444377[/C][C]-0.0354513888888874[/C][/ROW]
[ROW][C]17[/C][C]103.14[/C][C]103.173368055556[/C][C]103.255416666667[/C][C]-0.082048611111104[/C][C]-0.033368055555556[/C][/ROW]
[ROW][C]18[/C][C]103.11[/C][C]103.112256944444[/C][C]103.164166666667[/C][C]-0.0519097222222141[/C][C]-0.00225694444445423[/C][/ROW]
[ROW][C]19[/C][C]102.91[/C][C]102.957395833333[/C][C]103.061666666667[/C][C]-0.104270833333330[/C][C]-0.04739583333334[/C][/ROW]
[ROW][C]20[/C][C]103.23[/C][C]103.102673611111[/C][C]102.95375[/C][C]0.148923611111102[/C][C]0.127326388888889[/C][/ROW]
[ROW][C]21[/C][C]103.23[/C][C]103.070868055556[/C][C]102.85[/C][C]0.220868055555552[/C][C]0.159131944444454[/C][/ROW]
[ROW][C]22[/C][C]103.14[/C][C]102.987118055556[/C][C]102.745[/C][C]0.242118055555557[/C][C]0.152881944444474[/C][/ROW]
[ROW][C]23[/C][C]102.91[/C][C]102.821006944444[/C][C]102.637083333333[/C][C]0.183923611111104[/C][C]0.0889930555555765[/C][/ROW]
[ROW][C]24[/C][C]102.42[/C][C]102.459201388889[/C][C]102.525833333333[/C][C]-0.0666319444444324[/C][C]-0.0392013888888698[/C][/ROW]
[ROW][C]25[/C][C]102.1[/C][C]102.232673611111[/C][C]102.412916666667[/C][C]-0.180243055555559[/C][C]-0.132673611111102[/C][/ROW]
[ROW][C]26[/C][C]102.07[/C][C]102.122256944444[/C][C]102.29125[/C][C]-0.168993055555569[/C][C]-0.0522569444444372[/C][/ROW]
[ROW][C]27[/C][C]102.06[/C][C]102.068645833333[/C][C]102.16[/C][C]-0.09135416666667[/C][C]-0.00864583333331836[/C][/ROW]
[ROW][C]28[/C][C]101.98[/C][C]101.980034722222[/C][C]102.030416666667[/C][C]-0.0503819444444377[/C][C]-3.47222221961374e-05[/C][/ROW]
[ROW][C]29[/C][C]101.83[/C][C]101.826701388889[/C][C]101.90875[/C][C]-0.082048611111104[/C][C]0.00329861111113416[/C][/ROW]
[ROW][C]30[/C][C]101.75[/C][C]101.752673611111[/C][C]101.804583333333[/C][C]-0.0519097222222141[/C][C]-0.00267361111107789[/C][/ROW]
[ROW][C]31[/C][C]101.56[/C][C]101.616145833333[/C][C]101.720416666667[/C][C]-0.104270833333330[/C][C]-0.0561458333333036[/C][/ROW]
[ROW][C]32[/C][C]101.66[/C][C]101.791423611111[/C][C]101.6425[/C][C]0.148923611111102[/C][C]-0.131423611111089[/C][/ROW]
[ROW][C]33[/C][C]101.65[/C][C]101.783368055556[/C][C]101.5625[/C][C]0.220868055555552[/C][C]-0.133368055555550[/C][/ROW]
[ROW][C]34[/C][C]101.61[/C][C]101.726701388889[/C][C]101.484583333333[/C][C]0.242118055555557[/C][C]-0.116701388888899[/C][/ROW]
[ROW][C]35[/C][C]101.52[/C][C]101.595173611111[/C][C]101.41125[/C][C]0.183923611111104[/C][C]-0.0751736111111256[/C][/ROW]
[ROW][C]36[/C][C]101.31[/C][C]101.275034722222[/C][C]101.341666666667[/C][C]-0.0666319444444324[/C][C]0.0349652777777862[/C][/ROW]
[ROW][C]37[/C][C]101.19[/C][C]101.100590277778[/C][C]101.280833333333[/C][C]-0.180243055555559[/C][C]0.0894097222222427[/C][/ROW]
[ROW][C]38[/C][C]101.11[/C][C]101.058506944444[/C][C]101.2275[/C][C]-0.168993055555569[/C][C]0.0514930555555821[/C][/ROW]
[ROW][C]39[/C][C]101.1[/C][C]101.0828125[/C][C]101.174166666667[/C][C]-0.09135416666667[/C][C]0.0171875000000199[/C][/ROW]
[ROW][C]40[/C][C]101.07[/C][C]101.070451388889[/C][C]101.120833333333[/C][C]-0.0503819444444377[/C][C]-0.000451388888890847[/C][/ROW]
[ROW][C]41[/C][C]100.98[/C][C]100.985868055556[/C][C]101.067916666667[/C][C]-0.082048611111104[/C][C]-0.00586805555555259[/C][/ROW]
[ROW][C]42[/C][C]100.93[/C][C]100.961006944444[/C][C]101.012916666667[/C][C]-0.0519097222222141[/C][C]-0.0310069444444281[/C][/ROW]
[ROW][C]43[/C][C]100.92[/C][C]100.852395833333[/C][C]100.956666666667[/C][C]-0.104270833333330[/C][C]0.0676041666666691[/C][/ROW]
[ROW][C]44[/C][C]101.02[/C][C]101.051840277778[/C][C]100.902916666667[/C][C]0.148923611111102[/C][C]-0.0318402777777749[/C][/ROW]
[ROW][C]45[/C][C]101.01[/C][C]101.071701388889[/C][C]100.850833333333[/C][C]0.220868055555552[/C][C]-0.061701388888892[/C][/ROW]
[ROW][C]46[/C][C]100.97[/C][C]101.042118055556[/C][C]100.8[/C][C]0.242118055555557[/C][C]-0.072118055555535[/C][/ROW]
[ROW][C]47[/C][C]100.89[/C][C]100.939756944444[/C][C]100.755833333333[/C][C]0.183923611111104[/C][C]-0.049756944444411[/C][/ROW]
[ROW][C]48[/C][C]100.62[/C][C]100.651701388889[/C][C]100.718333333333[/C][C]-0.0666319444444324[/C][C]-0.0317013888888766[/C][/ROW]
[ROW][C]49[/C][C]100.53[/C][C]NA[/C][C]100.68125[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]50[/C][C]100.48[/C][C]NA[/C][C]100.638333333333[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]51[/C][C]100.48[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]52[/C][C]100.47[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]53[/C][C]100.52[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]54[/C][C]100.49[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]55[/C][C]100.47[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]56[/C][C]100.44[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=111884&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=111884&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	104.31	NA	NA	-0.180243055555559	NA
2	103.88	NA	NA	-0.168993055555569	NA
3	103.88	NA	NA	-0.09135416666667	NA
4	103.86	NA	NA	-0.0503819444444377	NA
5	103.89	NA	NA	-0.082048611111104	NA
6	103.98	NA	NA	-0.0519097222222141	NA
7	103.98	103.869479166667	103.97375	-0.104270833333330	0.110520833333339
8	104.29	104.063090277778	103.914166666667	0.148923611111102	0.22690972222226
9	104.29	104.087534722222	103.866666666667	0.220868055555552	0.20246527777779
10	104.24	104.059618055556	103.8175	0.242118055555557	0.180381944444463
11	103.98	103.945173611111	103.76125	0.183923611111104	0.0348263888889306
12	103.54	103.627118055556	103.69375	-0.0666319444444324	-0.0871180555555355
13	103.44	103.432673611111	103.612916666667	-0.180243055555559	0.0073263888888988
14	103.32	103.355173611111	103.524166666667	-0.168993055555569	-0.0351736111111052
15	103.3	103.344479166667	103.435833333333	-0.09135416666667	-0.0444791666666617
16	103.26	103.295451388889	103.345833333333	-0.0503819444444377	-0.0354513888888874
17	103.14	103.173368055556	103.255416666667	-0.082048611111104	-0.033368055555556
18	103.11	103.112256944444	103.164166666667	-0.0519097222222141	-0.00225694444445423
19	102.91	102.957395833333	103.061666666667	-0.104270833333330	-0.04739583333334
20	103.23	103.102673611111	102.95375	0.148923611111102	0.127326388888889
21	103.23	103.070868055556	102.85	0.220868055555552	0.159131944444454
22	103.14	102.987118055556	102.745	0.242118055555557	0.152881944444474
23	102.91	102.821006944444	102.637083333333	0.183923611111104	0.0889930555555765
24	102.42	102.459201388889	102.525833333333	-0.0666319444444324	-0.0392013888888698
25	102.1	102.232673611111	102.412916666667	-0.180243055555559	-0.132673611111102
26	102.07	102.122256944444	102.29125	-0.168993055555569	-0.0522569444444372
27	102.06	102.068645833333	102.16	-0.09135416666667	-0.00864583333331836
28	101.98	101.980034722222	102.030416666667	-0.0503819444444377	-3.47222221961374e-05
29	101.83	101.826701388889	101.90875	-0.082048611111104	0.00329861111113416
30	101.75	101.752673611111	101.804583333333	-0.0519097222222141	-0.00267361111107789
31	101.56	101.616145833333	101.720416666667	-0.104270833333330	-0.0561458333333036
32	101.66	101.791423611111	101.6425	0.148923611111102	-0.131423611111089
33	101.65	101.783368055556	101.5625	0.220868055555552	-0.133368055555550
34	101.61	101.726701388889	101.484583333333	0.242118055555557	-0.116701388888899
35	101.52	101.595173611111	101.41125	0.183923611111104	-0.0751736111111256
36	101.31	101.275034722222	101.341666666667	-0.0666319444444324	0.0349652777777862
37	101.19	101.100590277778	101.280833333333	-0.180243055555559	0.0894097222222427
38	101.11	101.058506944444	101.2275	-0.168993055555569	0.0514930555555821
39	101.1	101.0828125	101.174166666667	-0.09135416666667	0.0171875000000199
40	101.07	101.070451388889	101.120833333333	-0.0503819444444377	-0.000451388888890847
41	100.98	100.985868055556	101.067916666667	-0.082048611111104	-0.00586805555555259
42	100.93	100.961006944444	101.012916666667	-0.0519097222222141	-0.0310069444444281
43	100.92	100.852395833333	100.956666666667	-0.104270833333330	0.0676041666666691
44	101.02	101.051840277778	100.902916666667	0.148923611111102	-0.0318402777777749
45	101.01	101.071701388889	100.850833333333	0.220868055555552	-0.061701388888892
46	100.97	101.042118055556	100.8	0.242118055555557	-0.072118055555535
47	100.89	100.939756944444	100.755833333333	0.183923611111104	-0.049756944444411
48	100.62	100.651701388889	100.718333333333	-0.0666319444444324	-0.0317013888888766
49	100.53	NA	100.68125	NA	NA
50	100.48	NA	100.638333333333	NA	NA
51	100.48	NA	NA	NA	NA
52	100.47	NA	NA	NA	NA
53	100.52	NA	NA	NA	NA
54	100.49	NA	NA	NA	NA
55	100.47	NA	NA	NA	NA
56	100.44	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