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

Mon, 30 Nov 2015 15:48:17 +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/2015/Nov/30/t1448898511qf00mxq760v9p87.htm/, Retrieved Tue, 14 May 2024 21:50:28 +0000

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

130

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

-       [Classical Decomposition] [] [2015-11-30 15:48:17] [07f175c9375843c217f66b4a3796ae0c] [Current]
- R PD    [Classical Decomposition] [] [2015-12-27 16:21:17] [b1987693a2b63654c6d4ca246f63ea73] 

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	'Sir Ronald Aylmer Fisher' @ fisher.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 & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284620&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]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=284620&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284620&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	'Sir Ronald Aylmer Fisher' @ fisher.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	85.95	NA	NA	-0.106716	NA
2	86.41	NA	NA	0.155843	NA
3	86.42	NA	NA	0.193819	NA
4	86.81	NA	NA	0.136141	NA
5	86.71	NA	NA	0.196081	NA
6	86.7	NA	NA	0.149474	NA
7	87.07	87.2764	87.1613	0.115129	-0.206379
8	86.96	87.3542	87.4162	-0.0620139	-0.394236
9	87.04	87.5835	87.7054	-0.121954	-0.543462
10	87.5	87.8272	88.0137	-0.186597	-0.327153
11	88.32	88.1441	88.3525	-0.208442	0.175942
12	88.56	88.4897	88.7504	-0.260764	0.0703472
13	88.92	89.0675	89.1742	-0.106716	-0.14745
14	89.56	89.7396	89.5838	0.155843	-0.179593
15	90.21	90.1713	89.9775	0.193819	0.0386806
16	90.42	90.4841	90.3479	0.136141	-0.0640575
17	91.23	90.8315	90.6354	0.196081	0.398502
18	91.73	90.9974	90.8479	0.149474	0.732609
19	92.21	91.146	91.0308	0.115129	1.06404
20	91.65	91.1267	91.1888	-0.0620139	0.523264
21	91.8	91.1622	91.2842	-0.121954	0.637788
22	91.63	91.1434	91.33	-0.186597	0.486597
23	91.09	91.1299	91.3383	-0.208442	-0.0398909
24	90.89	91.0213	91.2821	-0.260764	-0.131319
25	90.98	91.0687	91.1754	-0.106716	-0.0887004
26	91.29	91.2371	91.0813	0.155843	0.0529067
27	90.77	91.1997	91.0058	0.193819	-0.429653
28	90.96	91.0591	90.9229	0.136141	-0.0990575
29	90.89	91.0773	90.8813	0.196081	-0.187331
30	90.72	91.0361	90.8867	0.149474	-0.316141
31	90.66	91.0351	90.92	0.115129	-0.375129
32	90.94	90.908	90.97	-0.0620139	0.0320139
33	90.7	90.9372	91.0592	-0.121954	-0.237212
34	90.74	91.003	91.1896	-0.186597	-0.262986
35	90.98	91.1353	91.3438	-0.208442	-0.155308
36	91.13	91.2622	91.5229	-0.260764	-0.132153
37	91.54	91.6062	91.7129	-0.106716	-0.0662004
38	91.93	92.0538	91.8979	0.155843	-0.12376
39	92.27	92.2897	92.0958	0.193819	-0.0196528
40	92.59	92.4557	92.3196	0.136141	0.134276
41	92.96	92.7382	92.5421	0.196081	0.221835
42	92.95	92.9182	92.7688	0.149474	0.0317758
43	92.99	93.1247	93.0096	0.115129	-0.134712
44	93.05	93.2001	93.2621	-0.0620139	-0.150069
45	93.34	93.4051	93.5271	-0.121954	-0.065129
46	93.47	93.6076	93.7942	-0.186597	-0.137569
47	93.59	93.847	94.0554	-0.208442	-0.256974
48	93.96	94.0667	94.3275	-0.260764	-0.106736
49	94.49	94.5087	94.6154	-0.106716	-0.0187004
50	95.04	95.0563	94.9004	0.155843	-0.0162599
51	95.52	95.3722	95.1783	0.193819	0.147847
52	95.75	95.592	95.4558	0.136141	0.158026
53	96.07	95.9411	95.745	0.196081	0.128919
54	96.37	96.1807	96.0312	0.149474	0.189276
55	96.48	96.4264	96.3112	0.115129	0.053621
56	96.4	96.538	96.6	-0.0620139	-0.137986
57	96.66	96.7568	96.8788	-0.121954	-0.0967956
58	96.81	96.953	97.1396	-0.186597	-0.142986
59	97.19	97.1707	97.3792	-0.208442	0.0192758
60	97.23	97.3213	97.5821	-0.260764	-0.0913194
61	97.94	97.6591	97.7658	-0.106716	0.280883
62	98.52	98.1296	97.9737	0.155843	0.390407
63	98.73	98.393	98.1992	0.193819	0.337014
64	98.8	98.5582	98.4221	0.136141	0.241776
65	98.77	98.8219	98.6258	0.196081	-0.0519147
66	98.54	98.9574	98.8079	0.149474	-0.417391
67	98.72	99.073	98.9579	0.115129	-0.353046
68	99.15	99.0042	99.0663	-0.0620139	0.145764
69	99.32	99.0389	99.1608	-0.121954	0.281121
70	99.5	99.0613	99.2479	-0.186597	0.438681
71	99.39	99.1295	99.3379	-0.208442	0.260526
72	99.4	99.1913	99.4521	-0.260764	0.208681
73	99.37	99.4729	99.5796	-0.106716	-0.102867
74	99.69	99.8392	99.6833	0.155843	-0.149177
75	99.83	99.9559	99.7621	0.193819	-0.125903
76	99.79	99.9616	99.8254	0.136141	-0.171558
77	99.94	100.081	99.8854	0.196081	-0.141498
78	100.11	100.109	99.9592	0.149474	0.00135913
79	100.21	100.161	100.046	0.115129	0.048621
80	100.15	100.072	100.134	-0.0620139	0.0782639
81	100.21	100.089	100.211	-0.121954	0.120704
82	100.13	100.088	100.274	-0.186597	0.0424306
83	100.2	100.107	100.315	-0.208442	0.0934425
84	100.36	100.08	100.341	-0.260764	0.279514
85	100.5	100.26	100.367	-0.106716	0.24005
86	100.66	100.538	100.382	0.155843	0.12249
87	100.72	100.571	100.377	0.193819	0.148681
88	100.41	100.512	100.376	0.136141	-0.102391
89	100.3	100.571	100.375	0.196081	-0.271498
90	100.38	100.504	100.355	0.149474	-0.124474
91	100.55	NA	NA	0.115129	NA
92	100.17	NA	NA	-0.0620139	NA
93	100.09	NA	NA	-0.121954	NA
94	100.22	NA	NA	-0.186597	NA
95	100.09	NA	NA	-0.208442	NA
96	99.98	NA	NA	-0.260764	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 85.95 & NA & NA & -0.106716 & NA \tabularnewline
2 & 86.41 & NA & NA & 0.155843 & NA \tabularnewline
3 & 86.42 & NA & NA & 0.193819 & NA \tabularnewline
4 & 86.81 & NA & NA & 0.136141 & NA \tabularnewline
5 & 86.71 & NA & NA & 0.196081 & NA \tabularnewline
6 & 86.7 & NA & NA & 0.149474 & NA \tabularnewline
7 & 87.07 & 87.2764 & 87.1613 & 0.115129 & -0.206379 \tabularnewline
8 & 86.96 & 87.3542 & 87.4162 & -0.0620139 & -0.394236 \tabularnewline
9 & 87.04 & 87.5835 & 87.7054 & -0.121954 & -0.543462 \tabularnewline
10 & 87.5 & 87.8272 & 88.0137 & -0.186597 & -0.327153 \tabularnewline
11 & 88.32 & 88.1441 & 88.3525 & -0.208442 & 0.175942 \tabularnewline
12 & 88.56 & 88.4897 & 88.7504 & -0.260764 & 0.0703472 \tabularnewline
13 & 88.92 & 89.0675 & 89.1742 & -0.106716 & -0.14745 \tabularnewline
14 & 89.56 & 89.7396 & 89.5838 & 0.155843 & -0.179593 \tabularnewline
15 & 90.21 & 90.1713 & 89.9775 & 0.193819 & 0.0386806 \tabularnewline
16 & 90.42 & 90.4841 & 90.3479 & 0.136141 & -0.0640575 \tabularnewline
17 & 91.23 & 90.8315 & 90.6354 & 0.196081 & 0.398502 \tabularnewline
18 & 91.73 & 90.9974 & 90.8479 & 0.149474 & 0.732609 \tabularnewline
19 & 92.21 & 91.146 & 91.0308 & 0.115129 & 1.06404 \tabularnewline
20 & 91.65 & 91.1267 & 91.1888 & -0.0620139 & 0.523264 \tabularnewline
21 & 91.8 & 91.1622 & 91.2842 & -0.121954 & 0.637788 \tabularnewline
22 & 91.63 & 91.1434 & 91.33 & -0.186597 & 0.486597 \tabularnewline
23 & 91.09 & 91.1299 & 91.3383 & -0.208442 & -0.0398909 \tabularnewline
24 & 90.89 & 91.0213 & 91.2821 & -0.260764 & -0.131319 \tabularnewline
25 & 90.98 & 91.0687 & 91.1754 & -0.106716 & -0.0887004 \tabularnewline
26 & 91.29 & 91.2371 & 91.0813 & 0.155843 & 0.0529067 \tabularnewline
27 & 90.77 & 91.1997 & 91.0058 & 0.193819 & -0.429653 \tabularnewline
28 & 90.96 & 91.0591 & 90.9229 & 0.136141 & -0.0990575 \tabularnewline
29 & 90.89 & 91.0773 & 90.8813 & 0.196081 & -0.187331 \tabularnewline
30 & 90.72 & 91.0361 & 90.8867 & 0.149474 & -0.316141 \tabularnewline
31 & 90.66 & 91.0351 & 90.92 & 0.115129 & -0.375129 \tabularnewline
32 & 90.94 & 90.908 & 90.97 & -0.0620139 & 0.0320139 \tabularnewline
33 & 90.7 & 90.9372 & 91.0592 & -0.121954 & -0.237212 \tabularnewline
34 & 90.74 & 91.003 & 91.1896 & -0.186597 & -0.262986 \tabularnewline
35 & 90.98 & 91.1353 & 91.3438 & -0.208442 & -0.155308 \tabularnewline
36 & 91.13 & 91.2622 & 91.5229 & -0.260764 & -0.132153 \tabularnewline
37 & 91.54 & 91.6062 & 91.7129 & -0.106716 & -0.0662004 \tabularnewline
38 & 91.93 & 92.0538 & 91.8979 & 0.155843 & -0.12376 \tabularnewline
39 & 92.27 & 92.2897 & 92.0958 & 0.193819 & -0.0196528 \tabularnewline
40 & 92.59 & 92.4557 & 92.3196 & 0.136141 & 0.134276 \tabularnewline
41 & 92.96 & 92.7382 & 92.5421 & 0.196081 & 0.221835 \tabularnewline
42 & 92.95 & 92.9182 & 92.7688 & 0.149474 & 0.0317758 \tabularnewline
43 & 92.99 & 93.1247 & 93.0096 & 0.115129 & -0.134712 \tabularnewline
44 & 93.05 & 93.2001 & 93.2621 & -0.0620139 & -0.150069 \tabularnewline
45 & 93.34 & 93.4051 & 93.5271 & -0.121954 & -0.065129 \tabularnewline
46 & 93.47 & 93.6076 & 93.7942 & -0.186597 & -0.137569 \tabularnewline
47 & 93.59 & 93.847 & 94.0554 & -0.208442 & -0.256974 \tabularnewline
48 & 93.96 & 94.0667 & 94.3275 & -0.260764 & -0.106736 \tabularnewline
49 & 94.49 & 94.5087 & 94.6154 & -0.106716 & -0.0187004 \tabularnewline
50 & 95.04 & 95.0563 & 94.9004 & 0.155843 & -0.0162599 \tabularnewline
51 & 95.52 & 95.3722 & 95.1783 & 0.193819 & 0.147847 \tabularnewline
52 & 95.75 & 95.592 & 95.4558 & 0.136141 & 0.158026 \tabularnewline
53 & 96.07 & 95.9411 & 95.745 & 0.196081 & 0.128919 \tabularnewline
54 & 96.37 & 96.1807 & 96.0312 & 0.149474 & 0.189276 \tabularnewline
55 & 96.48 & 96.4264 & 96.3112 & 0.115129 & 0.053621 \tabularnewline
56 & 96.4 & 96.538 & 96.6 & -0.0620139 & -0.137986 \tabularnewline
57 & 96.66 & 96.7568 & 96.8788 & -0.121954 & -0.0967956 \tabularnewline
58 & 96.81 & 96.953 & 97.1396 & -0.186597 & -0.142986 \tabularnewline
59 & 97.19 & 97.1707 & 97.3792 & -0.208442 & 0.0192758 \tabularnewline
60 & 97.23 & 97.3213 & 97.5821 & -0.260764 & -0.0913194 \tabularnewline
61 & 97.94 & 97.6591 & 97.7658 & -0.106716 & 0.280883 \tabularnewline
62 & 98.52 & 98.1296 & 97.9737 & 0.155843 & 0.390407 \tabularnewline
63 & 98.73 & 98.393 & 98.1992 & 0.193819 & 0.337014 \tabularnewline
64 & 98.8 & 98.5582 & 98.4221 & 0.136141 & 0.241776 \tabularnewline
65 & 98.77 & 98.8219 & 98.6258 & 0.196081 & -0.0519147 \tabularnewline
66 & 98.54 & 98.9574 & 98.8079 & 0.149474 & -0.417391 \tabularnewline
67 & 98.72 & 99.073 & 98.9579 & 0.115129 & -0.353046 \tabularnewline
68 & 99.15 & 99.0042 & 99.0663 & -0.0620139 & 0.145764 \tabularnewline
69 & 99.32 & 99.0389 & 99.1608 & -0.121954 & 0.281121 \tabularnewline
70 & 99.5 & 99.0613 & 99.2479 & -0.186597 & 0.438681 \tabularnewline
71 & 99.39 & 99.1295 & 99.3379 & -0.208442 & 0.260526 \tabularnewline
72 & 99.4 & 99.1913 & 99.4521 & -0.260764 & 0.208681 \tabularnewline
73 & 99.37 & 99.4729 & 99.5796 & -0.106716 & -0.102867 \tabularnewline
74 & 99.69 & 99.8392 & 99.6833 & 0.155843 & -0.149177 \tabularnewline
75 & 99.83 & 99.9559 & 99.7621 & 0.193819 & -0.125903 \tabularnewline
76 & 99.79 & 99.9616 & 99.8254 & 0.136141 & -0.171558 \tabularnewline
77 & 99.94 & 100.081 & 99.8854 & 0.196081 & -0.141498 \tabularnewline
78 & 100.11 & 100.109 & 99.9592 & 0.149474 & 0.00135913 \tabularnewline
79 & 100.21 & 100.161 & 100.046 & 0.115129 & 0.048621 \tabularnewline
80 & 100.15 & 100.072 & 100.134 & -0.0620139 & 0.0782639 \tabularnewline
81 & 100.21 & 100.089 & 100.211 & -0.121954 & 0.120704 \tabularnewline
82 & 100.13 & 100.088 & 100.274 & -0.186597 & 0.0424306 \tabularnewline
83 & 100.2 & 100.107 & 100.315 & -0.208442 & 0.0934425 \tabularnewline
84 & 100.36 & 100.08 & 100.341 & -0.260764 & 0.279514 \tabularnewline
85 & 100.5 & 100.26 & 100.367 & -0.106716 & 0.24005 \tabularnewline
86 & 100.66 & 100.538 & 100.382 & 0.155843 & 0.12249 \tabularnewline
87 & 100.72 & 100.571 & 100.377 & 0.193819 & 0.148681 \tabularnewline
88 & 100.41 & 100.512 & 100.376 & 0.136141 & -0.102391 \tabularnewline
89 & 100.3 & 100.571 & 100.375 & 0.196081 & -0.271498 \tabularnewline
90 & 100.38 & 100.504 & 100.355 & 0.149474 & -0.124474 \tabularnewline
91 & 100.55 & NA & NA & 0.115129 & NA \tabularnewline
92 & 100.17 & NA & NA & -0.0620139 & NA \tabularnewline
93 & 100.09 & NA & NA & -0.121954 & NA \tabularnewline
94 & 100.22 & NA & NA & -0.186597 & NA \tabularnewline
95 & 100.09 & NA & NA & -0.208442 & NA \tabularnewline
96 & 99.98 & NA & NA & -0.260764 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284620&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]85.95[/C][C]NA[/C][C]NA[/C][C]-0.106716[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]86.41[/C][C]NA[/C][C]NA[/C][C]0.155843[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]86.42[/C][C]NA[/C][C]NA[/C][C]0.193819[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]86.81[/C][C]NA[/C][C]NA[/C][C]0.136141[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]86.71[/C][C]NA[/C][C]NA[/C][C]0.196081[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]86.7[/C][C]NA[/C][C]NA[/C][C]0.149474[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]87.07[/C][C]87.2764[/C][C]87.1613[/C][C]0.115129[/C][C]-0.206379[/C][/ROW]
[ROW][C]8[/C][C]86.96[/C][C]87.3542[/C][C]87.4162[/C][C]-0.0620139[/C][C]-0.394236[/C][/ROW]
[ROW][C]9[/C][C]87.04[/C][C]87.5835[/C][C]87.7054[/C][C]-0.121954[/C][C]-0.543462[/C][/ROW]
[ROW][C]10[/C][C]87.5[/C][C]87.8272[/C][C]88.0137[/C][C]-0.186597[/C][C]-0.327153[/C][/ROW]
[ROW][C]11[/C][C]88.32[/C][C]88.1441[/C][C]88.3525[/C][C]-0.208442[/C][C]0.175942[/C][/ROW]
[ROW][C]12[/C][C]88.56[/C][C]88.4897[/C][C]88.7504[/C][C]-0.260764[/C][C]0.0703472[/C][/ROW]
[ROW][C]13[/C][C]88.92[/C][C]89.0675[/C][C]89.1742[/C][C]-0.106716[/C][C]-0.14745[/C][/ROW]
[ROW][C]14[/C][C]89.56[/C][C]89.7396[/C][C]89.5838[/C][C]0.155843[/C][C]-0.179593[/C][/ROW]
[ROW][C]15[/C][C]90.21[/C][C]90.1713[/C][C]89.9775[/C][C]0.193819[/C][C]0.0386806[/C][/ROW]
[ROW][C]16[/C][C]90.42[/C][C]90.4841[/C][C]90.3479[/C][C]0.136141[/C][C]-0.0640575[/C][/ROW]
[ROW][C]17[/C][C]91.23[/C][C]90.8315[/C][C]90.6354[/C][C]0.196081[/C][C]0.398502[/C][/ROW]
[ROW][C]18[/C][C]91.73[/C][C]90.9974[/C][C]90.8479[/C][C]0.149474[/C][C]0.732609[/C][/ROW]
[ROW][C]19[/C][C]92.21[/C][C]91.146[/C][C]91.0308[/C][C]0.115129[/C][C]1.06404[/C][/ROW]
[ROW][C]20[/C][C]91.65[/C][C]91.1267[/C][C]91.1888[/C][C]-0.0620139[/C][C]0.523264[/C][/ROW]
[ROW][C]21[/C][C]91.8[/C][C]91.1622[/C][C]91.2842[/C][C]-0.121954[/C][C]0.637788[/C][/ROW]
[ROW][C]22[/C][C]91.63[/C][C]91.1434[/C][C]91.33[/C][C]-0.186597[/C][C]0.486597[/C][/ROW]
[ROW][C]23[/C][C]91.09[/C][C]91.1299[/C][C]91.3383[/C][C]-0.208442[/C][C]-0.0398909[/C][/ROW]
[ROW][C]24[/C][C]90.89[/C][C]91.0213[/C][C]91.2821[/C][C]-0.260764[/C][C]-0.131319[/C][/ROW]
[ROW][C]25[/C][C]90.98[/C][C]91.0687[/C][C]91.1754[/C][C]-0.106716[/C][C]-0.0887004[/C][/ROW]
[ROW][C]26[/C][C]91.29[/C][C]91.2371[/C][C]91.0813[/C][C]0.155843[/C][C]0.0529067[/C][/ROW]
[ROW][C]27[/C][C]90.77[/C][C]91.1997[/C][C]91.0058[/C][C]0.193819[/C][C]-0.429653[/C][/ROW]
[ROW][C]28[/C][C]90.96[/C][C]91.0591[/C][C]90.9229[/C][C]0.136141[/C][C]-0.0990575[/C][/ROW]
[ROW][C]29[/C][C]90.89[/C][C]91.0773[/C][C]90.8813[/C][C]0.196081[/C][C]-0.187331[/C][/ROW]
[ROW][C]30[/C][C]90.72[/C][C]91.0361[/C][C]90.8867[/C][C]0.149474[/C][C]-0.316141[/C][/ROW]
[ROW][C]31[/C][C]90.66[/C][C]91.0351[/C][C]90.92[/C][C]0.115129[/C][C]-0.375129[/C][/ROW]
[ROW][C]32[/C][C]90.94[/C][C]90.908[/C][C]90.97[/C][C]-0.0620139[/C][C]0.0320139[/C][/ROW]
[ROW][C]33[/C][C]90.7[/C][C]90.9372[/C][C]91.0592[/C][C]-0.121954[/C][C]-0.237212[/C][/ROW]
[ROW][C]34[/C][C]90.74[/C][C]91.003[/C][C]91.1896[/C][C]-0.186597[/C][C]-0.262986[/C][/ROW]
[ROW][C]35[/C][C]90.98[/C][C]91.1353[/C][C]91.3438[/C][C]-0.208442[/C][C]-0.155308[/C][/ROW]
[ROW][C]36[/C][C]91.13[/C][C]91.2622[/C][C]91.5229[/C][C]-0.260764[/C][C]-0.132153[/C][/ROW]
[ROW][C]37[/C][C]91.54[/C][C]91.6062[/C][C]91.7129[/C][C]-0.106716[/C][C]-0.0662004[/C][/ROW]
[ROW][C]38[/C][C]91.93[/C][C]92.0538[/C][C]91.8979[/C][C]0.155843[/C][C]-0.12376[/C][/ROW]
[ROW][C]39[/C][C]92.27[/C][C]92.2897[/C][C]92.0958[/C][C]0.193819[/C][C]-0.0196528[/C][/ROW]
[ROW][C]40[/C][C]92.59[/C][C]92.4557[/C][C]92.3196[/C][C]0.136141[/C][C]0.134276[/C][/ROW]
[ROW][C]41[/C][C]92.96[/C][C]92.7382[/C][C]92.5421[/C][C]0.196081[/C][C]0.221835[/C][/ROW]
[ROW][C]42[/C][C]92.95[/C][C]92.9182[/C][C]92.7688[/C][C]0.149474[/C][C]0.0317758[/C][/ROW]
[ROW][C]43[/C][C]92.99[/C][C]93.1247[/C][C]93.0096[/C][C]0.115129[/C][C]-0.134712[/C][/ROW]
[ROW][C]44[/C][C]93.05[/C][C]93.2001[/C][C]93.2621[/C][C]-0.0620139[/C][C]-0.150069[/C][/ROW]
[ROW][C]45[/C][C]93.34[/C][C]93.4051[/C][C]93.5271[/C][C]-0.121954[/C][C]-0.065129[/C][/ROW]
[ROW][C]46[/C][C]93.47[/C][C]93.6076[/C][C]93.7942[/C][C]-0.186597[/C][C]-0.137569[/C][/ROW]
[ROW][C]47[/C][C]93.59[/C][C]93.847[/C][C]94.0554[/C][C]-0.208442[/C][C]-0.256974[/C][/ROW]
[ROW][C]48[/C][C]93.96[/C][C]94.0667[/C][C]94.3275[/C][C]-0.260764[/C][C]-0.106736[/C][/ROW]
[ROW][C]49[/C][C]94.49[/C][C]94.5087[/C][C]94.6154[/C][C]-0.106716[/C][C]-0.0187004[/C][/ROW]
[ROW][C]50[/C][C]95.04[/C][C]95.0563[/C][C]94.9004[/C][C]0.155843[/C][C]-0.0162599[/C][/ROW]
[ROW][C]51[/C][C]95.52[/C][C]95.3722[/C][C]95.1783[/C][C]0.193819[/C][C]0.147847[/C][/ROW]
[ROW][C]52[/C][C]95.75[/C][C]95.592[/C][C]95.4558[/C][C]0.136141[/C][C]0.158026[/C][/ROW]
[ROW][C]53[/C][C]96.07[/C][C]95.9411[/C][C]95.745[/C][C]0.196081[/C][C]0.128919[/C][/ROW]
[ROW][C]54[/C][C]96.37[/C][C]96.1807[/C][C]96.0312[/C][C]0.149474[/C][C]0.189276[/C][/ROW]
[ROW][C]55[/C][C]96.48[/C][C]96.4264[/C][C]96.3112[/C][C]0.115129[/C][C]0.053621[/C][/ROW]
[ROW][C]56[/C][C]96.4[/C][C]96.538[/C][C]96.6[/C][C]-0.0620139[/C][C]-0.137986[/C][/ROW]
[ROW][C]57[/C][C]96.66[/C][C]96.7568[/C][C]96.8788[/C][C]-0.121954[/C][C]-0.0967956[/C][/ROW]
[ROW][C]58[/C][C]96.81[/C][C]96.953[/C][C]97.1396[/C][C]-0.186597[/C][C]-0.142986[/C][/ROW]
[ROW][C]59[/C][C]97.19[/C][C]97.1707[/C][C]97.3792[/C][C]-0.208442[/C][C]0.0192758[/C][/ROW]
[ROW][C]60[/C][C]97.23[/C][C]97.3213[/C][C]97.5821[/C][C]-0.260764[/C][C]-0.0913194[/C][/ROW]
[ROW][C]61[/C][C]97.94[/C][C]97.6591[/C][C]97.7658[/C][C]-0.106716[/C][C]0.280883[/C][/ROW]
[ROW][C]62[/C][C]98.52[/C][C]98.1296[/C][C]97.9737[/C][C]0.155843[/C][C]0.390407[/C][/ROW]
[ROW][C]63[/C][C]98.73[/C][C]98.393[/C][C]98.1992[/C][C]0.193819[/C][C]0.337014[/C][/ROW]
[ROW][C]64[/C][C]98.8[/C][C]98.5582[/C][C]98.4221[/C][C]0.136141[/C][C]0.241776[/C][/ROW]
[ROW][C]65[/C][C]98.77[/C][C]98.8219[/C][C]98.6258[/C][C]0.196081[/C][C]-0.0519147[/C][/ROW]
[ROW][C]66[/C][C]98.54[/C][C]98.9574[/C][C]98.8079[/C][C]0.149474[/C][C]-0.417391[/C][/ROW]
[ROW][C]67[/C][C]98.72[/C][C]99.073[/C][C]98.9579[/C][C]0.115129[/C][C]-0.353046[/C][/ROW]
[ROW][C]68[/C][C]99.15[/C][C]99.0042[/C][C]99.0663[/C][C]-0.0620139[/C][C]0.145764[/C][/ROW]
[ROW][C]69[/C][C]99.32[/C][C]99.0389[/C][C]99.1608[/C][C]-0.121954[/C][C]0.281121[/C][/ROW]
[ROW][C]70[/C][C]99.5[/C][C]99.0613[/C][C]99.2479[/C][C]-0.186597[/C][C]0.438681[/C][/ROW]
[ROW][C]71[/C][C]99.39[/C][C]99.1295[/C][C]99.3379[/C][C]-0.208442[/C][C]0.260526[/C][/ROW]
[ROW][C]72[/C][C]99.4[/C][C]99.1913[/C][C]99.4521[/C][C]-0.260764[/C][C]0.208681[/C][/ROW]
[ROW][C]73[/C][C]99.37[/C][C]99.4729[/C][C]99.5796[/C][C]-0.106716[/C][C]-0.102867[/C][/ROW]
[ROW][C]74[/C][C]99.69[/C][C]99.8392[/C][C]99.6833[/C][C]0.155843[/C][C]-0.149177[/C][/ROW]
[ROW][C]75[/C][C]99.83[/C][C]99.9559[/C][C]99.7621[/C][C]0.193819[/C][C]-0.125903[/C][/ROW]
[ROW][C]76[/C][C]99.79[/C][C]99.9616[/C][C]99.8254[/C][C]0.136141[/C][C]-0.171558[/C][/ROW]
[ROW][C]77[/C][C]99.94[/C][C]100.081[/C][C]99.8854[/C][C]0.196081[/C][C]-0.141498[/C][/ROW]
[ROW][C]78[/C][C]100.11[/C][C]100.109[/C][C]99.9592[/C][C]0.149474[/C][C]0.00135913[/C][/ROW]
[ROW][C]79[/C][C]100.21[/C][C]100.161[/C][C]100.046[/C][C]0.115129[/C][C]0.048621[/C][/ROW]
[ROW][C]80[/C][C]100.15[/C][C]100.072[/C][C]100.134[/C][C]-0.0620139[/C][C]0.0782639[/C][/ROW]
[ROW][C]81[/C][C]100.21[/C][C]100.089[/C][C]100.211[/C][C]-0.121954[/C][C]0.120704[/C][/ROW]
[ROW][C]82[/C][C]100.13[/C][C]100.088[/C][C]100.274[/C][C]-0.186597[/C][C]0.0424306[/C][/ROW]
[ROW][C]83[/C][C]100.2[/C][C]100.107[/C][C]100.315[/C][C]-0.208442[/C][C]0.0934425[/C][/ROW]
[ROW][C]84[/C][C]100.36[/C][C]100.08[/C][C]100.341[/C][C]-0.260764[/C][C]0.279514[/C][/ROW]
[ROW][C]85[/C][C]100.5[/C][C]100.26[/C][C]100.367[/C][C]-0.106716[/C][C]0.24005[/C][/ROW]
[ROW][C]86[/C][C]100.66[/C][C]100.538[/C][C]100.382[/C][C]0.155843[/C][C]0.12249[/C][/ROW]
[ROW][C]87[/C][C]100.72[/C][C]100.571[/C][C]100.377[/C][C]0.193819[/C][C]0.148681[/C][/ROW]
[ROW][C]88[/C][C]100.41[/C][C]100.512[/C][C]100.376[/C][C]0.136141[/C][C]-0.102391[/C][/ROW]
[ROW][C]89[/C][C]100.3[/C][C]100.571[/C][C]100.375[/C][C]0.196081[/C][C]-0.271498[/C][/ROW]
[ROW][C]90[/C][C]100.38[/C][C]100.504[/C][C]100.355[/C][C]0.149474[/C][C]-0.124474[/C][/ROW]
[ROW][C]91[/C][C]100.55[/C][C]NA[/C][C]NA[/C][C]0.115129[/C][C]NA[/C][/ROW]
[ROW][C]92[/C][C]100.17[/C][C]NA[/C][C]NA[/C][C]-0.0620139[/C][C]NA[/C][/ROW]
[ROW][C]93[/C][C]100.09[/C][C]NA[/C][C]NA[/C][C]-0.121954[/C][C]NA[/C][/ROW]
[ROW][C]94[/C][C]100.22[/C][C]NA[/C][C]NA[/C][C]-0.186597[/C][C]NA[/C][/ROW]
[ROW][C]95[/C][C]100.09[/C][C]NA[/C][C]NA[/C][C]-0.208442[/C][C]NA[/C][/ROW]
[ROW][C]96[/C][C]99.98[/C][C]NA[/C][C]NA[/C][C]-0.260764[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=284620&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284620&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	85.95	NA	NA	-0.106716	NA
2	86.41	NA	NA	0.155843	NA
3	86.42	NA	NA	0.193819	NA
4	86.81	NA	NA	0.136141	NA
5	86.71	NA	NA	0.196081	NA
6	86.7	NA	NA	0.149474	NA
7	87.07	87.2764	87.1613	0.115129	-0.206379
8	86.96	87.3542	87.4162	-0.0620139	-0.394236
9	87.04	87.5835	87.7054	-0.121954	-0.543462
10	87.5	87.8272	88.0137	-0.186597	-0.327153
11	88.32	88.1441	88.3525	-0.208442	0.175942
12	88.56	88.4897	88.7504	-0.260764	0.0703472
13	88.92	89.0675	89.1742	-0.106716	-0.14745
14	89.56	89.7396	89.5838	0.155843	-0.179593
15	90.21	90.1713	89.9775	0.193819	0.0386806
16	90.42	90.4841	90.3479	0.136141	-0.0640575
17	91.23	90.8315	90.6354	0.196081	0.398502
18	91.73	90.9974	90.8479	0.149474	0.732609
19	92.21	91.146	91.0308	0.115129	1.06404
20	91.65	91.1267	91.1888	-0.0620139	0.523264
21	91.8	91.1622	91.2842	-0.121954	0.637788
22	91.63	91.1434	91.33	-0.186597	0.486597
23	91.09	91.1299	91.3383	-0.208442	-0.0398909
24	90.89	91.0213	91.2821	-0.260764	-0.131319
25	90.98	91.0687	91.1754	-0.106716	-0.0887004
26	91.29	91.2371	91.0813	0.155843	0.0529067
27	90.77	91.1997	91.0058	0.193819	-0.429653
28	90.96	91.0591	90.9229	0.136141	-0.0990575
29	90.89	91.0773	90.8813	0.196081	-0.187331
30	90.72	91.0361	90.8867	0.149474	-0.316141
31	90.66	91.0351	90.92	0.115129	-0.375129
32	90.94	90.908	90.97	-0.0620139	0.0320139
33	90.7	90.9372	91.0592	-0.121954	-0.237212
34	90.74	91.003	91.1896	-0.186597	-0.262986
35	90.98	91.1353	91.3438	-0.208442	-0.155308
36	91.13	91.2622	91.5229	-0.260764	-0.132153
37	91.54	91.6062	91.7129	-0.106716	-0.0662004
38	91.93	92.0538	91.8979	0.155843	-0.12376
39	92.27	92.2897	92.0958	0.193819	-0.0196528
40	92.59	92.4557	92.3196	0.136141	0.134276
41	92.96	92.7382	92.5421	0.196081	0.221835
42	92.95	92.9182	92.7688	0.149474	0.0317758
43	92.99	93.1247	93.0096	0.115129	-0.134712
44	93.05	93.2001	93.2621	-0.0620139	-0.150069
45	93.34	93.4051	93.5271	-0.121954	-0.065129
46	93.47	93.6076	93.7942	-0.186597	-0.137569
47	93.59	93.847	94.0554	-0.208442	-0.256974
48	93.96	94.0667	94.3275	-0.260764	-0.106736
49	94.49	94.5087	94.6154	-0.106716	-0.0187004
50	95.04	95.0563	94.9004	0.155843	-0.0162599
51	95.52	95.3722	95.1783	0.193819	0.147847
52	95.75	95.592	95.4558	0.136141	0.158026
53	96.07	95.9411	95.745	0.196081	0.128919
54	96.37	96.1807	96.0312	0.149474	0.189276
55	96.48	96.4264	96.3112	0.115129	0.053621
56	96.4	96.538	96.6	-0.0620139	-0.137986
57	96.66	96.7568	96.8788	-0.121954	-0.0967956
58	96.81	96.953	97.1396	-0.186597	-0.142986
59	97.19	97.1707	97.3792	-0.208442	0.0192758
60	97.23	97.3213	97.5821	-0.260764	-0.0913194
61	97.94	97.6591	97.7658	-0.106716	0.280883
62	98.52	98.1296	97.9737	0.155843	0.390407
63	98.73	98.393	98.1992	0.193819	0.337014
64	98.8	98.5582	98.4221	0.136141	0.241776
65	98.77	98.8219	98.6258	0.196081	-0.0519147
66	98.54	98.9574	98.8079	0.149474	-0.417391
67	98.72	99.073	98.9579	0.115129	-0.353046
68	99.15	99.0042	99.0663	-0.0620139	0.145764
69	99.32	99.0389	99.1608	-0.121954	0.281121
70	99.5	99.0613	99.2479	-0.186597	0.438681
71	99.39	99.1295	99.3379	-0.208442	0.260526
72	99.4	99.1913	99.4521	-0.260764	0.208681
73	99.37	99.4729	99.5796	-0.106716	-0.102867
74	99.69	99.8392	99.6833	0.155843	-0.149177
75	99.83	99.9559	99.7621	0.193819	-0.125903
76	99.79	99.9616	99.8254	0.136141	-0.171558
77	99.94	100.081	99.8854	0.196081	-0.141498
78	100.11	100.109	99.9592	0.149474	0.00135913
79	100.21	100.161	100.046	0.115129	0.048621
80	100.15	100.072	100.134	-0.0620139	0.0782639
81	100.21	100.089	100.211	-0.121954	0.120704
82	100.13	100.088	100.274	-0.186597	0.0424306
83	100.2	100.107	100.315	-0.208442	0.0934425
84	100.36	100.08	100.341	-0.260764	0.279514
85	100.5	100.26	100.367	-0.106716	0.24005
86	100.66	100.538	100.382	0.155843	0.12249
87	100.72	100.571	100.377	0.193819	0.148681
88	100.41	100.512	100.376	0.136141	-0.102391
89	100.3	100.571	100.375	0.196081	-0.271498
90	100.38	100.504	100.355	0.149474	-0.124474
91	100.55	NA	NA	0.115129	NA
92	100.17	NA	NA	-0.0620139	NA
93	100.09	NA	NA	-0.121954	NA
94	100.22	NA	NA	-0.186597	NA
95	100.09	NA	NA	-0.208442	NA
96	99.98	NA	NA	-0.260764	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