Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_decompose.wasp

Title produced by software

Classical Decomposition

Date of computation

Sun, 11 May 2014 11:42:11 -0400

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/2014/May/11/t1399822941jgwzf73xr5vl3jt.htm/, Retrieved Tue, 14 May 2024 07:29:26 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=234791, Retrieved Tue, 14 May 2024 07:29:26 +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

143

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

-       [Classical Decomposition] [] [2014-05-11 15:42:11] [b3e3d38149b35cb70244b37a39776b3a] [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	2 seconds
R Server	'Herman Ole Andreas Wold' @ wold.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 & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=234791&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]'Herman Ole Andreas Wold' @ wold.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=234791&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=234791&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	'Herman Ole Andreas Wold' @ wold.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	83.5	NA	NA	0.0396825	NA
2	83.6	NA	NA	0.106944	NA
3	83.9	NA	NA	0.188492	NA
4	83.9	NA	NA	0.13373	NA
5	84.2	NA	NA	0.0736111	NA
6	84.4	NA	NA	0.0134921	NA
7	84.6	84.4099	84.4667	-0.056746	0.190079
8	84.8	84.445	84.6208	-0.175794	0.35496
9	84.8	84.6974	84.7917	-0.094246	0.102579
10	84.9	84.9665	84.9792	-0.0126984	-0.0664683
11	85	85.0861	85.1625	-0.0763889	-0.0861111
12	85.1	85.1974	85.3375	-0.140079	-0.0974206
13	85.3	85.5438	85.5042	0.0396825	-0.243849
14	85.5	85.7653	85.6583	0.106944	-0.265278
15	86.1	86.0052	85.8167	0.188492	0.0948413
16	86.2	86.1337	86	0.13373	0.0662698
17	86.3	86.2861	86.2125	0.0736111	0.0138889
18	86.5	86.451	86.4375	0.0134921	0.0490079
19	86.5	86.6099	86.6667	-0.056746	-0.109921
20	86.6	86.745	86.9208	-0.175794	-0.14504
21	86.8	87.0974	87.1917	-0.094246	-0.297421
22	87.3	87.4373	87.45	-0.0126984	-0.137302
23	87.7	87.6236	87.7	-0.0763889	0.0763889
24	87.8	87.8141	87.9542	-0.140079	-0.0140873
25	88.1	88.2522	88.2125	0.0396825	-0.152183
26	88.8	88.5861	88.4792	0.106944	0.213889
27	89.3	88.9468	88.7583	0.188492	0.353175
28	89.2	89.1546	89.0208	0.13373	0.0454365
29	89.3	89.3278	89.2542	0.0736111	-0.0277778
30	89.6	89.4927	89.4792	0.0134921	0.107341
31	89.6	89.6766	89.7333	-0.056746	-0.0765873
32	89.9	89.8117	89.9875	-0.175794	0.0882937
33	90.2	90.1099	90.2042	-0.094246	0.0900794
34	90.2	90.4206	90.4333	-0.0126984	-0.220635
35	90.4	90.6111	90.6875	-0.0763889	-0.211111
36	90.5	90.8058	90.9458	-0.140079	-0.305754
37	91.5	91.2605	91.2208	0.0396825	0.239484
38	91.5	91.6069	91.5	0.106944	-0.106944
39	91.8	91.9593	91.7708	0.188492	-0.159325
40	92.2	92.1962	92.0625	0.13373	0.00376984
41	92.4	92.4528	92.3792	0.0736111	-0.0527778
42	92.7	92.7302	92.7167	0.0134921	-0.0301587
43	93.1	92.9933	93.05	-0.056746	0.106746
44	93.1	93.2159	93.3917	-0.175794	-0.115873
45	93.5	93.6641	93.7583	-0.094246	-0.164087
46	93.9	94.1165	94.1292	-0.0126984	-0.216468
47	94.3	94.4194	94.4958	-0.0763889	-0.119444
48	94.7	94.7099	94.85	-0.140079	-0.00992063
49	95.3	95.2397	95.2	0.0396825	0.0603175
50	95.9	95.6611	95.5542	0.106944	0.238889
51	96.2	96.1052	95.9167	0.188492	0.0948413
52	96.7	96.4212	96.2875	0.13373	0.27877
53	96.7	96.7194	96.6458	0.0736111	-0.0194444
54	96.9	97.001	96.9875	0.0134921	-0.100992
55	97.3	97.2516	97.3083	-0.056746	0.0484127
56	97.4	97.4075	97.5833	-0.175794	-0.00753968
57	97.9	97.7433	97.8375	-0.094246	0.156746
58	98.4	98.0665	98.0792	-0.0126984	0.333532
59	98.4	98.2403	98.3167	-0.0763889	0.159722
60	98.8	98.4224	98.5625	-0.140079	0.377579
61	98.9	98.823	98.7833	0.0396825	0.0769841
62	98.9	99.0944	98.9875	0.106944	-0.194444
63	99.3	99.3843	99.1958	0.188492	-0.0843254
64	99.4	99.5462	99.4125	0.13373	-0.14623
65	99.7	99.7194	99.6458	0.0736111	-0.0194444
66	99.8	99.8885	99.875	0.0134921	-0.0884921
67	99.7	100.047	100.104	-0.056746	-0.347421
68	99.9	100.187	100.363	-0.175794	-0.286706
69	100.4	100.535	100.629	-0.094246	-0.134921
70	101.1	100.875	100.888	-0.0126984	0.225198
71	101.3	101.069	101.146	-0.0763889	0.230556
72	101.4	101.268	101.408	-0.140079	0.131746
73	101.8	101.727	101.688	0.0396825	0.0728175
74	102.2	102.078	101.971	0.106944	0.122222
75	102.4	102.43	102.242	0.188492	-0.0301587
76	102.5	102.617	102.483	0.13373	-0.117063
77	102.8	102.765	102.692	0.0736111	0.0347222
78	103	102.905	102.892	0.0134921	0.0948413
79	103.2	103.035	103.092	-0.056746	0.165079
80	103.2	103.112	103.288	-0.175794	0.0882937
81	103.6	103.377	103.471	-0.094246	0.223413
82	103.7	103.641	103.654	-0.0126984	0.0585317
83	103.7	103.774	103.85	-0.0763889	-0.0736111
84	103.8	103.906	104.046	-0.140079	-0.105754
85	104.2	104.277	104.237	0.0396825	-0.0771825
86	104.5	104.532	104.425	0.106944	-0.0319444
87	104.5	104.793	104.604	0.188492	-0.292659
88	104.8	104.955	104.821	0.13373	-0.154563
89	105.2	105.153	105.079	0.0736111	0.0472222
90	105.3	105.355	105.342	0.0134921	-0.0551587
91	105.5	NA	NA	-0.056746	NA
92	105.4	NA	NA	-0.175794	NA
93	105.7	NA	NA	-0.094246	NA
94	106.8	NA	NA	-0.0126984	NA
95	106.8	NA	NA	-0.0763889	NA
96	107	NA	NA	-0.140079	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 83.5 & NA & NA & 0.0396825 & NA \tabularnewline
2 & 83.6 & NA & NA & 0.106944 & NA \tabularnewline
3 & 83.9 & NA & NA & 0.188492 & NA \tabularnewline
4 & 83.9 & NA & NA & 0.13373 & NA \tabularnewline
5 & 84.2 & NA & NA & 0.0736111 & NA \tabularnewline
6 & 84.4 & NA & NA & 0.0134921 & NA \tabularnewline
7 & 84.6 & 84.4099 & 84.4667 & -0.056746 & 0.190079 \tabularnewline
8 & 84.8 & 84.445 & 84.6208 & -0.175794 & 0.35496 \tabularnewline
9 & 84.8 & 84.6974 & 84.7917 & -0.094246 & 0.102579 \tabularnewline
10 & 84.9 & 84.9665 & 84.9792 & -0.0126984 & -0.0664683 \tabularnewline
11 & 85 & 85.0861 & 85.1625 & -0.0763889 & -0.0861111 \tabularnewline
12 & 85.1 & 85.1974 & 85.3375 & -0.140079 & -0.0974206 \tabularnewline
13 & 85.3 & 85.5438 & 85.5042 & 0.0396825 & -0.243849 \tabularnewline
14 & 85.5 & 85.7653 & 85.6583 & 0.106944 & -0.265278 \tabularnewline
15 & 86.1 & 86.0052 & 85.8167 & 0.188492 & 0.0948413 \tabularnewline
16 & 86.2 & 86.1337 & 86 & 0.13373 & 0.0662698 \tabularnewline
17 & 86.3 & 86.2861 & 86.2125 & 0.0736111 & 0.0138889 \tabularnewline
18 & 86.5 & 86.451 & 86.4375 & 0.0134921 & 0.0490079 \tabularnewline
19 & 86.5 & 86.6099 & 86.6667 & -0.056746 & -0.109921 \tabularnewline
20 & 86.6 & 86.745 & 86.9208 & -0.175794 & -0.14504 \tabularnewline
21 & 86.8 & 87.0974 & 87.1917 & -0.094246 & -0.297421 \tabularnewline
22 & 87.3 & 87.4373 & 87.45 & -0.0126984 & -0.137302 \tabularnewline
23 & 87.7 & 87.6236 & 87.7 & -0.0763889 & 0.0763889 \tabularnewline
24 & 87.8 & 87.8141 & 87.9542 & -0.140079 & -0.0140873 \tabularnewline
25 & 88.1 & 88.2522 & 88.2125 & 0.0396825 & -0.152183 \tabularnewline
26 & 88.8 & 88.5861 & 88.4792 & 0.106944 & 0.213889 \tabularnewline
27 & 89.3 & 88.9468 & 88.7583 & 0.188492 & 0.353175 \tabularnewline
28 & 89.2 & 89.1546 & 89.0208 & 0.13373 & 0.0454365 \tabularnewline
29 & 89.3 & 89.3278 & 89.2542 & 0.0736111 & -0.0277778 \tabularnewline
30 & 89.6 & 89.4927 & 89.4792 & 0.0134921 & 0.107341 \tabularnewline
31 & 89.6 & 89.6766 & 89.7333 & -0.056746 & -0.0765873 \tabularnewline
32 & 89.9 & 89.8117 & 89.9875 & -0.175794 & 0.0882937 \tabularnewline
33 & 90.2 & 90.1099 & 90.2042 & -0.094246 & 0.0900794 \tabularnewline
34 & 90.2 & 90.4206 & 90.4333 & -0.0126984 & -0.220635 \tabularnewline
35 & 90.4 & 90.6111 & 90.6875 & -0.0763889 & -0.211111 \tabularnewline
36 & 90.5 & 90.8058 & 90.9458 & -0.140079 & -0.305754 \tabularnewline
37 & 91.5 & 91.2605 & 91.2208 & 0.0396825 & 0.239484 \tabularnewline
38 & 91.5 & 91.6069 & 91.5 & 0.106944 & -0.106944 \tabularnewline
39 & 91.8 & 91.9593 & 91.7708 & 0.188492 & -0.159325 \tabularnewline
40 & 92.2 & 92.1962 & 92.0625 & 0.13373 & 0.00376984 \tabularnewline
41 & 92.4 & 92.4528 & 92.3792 & 0.0736111 & -0.0527778 \tabularnewline
42 & 92.7 & 92.7302 & 92.7167 & 0.0134921 & -0.0301587 \tabularnewline
43 & 93.1 & 92.9933 & 93.05 & -0.056746 & 0.106746 \tabularnewline
44 & 93.1 & 93.2159 & 93.3917 & -0.175794 & -0.115873 \tabularnewline
45 & 93.5 & 93.6641 & 93.7583 & -0.094246 & -0.164087 \tabularnewline
46 & 93.9 & 94.1165 & 94.1292 & -0.0126984 & -0.216468 \tabularnewline
47 & 94.3 & 94.4194 & 94.4958 & -0.0763889 & -0.119444 \tabularnewline
48 & 94.7 & 94.7099 & 94.85 & -0.140079 & -0.00992063 \tabularnewline
49 & 95.3 & 95.2397 & 95.2 & 0.0396825 & 0.0603175 \tabularnewline
50 & 95.9 & 95.6611 & 95.5542 & 0.106944 & 0.238889 \tabularnewline
51 & 96.2 & 96.1052 & 95.9167 & 0.188492 & 0.0948413 \tabularnewline
52 & 96.7 & 96.4212 & 96.2875 & 0.13373 & 0.27877 \tabularnewline
53 & 96.7 & 96.7194 & 96.6458 & 0.0736111 & -0.0194444 \tabularnewline
54 & 96.9 & 97.001 & 96.9875 & 0.0134921 & -0.100992 \tabularnewline
55 & 97.3 & 97.2516 & 97.3083 & -0.056746 & 0.0484127 \tabularnewline
56 & 97.4 & 97.4075 & 97.5833 & -0.175794 & -0.00753968 \tabularnewline
57 & 97.9 & 97.7433 & 97.8375 & -0.094246 & 0.156746 \tabularnewline
58 & 98.4 & 98.0665 & 98.0792 & -0.0126984 & 0.333532 \tabularnewline
59 & 98.4 & 98.2403 & 98.3167 & -0.0763889 & 0.159722 \tabularnewline
60 & 98.8 & 98.4224 & 98.5625 & -0.140079 & 0.377579 \tabularnewline
61 & 98.9 & 98.823 & 98.7833 & 0.0396825 & 0.0769841 \tabularnewline
62 & 98.9 & 99.0944 & 98.9875 & 0.106944 & -0.194444 \tabularnewline
63 & 99.3 & 99.3843 & 99.1958 & 0.188492 & -0.0843254 \tabularnewline
64 & 99.4 & 99.5462 & 99.4125 & 0.13373 & -0.14623 \tabularnewline
65 & 99.7 & 99.7194 & 99.6458 & 0.0736111 & -0.0194444 \tabularnewline
66 & 99.8 & 99.8885 & 99.875 & 0.0134921 & -0.0884921 \tabularnewline
67 & 99.7 & 100.047 & 100.104 & -0.056746 & -0.347421 \tabularnewline
68 & 99.9 & 100.187 & 100.363 & -0.175794 & -0.286706 \tabularnewline
69 & 100.4 & 100.535 & 100.629 & -0.094246 & -0.134921 \tabularnewline
70 & 101.1 & 100.875 & 100.888 & -0.0126984 & 0.225198 \tabularnewline
71 & 101.3 & 101.069 & 101.146 & -0.0763889 & 0.230556 \tabularnewline
72 & 101.4 & 101.268 & 101.408 & -0.140079 & 0.131746 \tabularnewline
73 & 101.8 & 101.727 & 101.688 & 0.0396825 & 0.0728175 \tabularnewline
74 & 102.2 & 102.078 & 101.971 & 0.106944 & 0.122222 \tabularnewline
75 & 102.4 & 102.43 & 102.242 & 0.188492 & -0.0301587 \tabularnewline
76 & 102.5 & 102.617 & 102.483 & 0.13373 & -0.117063 \tabularnewline
77 & 102.8 & 102.765 & 102.692 & 0.0736111 & 0.0347222 \tabularnewline
78 & 103 & 102.905 & 102.892 & 0.0134921 & 0.0948413 \tabularnewline
79 & 103.2 & 103.035 & 103.092 & -0.056746 & 0.165079 \tabularnewline
80 & 103.2 & 103.112 & 103.288 & -0.175794 & 0.0882937 \tabularnewline
81 & 103.6 & 103.377 & 103.471 & -0.094246 & 0.223413 \tabularnewline
82 & 103.7 & 103.641 & 103.654 & -0.0126984 & 0.0585317 \tabularnewline
83 & 103.7 & 103.774 & 103.85 & -0.0763889 & -0.0736111 \tabularnewline
84 & 103.8 & 103.906 & 104.046 & -0.140079 & -0.105754 \tabularnewline
85 & 104.2 & 104.277 & 104.237 & 0.0396825 & -0.0771825 \tabularnewline
86 & 104.5 & 104.532 & 104.425 & 0.106944 & -0.0319444 \tabularnewline
87 & 104.5 & 104.793 & 104.604 & 0.188492 & -0.292659 \tabularnewline
88 & 104.8 & 104.955 & 104.821 & 0.13373 & -0.154563 \tabularnewline
89 & 105.2 & 105.153 & 105.079 & 0.0736111 & 0.0472222 \tabularnewline
90 & 105.3 & 105.355 & 105.342 & 0.0134921 & -0.0551587 \tabularnewline
91 & 105.5 & NA & NA & -0.056746 & NA \tabularnewline
92 & 105.4 & NA & NA & -0.175794 & NA \tabularnewline
93 & 105.7 & NA & NA & -0.094246 & NA \tabularnewline
94 & 106.8 & NA & NA & -0.0126984 & NA \tabularnewline
95 & 106.8 & NA & NA & -0.0763889 & NA \tabularnewline
96 & 107 & NA & NA & -0.140079 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=234791&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]83.5[/C][C]NA[/C][C]NA[/C][C]0.0396825[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]83.6[/C][C]NA[/C][C]NA[/C][C]0.106944[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]83.9[/C][C]NA[/C][C]NA[/C][C]0.188492[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]83.9[/C][C]NA[/C][C]NA[/C][C]0.13373[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]84.2[/C][C]NA[/C][C]NA[/C][C]0.0736111[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]84.4[/C][C]NA[/C][C]NA[/C][C]0.0134921[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]84.6[/C][C]84.4099[/C][C]84.4667[/C][C]-0.056746[/C][C]0.190079[/C][/ROW]
[ROW][C]8[/C][C]84.8[/C][C]84.445[/C][C]84.6208[/C][C]-0.175794[/C][C]0.35496[/C][/ROW]
[ROW][C]9[/C][C]84.8[/C][C]84.6974[/C][C]84.7917[/C][C]-0.094246[/C][C]0.102579[/C][/ROW]
[ROW][C]10[/C][C]84.9[/C][C]84.9665[/C][C]84.9792[/C][C]-0.0126984[/C][C]-0.0664683[/C][/ROW]
[ROW][C]11[/C][C]85[/C][C]85.0861[/C][C]85.1625[/C][C]-0.0763889[/C][C]-0.0861111[/C][/ROW]
[ROW][C]12[/C][C]85.1[/C][C]85.1974[/C][C]85.3375[/C][C]-0.140079[/C][C]-0.0974206[/C][/ROW]
[ROW][C]13[/C][C]85.3[/C][C]85.5438[/C][C]85.5042[/C][C]0.0396825[/C][C]-0.243849[/C][/ROW]
[ROW][C]14[/C][C]85.5[/C][C]85.7653[/C][C]85.6583[/C][C]0.106944[/C][C]-0.265278[/C][/ROW]
[ROW][C]15[/C][C]86.1[/C][C]86.0052[/C][C]85.8167[/C][C]0.188492[/C][C]0.0948413[/C][/ROW]
[ROW][C]16[/C][C]86.2[/C][C]86.1337[/C][C]86[/C][C]0.13373[/C][C]0.0662698[/C][/ROW]
[ROW][C]17[/C][C]86.3[/C][C]86.2861[/C][C]86.2125[/C][C]0.0736111[/C][C]0.0138889[/C][/ROW]
[ROW][C]18[/C][C]86.5[/C][C]86.451[/C][C]86.4375[/C][C]0.0134921[/C][C]0.0490079[/C][/ROW]
[ROW][C]19[/C][C]86.5[/C][C]86.6099[/C][C]86.6667[/C][C]-0.056746[/C][C]-0.109921[/C][/ROW]
[ROW][C]20[/C][C]86.6[/C][C]86.745[/C][C]86.9208[/C][C]-0.175794[/C][C]-0.14504[/C][/ROW]
[ROW][C]21[/C][C]86.8[/C][C]87.0974[/C][C]87.1917[/C][C]-0.094246[/C][C]-0.297421[/C][/ROW]
[ROW][C]22[/C][C]87.3[/C][C]87.4373[/C][C]87.45[/C][C]-0.0126984[/C][C]-0.137302[/C][/ROW]
[ROW][C]23[/C][C]87.7[/C][C]87.6236[/C][C]87.7[/C][C]-0.0763889[/C][C]0.0763889[/C][/ROW]
[ROW][C]24[/C][C]87.8[/C][C]87.8141[/C][C]87.9542[/C][C]-0.140079[/C][C]-0.0140873[/C][/ROW]
[ROW][C]25[/C][C]88.1[/C][C]88.2522[/C][C]88.2125[/C][C]0.0396825[/C][C]-0.152183[/C][/ROW]
[ROW][C]26[/C][C]88.8[/C][C]88.5861[/C][C]88.4792[/C][C]0.106944[/C][C]0.213889[/C][/ROW]
[ROW][C]27[/C][C]89.3[/C][C]88.9468[/C][C]88.7583[/C][C]0.188492[/C][C]0.353175[/C][/ROW]
[ROW][C]28[/C][C]89.2[/C][C]89.1546[/C][C]89.0208[/C][C]0.13373[/C][C]0.0454365[/C][/ROW]
[ROW][C]29[/C][C]89.3[/C][C]89.3278[/C][C]89.2542[/C][C]0.0736111[/C][C]-0.0277778[/C][/ROW]
[ROW][C]30[/C][C]89.6[/C][C]89.4927[/C][C]89.4792[/C][C]0.0134921[/C][C]0.107341[/C][/ROW]
[ROW][C]31[/C][C]89.6[/C][C]89.6766[/C][C]89.7333[/C][C]-0.056746[/C][C]-0.0765873[/C][/ROW]
[ROW][C]32[/C][C]89.9[/C][C]89.8117[/C][C]89.9875[/C][C]-0.175794[/C][C]0.0882937[/C][/ROW]
[ROW][C]33[/C][C]90.2[/C][C]90.1099[/C][C]90.2042[/C][C]-0.094246[/C][C]0.0900794[/C][/ROW]
[ROW][C]34[/C][C]90.2[/C][C]90.4206[/C][C]90.4333[/C][C]-0.0126984[/C][C]-0.220635[/C][/ROW]
[ROW][C]35[/C][C]90.4[/C][C]90.6111[/C][C]90.6875[/C][C]-0.0763889[/C][C]-0.211111[/C][/ROW]
[ROW][C]36[/C][C]90.5[/C][C]90.8058[/C][C]90.9458[/C][C]-0.140079[/C][C]-0.305754[/C][/ROW]
[ROW][C]37[/C][C]91.5[/C][C]91.2605[/C][C]91.2208[/C][C]0.0396825[/C][C]0.239484[/C][/ROW]
[ROW][C]38[/C][C]91.5[/C][C]91.6069[/C][C]91.5[/C][C]0.106944[/C][C]-0.106944[/C][/ROW]
[ROW][C]39[/C][C]91.8[/C][C]91.9593[/C][C]91.7708[/C][C]0.188492[/C][C]-0.159325[/C][/ROW]
[ROW][C]40[/C][C]92.2[/C][C]92.1962[/C][C]92.0625[/C][C]0.13373[/C][C]0.00376984[/C][/ROW]
[ROW][C]41[/C][C]92.4[/C][C]92.4528[/C][C]92.3792[/C][C]0.0736111[/C][C]-0.0527778[/C][/ROW]
[ROW][C]42[/C][C]92.7[/C][C]92.7302[/C][C]92.7167[/C][C]0.0134921[/C][C]-0.0301587[/C][/ROW]
[ROW][C]43[/C][C]93.1[/C][C]92.9933[/C][C]93.05[/C][C]-0.056746[/C][C]0.106746[/C][/ROW]
[ROW][C]44[/C][C]93.1[/C][C]93.2159[/C][C]93.3917[/C][C]-0.175794[/C][C]-0.115873[/C][/ROW]
[ROW][C]45[/C][C]93.5[/C][C]93.6641[/C][C]93.7583[/C][C]-0.094246[/C][C]-0.164087[/C][/ROW]
[ROW][C]46[/C][C]93.9[/C][C]94.1165[/C][C]94.1292[/C][C]-0.0126984[/C][C]-0.216468[/C][/ROW]
[ROW][C]47[/C][C]94.3[/C][C]94.4194[/C][C]94.4958[/C][C]-0.0763889[/C][C]-0.119444[/C][/ROW]
[ROW][C]48[/C][C]94.7[/C][C]94.7099[/C][C]94.85[/C][C]-0.140079[/C][C]-0.00992063[/C][/ROW]
[ROW][C]49[/C][C]95.3[/C][C]95.2397[/C][C]95.2[/C][C]0.0396825[/C][C]0.0603175[/C][/ROW]
[ROW][C]50[/C][C]95.9[/C][C]95.6611[/C][C]95.5542[/C][C]0.106944[/C][C]0.238889[/C][/ROW]
[ROW][C]51[/C][C]96.2[/C][C]96.1052[/C][C]95.9167[/C][C]0.188492[/C][C]0.0948413[/C][/ROW]
[ROW][C]52[/C][C]96.7[/C][C]96.4212[/C][C]96.2875[/C][C]0.13373[/C][C]0.27877[/C][/ROW]
[ROW][C]53[/C][C]96.7[/C][C]96.7194[/C][C]96.6458[/C][C]0.0736111[/C][C]-0.0194444[/C][/ROW]
[ROW][C]54[/C][C]96.9[/C][C]97.001[/C][C]96.9875[/C][C]0.0134921[/C][C]-0.100992[/C][/ROW]
[ROW][C]55[/C][C]97.3[/C][C]97.2516[/C][C]97.3083[/C][C]-0.056746[/C][C]0.0484127[/C][/ROW]
[ROW][C]56[/C][C]97.4[/C][C]97.4075[/C][C]97.5833[/C][C]-0.175794[/C][C]-0.00753968[/C][/ROW]
[ROW][C]57[/C][C]97.9[/C][C]97.7433[/C][C]97.8375[/C][C]-0.094246[/C][C]0.156746[/C][/ROW]
[ROW][C]58[/C][C]98.4[/C][C]98.0665[/C][C]98.0792[/C][C]-0.0126984[/C][C]0.333532[/C][/ROW]
[ROW][C]59[/C][C]98.4[/C][C]98.2403[/C][C]98.3167[/C][C]-0.0763889[/C][C]0.159722[/C][/ROW]
[ROW][C]60[/C][C]98.8[/C][C]98.4224[/C][C]98.5625[/C][C]-0.140079[/C][C]0.377579[/C][/ROW]
[ROW][C]61[/C][C]98.9[/C][C]98.823[/C][C]98.7833[/C][C]0.0396825[/C][C]0.0769841[/C][/ROW]
[ROW][C]62[/C][C]98.9[/C][C]99.0944[/C][C]98.9875[/C][C]0.106944[/C][C]-0.194444[/C][/ROW]
[ROW][C]63[/C][C]99.3[/C][C]99.3843[/C][C]99.1958[/C][C]0.188492[/C][C]-0.0843254[/C][/ROW]
[ROW][C]64[/C][C]99.4[/C][C]99.5462[/C][C]99.4125[/C][C]0.13373[/C][C]-0.14623[/C][/ROW]
[ROW][C]65[/C][C]99.7[/C][C]99.7194[/C][C]99.6458[/C][C]0.0736111[/C][C]-0.0194444[/C][/ROW]
[ROW][C]66[/C][C]99.8[/C][C]99.8885[/C][C]99.875[/C][C]0.0134921[/C][C]-0.0884921[/C][/ROW]
[ROW][C]67[/C][C]99.7[/C][C]100.047[/C][C]100.104[/C][C]-0.056746[/C][C]-0.347421[/C][/ROW]
[ROW][C]68[/C][C]99.9[/C][C]100.187[/C][C]100.363[/C][C]-0.175794[/C][C]-0.286706[/C][/ROW]
[ROW][C]69[/C][C]100.4[/C][C]100.535[/C][C]100.629[/C][C]-0.094246[/C][C]-0.134921[/C][/ROW]
[ROW][C]70[/C][C]101.1[/C][C]100.875[/C][C]100.888[/C][C]-0.0126984[/C][C]0.225198[/C][/ROW]
[ROW][C]71[/C][C]101.3[/C][C]101.069[/C][C]101.146[/C][C]-0.0763889[/C][C]0.230556[/C][/ROW]
[ROW][C]72[/C][C]101.4[/C][C]101.268[/C][C]101.408[/C][C]-0.140079[/C][C]0.131746[/C][/ROW]
[ROW][C]73[/C][C]101.8[/C][C]101.727[/C][C]101.688[/C][C]0.0396825[/C][C]0.0728175[/C][/ROW]
[ROW][C]74[/C][C]102.2[/C][C]102.078[/C][C]101.971[/C][C]0.106944[/C][C]0.122222[/C][/ROW]
[ROW][C]75[/C][C]102.4[/C][C]102.43[/C][C]102.242[/C][C]0.188492[/C][C]-0.0301587[/C][/ROW]
[ROW][C]76[/C][C]102.5[/C][C]102.617[/C][C]102.483[/C][C]0.13373[/C][C]-0.117063[/C][/ROW]
[ROW][C]77[/C][C]102.8[/C][C]102.765[/C][C]102.692[/C][C]0.0736111[/C][C]0.0347222[/C][/ROW]
[ROW][C]78[/C][C]103[/C][C]102.905[/C][C]102.892[/C][C]0.0134921[/C][C]0.0948413[/C][/ROW]
[ROW][C]79[/C][C]103.2[/C][C]103.035[/C][C]103.092[/C][C]-0.056746[/C][C]0.165079[/C][/ROW]
[ROW][C]80[/C][C]103.2[/C][C]103.112[/C][C]103.288[/C][C]-0.175794[/C][C]0.0882937[/C][/ROW]
[ROW][C]81[/C][C]103.6[/C][C]103.377[/C][C]103.471[/C][C]-0.094246[/C][C]0.223413[/C][/ROW]
[ROW][C]82[/C][C]103.7[/C][C]103.641[/C][C]103.654[/C][C]-0.0126984[/C][C]0.0585317[/C][/ROW]
[ROW][C]83[/C][C]103.7[/C][C]103.774[/C][C]103.85[/C][C]-0.0763889[/C][C]-0.0736111[/C][/ROW]
[ROW][C]84[/C][C]103.8[/C][C]103.906[/C][C]104.046[/C][C]-0.140079[/C][C]-0.105754[/C][/ROW]
[ROW][C]85[/C][C]104.2[/C][C]104.277[/C][C]104.237[/C][C]0.0396825[/C][C]-0.0771825[/C][/ROW]
[ROW][C]86[/C][C]104.5[/C][C]104.532[/C][C]104.425[/C][C]0.106944[/C][C]-0.0319444[/C][/ROW]
[ROW][C]87[/C][C]104.5[/C][C]104.793[/C][C]104.604[/C][C]0.188492[/C][C]-0.292659[/C][/ROW]
[ROW][C]88[/C][C]104.8[/C][C]104.955[/C][C]104.821[/C][C]0.13373[/C][C]-0.154563[/C][/ROW]
[ROW][C]89[/C][C]105.2[/C][C]105.153[/C][C]105.079[/C][C]0.0736111[/C][C]0.0472222[/C][/ROW]
[ROW][C]90[/C][C]105.3[/C][C]105.355[/C][C]105.342[/C][C]0.0134921[/C][C]-0.0551587[/C][/ROW]
[ROW][C]91[/C][C]105.5[/C][C]NA[/C][C]NA[/C][C]-0.056746[/C][C]NA[/C][/ROW]
[ROW][C]92[/C][C]105.4[/C][C]NA[/C][C]NA[/C][C]-0.175794[/C][C]NA[/C][/ROW]
[ROW][C]93[/C][C]105.7[/C][C]NA[/C][C]NA[/C][C]-0.094246[/C][C]NA[/C][/ROW]
[ROW][C]94[/C][C]106.8[/C][C]NA[/C][C]NA[/C][C]-0.0126984[/C][C]NA[/C][/ROW]
[ROW][C]95[/C][C]106.8[/C][C]NA[/C][C]NA[/C][C]-0.0763889[/C][C]NA[/C][/ROW]
[ROW][C]96[/C][C]107[/C][C]NA[/C][C]NA[/C][C]-0.140079[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=234791&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=234791&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	83.5	NA	NA	0.0396825	NA
2	83.6	NA	NA	0.106944	NA
3	83.9	NA	NA	0.188492	NA
4	83.9	NA	NA	0.13373	NA
5	84.2	NA	NA	0.0736111	NA
6	84.4	NA	NA	0.0134921	NA
7	84.6	84.4099	84.4667	-0.056746	0.190079
8	84.8	84.445	84.6208	-0.175794	0.35496
9	84.8	84.6974	84.7917	-0.094246	0.102579
10	84.9	84.9665	84.9792	-0.0126984	-0.0664683
11	85	85.0861	85.1625	-0.0763889	-0.0861111
12	85.1	85.1974	85.3375	-0.140079	-0.0974206
13	85.3	85.5438	85.5042	0.0396825	-0.243849
14	85.5	85.7653	85.6583	0.106944	-0.265278
15	86.1	86.0052	85.8167	0.188492	0.0948413
16	86.2	86.1337	86	0.13373	0.0662698
17	86.3	86.2861	86.2125	0.0736111	0.0138889
18	86.5	86.451	86.4375	0.0134921	0.0490079
19	86.5	86.6099	86.6667	-0.056746	-0.109921
20	86.6	86.745	86.9208	-0.175794	-0.14504
21	86.8	87.0974	87.1917	-0.094246	-0.297421
22	87.3	87.4373	87.45	-0.0126984	-0.137302
23	87.7	87.6236	87.7	-0.0763889	0.0763889
24	87.8	87.8141	87.9542	-0.140079	-0.0140873
25	88.1	88.2522	88.2125	0.0396825	-0.152183
26	88.8	88.5861	88.4792	0.106944	0.213889
27	89.3	88.9468	88.7583	0.188492	0.353175
28	89.2	89.1546	89.0208	0.13373	0.0454365
29	89.3	89.3278	89.2542	0.0736111	-0.0277778
30	89.6	89.4927	89.4792	0.0134921	0.107341
31	89.6	89.6766	89.7333	-0.056746	-0.0765873
32	89.9	89.8117	89.9875	-0.175794	0.0882937
33	90.2	90.1099	90.2042	-0.094246	0.0900794
34	90.2	90.4206	90.4333	-0.0126984	-0.220635
35	90.4	90.6111	90.6875	-0.0763889	-0.211111
36	90.5	90.8058	90.9458	-0.140079	-0.305754
37	91.5	91.2605	91.2208	0.0396825	0.239484
38	91.5	91.6069	91.5	0.106944	-0.106944
39	91.8	91.9593	91.7708	0.188492	-0.159325
40	92.2	92.1962	92.0625	0.13373	0.00376984
41	92.4	92.4528	92.3792	0.0736111	-0.0527778
42	92.7	92.7302	92.7167	0.0134921	-0.0301587
43	93.1	92.9933	93.05	-0.056746	0.106746
44	93.1	93.2159	93.3917	-0.175794	-0.115873
45	93.5	93.6641	93.7583	-0.094246	-0.164087
46	93.9	94.1165	94.1292	-0.0126984	-0.216468
47	94.3	94.4194	94.4958	-0.0763889	-0.119444
48	94.7	94.7099	94.85	-0.140079	-0.00992063
49	95.3	95.2397	95.2	0.0396825	0.0603175
50	95.9	95.6611	95.5542	0.106944	0.238889
51	96.2	96.1052	95.9167	0.188492	0.0948413
52	96.7	96.4212	96.2875	0.13373	0.27877
53	96.7	96.7194	96.6458	0.0736111	-0.0194444
54	96.9	97.001	96.9875	0.0134921	-0.100992
55	97.3	97.2516	97.3083	-0.056746	0.0484127
56	97.4	97.4075	97.5833	-0.175794	-0.00753968
57	97.9	97.7433	97.8375	-0.094246	0.156746
58	98.4	98.0665	98.0792	-0.0126984	0.333532
59	98.4	98.2403	98.3167	-0.0763889	0.159722
60	98.8	98.4224	98.5625	-0.140079	0.377579
61	98.9	98.823	98.7833	0.0396825	0.0769841
62	98.9	99.0944	98.9875	0.106944	-0.194444
63	99.3	99.3843	99.1958	0.188492	-0.0843254
64	99.4	99.5462	99.4125	0.13373	-0.14623
65	99.7	99.7194	99.6458	0.0736111	-0.0194444
66	99.8	99.8885	99.875	0.0134921	-0.0884921
67	99.7	100.047	100.104	-0.056746	-0.347421
68	99.9	100.187	100.363	-0.175794	-0.286706
69	100.4	100.535	100.629	-0.094246	-0.134921
70	101.1	100.875	100.888	-0.0126984	0.225198
71	101.3	101.069	101.146	-0.0763889	0.230556
72	101.4	101.268	101.408	-0.140079	0.131746
73	101.8	101.727	101.688	0.0396825	0.0728175
74	102.2	102.078	101.971	0.106944	0.122222
75	102.4	102.43	102.242	0.188492	-0.0301587
76	102.5	102.617	102.483	0.13373	-0.117063
77	102.8	102.765	102.692	0.0736111	0.0347222
78	103	102.905	102.892	0.0134921	0.0948413
79	103.2	103.035	103.092	-0.056746	0.165079
80	103.2	103.112	103.288	-0.175794	0.0882937
81	103.6	103.377	103.471	-0.094246	0.223413
82	103.7	103.641	103.654	-0.0126984	0.0585317
83	103.7	103.774	103.85	-0.0763889	-0.0736111
84	103.8	103.906	104.046	-0.140079	-0.105754
85	104.2	104.277	104.237	0.0396825	-0.0771825
86	104.5	104.532	104.425	0.106944	-0.0319444
87	104.5	104.793	104.604	0.188492	-0.292659
88	104.8	104.955	104.821	0.13373	-0.154563
89	105.2	105.153	105.079	0.0736111	0.0472222
90	105.3	105.355	105.342	0.0134921	-0.0551587
91	105.5	NA	NA	-0.056746	NA
92	105.4	NA	NA	-0.175794	NA
93	105.7	NA	NA	-0.094246	NA
94	106.8	NA	NA	-0.0126984	NA
95	106.8	NA	NA	-0.0763889	NA
96	107	NA	NA	-0.140079	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,signif(m$trend[i]+m$seasonal[i],6)) else a<-table.element(a,signif(m$trend[i]*m$seasonal[i],6))
a<-table.element(a,signif(m$trend[i],6))
a<-table.element(a,signif(m$seasonal[i],6))
a<-table.element(a,signif(m$random[i],6))
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