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

Sat, 07 Dec 2013 15:16:43 -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/2013/Dec/07/t1386447426aqc5775cy06c1d6.htm/, Retrieved Wed, 24 Apr 2024 11:41:24 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=231411, Retrieved Wed, 24 Apr 2024 11:41:24 +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] [] [2013-12-07 20:16:43] [d2dbc91554044d1d1a55d99248130a60] [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	6 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 & 6 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=231411&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]6 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=231411&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	38.95	NA	NA	-0.0120188	NA
2	38.96	NA	NA	-0.0102927	NA
3	38.93	NA	NA	-0.00707837	NA
4	38.86	NA	NA	-0.0232093	NA
5	38.75	NA	NA	-0.00112599	NA
6	38.87	NA	NA	0.033874	NA
7	38.87	38.9466	38.9158	0.0307192	-0.0765526
8	38.86	38.9555	38.9162	0.0392312	-0.0954812
9	38.83	38.93	38.9167	0.0133383	-0.100005
10	39.08	38.8996	38.92	-0.0203522	0.180352
11	39.05	38.9105	38.9313	-0.0207093	0.139459
12	38.97	38.9218	38.9442	-0.022376	0.0482093
13	38.97	38.9405	38.9525	-0.0120188	0.0295188
14	38.95	38.9501	38.9604	-0.0102927	-0.000124008
15	38.95	38.9613	38.9683	-0.00707837	-0.011255
16	38.92	38.936	38.9592	-0.0232093	-0.0159573
17	38.96	38.9347	38.9358	-0.00112599	0.0252927
18	38.97	38.953	38.9192	0.033874	0.0169593
19	38.97	38.9366	38.9058	0.0307192	0.0334474
20	38.95	38.9313	38.8921	0.0392312	0.0186855
21	38.93	38.8908	38.8775	0.0133383	0.0391617
22	38.76	38.8367	38.8571	-0.0203522	-0.0767312
23	38.81	38.8122	38.8329	-0.0207093	-0.00220734
24	38.81	38.7876	38.81	-0.022376	0.022376
25	38.81	38.7742	38.7862	-0.0120188	0.0357688
26	38.78	38.7551	38.7654	-0.0102927	0.024876
27	38.77	38.7413	38.7483	-0.00707837	0.028745
28	38.61	38.711	38.7342	-0.0232093	-0.100957
29	38.69	38.7172	38.7183	-0.00112599	-0.0272073
30	38.69	38.7322	38.6983	0.033874	-0.0422073
31	38.68	38.7091	38.6783	0.0307192	-0.0290526
32	38.74	38.6988	38.6596	0.0392312	0.0411855
33	38.73	38.6554	38.6421	0.0133383	0.0745784
34	38.62	38.6105	38.6308	-0.0203522	0.00951885
35	38.57	38.5964	38.6171	-0.0207093	-0.026374
36	38.57	38.5743	38.5967	-0.022376	-0.00429067
37	38.57	38.5667	38.5788	-0.0120188	0.00326885
38	38.57	38.5489	38.5592	-0.0102927	0.021126
39	38.56	38.5296	38.5367	-0.00707837	0.0304117
40	38.55	38.4939	38.5171	-0.0232093	0.056126
41	38.42	38.5022	38.5033	-0.00112599	-0.0822073
42	38.47	38.5276	38.4938	0.033874	-0.057624
43	38.47	38.517	38.4862	0.0307192	-0.0469692
44	38.48	38.518	38.4788	0.0392312	-0.0379812
45	38.45	38.4863	38.4729	0.0133383	-0.036255
46	38.43	38.4476	38.4679	-0.0203522	-0.0175645
47	38.43	38.4497	38.4704	-0.0207093	-0.0197073
48	38.48	38.4568	38.4792	-0.022376	0.0232093
49	38.48	38.4738	38.4858	-0.0120188	0.00618552
50	38.48	38.4793	38.4896	-0.0102927	0.000709325
51	38.51	38.4796	38.4867	-0.00707837	0.0304117
52	38.48	38.448	38.4712	-0.0232093	0.0319593
53	38.55	38.4435	38.4446	-0.00112599	0.106543
54	38.55	38.4455	38.4117	0.033874	0.104459
55	38.55	38.4057	38.375	0.0307192	0.144281
56	38.49	38.3771	38.3379	0.0392312	0.112852
57	38.37	38.3104	38.2971	0.0133383	0.0595784
58	38.14	38.2359	38.2562	-0.0203522	-0.0958978
59	38.08	38.196	38.2167	-0.0207093	-0.115957
60	38.04	38.1526	38.175	-0.022376	-0.112624
61	38.04	38.1213	38.1333	-0.0120188	-0.0813145
62	38.03	38.0839	38.0942	-0.0102927	-0.053874
63	37.98	38.0542	38.0612	-0.00707837	-0.0741716
64	38.03	38.0201	38.0433	-0.0232093	0.00987599
65	38.05	38.036	38.0371	-0.00112599	0.0140427
66	38.05	38.0664	38.0325	0.033874	-0.016374
67	38.05	38.0599	38.0292	0.0307192	-0.00988591
68	38.05	38.0655	38.0263	0.0392312	-0.0154812
69	38.02	38.0388	38.0254	0.0133383	-0.018755
70	38.06	38.0026	38.0229	-0.0203522	0.0574355
71	38.01	37.9955	38.0162	-0.0207093	0.0144593
72	38	37.9889	38.0113	-0.022376	0.011126
73	38	37.9967	38.0088	-0.0120188	0.00326885
74	38	37.996	38.0063	-0.0102927	0.00404266
75	37.99	37.9971	38.0042	-0.00707837	-0.00708829
76	37.96	37.9747	37.9979	-0.0232093	-0.0147073
77	37.96	37.991	37.9921	-0.00112599	-0.0309573
78	38.02	38.0255	37.9917	0.033874	-0.00554067
79	38.02	38.0224	37.9917	0.0307192	-0.00238591
80	38.02	38.0309	37.9917	0.0392312	-0.0108978
81	38	38.0054	37.9921	0.0133383	-0.00542163
82	37.93	37.9742	37.9946	-0.0203522	-0.0442312
83	38	37.9768	37.9975	-0.0207093	0.0232093
84	38	37.9751	37.9975	-0.022376	0.024876
85	38	37.9838	37.9958	-0.0120188	0.0161855
86	38	37.9839	37.9942	-0.0102927	0.016126
87	38	37.9842	37.9913	-0.00707837	0.0158284
88	38.01	37.9635	37.9867	-0.0232093	0.0465427
89	37.98	37.9726	37.9738	-0.00112599	0.00737599
90	38	37.9868	37.9529	0.033874	0.0132093
91	38	NA	NA	0.0307192	NA
92	38	NA	NA	0.0392312	NA
93	37.95	NA	NA	0.0133383	NA
94	37.87	NA	NA	-0.0203522	NA
95	37.75	NA	NA	-0.0207093	NA
96	37.75	NA	NA	-0.022376	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 38.95 & NA & NA & -0.0120188 & NA \tabularnewline
2 & 38.96 & NA & NA & -0.0102927 & NA \tabularnewline
3 & 38.93 & NA & NA & -0.00707837 & NA \tabularnewline
4 & 38.86 & NA & NA & -0.0232093 & NA \tabularnewline
5 & 38.75 & NA & NA & -0.00112599 & NA \tabularnewline
6 & 38.87 & NA & NA & 0.033874 & NA \tabularnewline
7 & 38.87 & 38.9466 & 38.9158 & 0.0307192 & -0.0765526 \tabularnewline
8 & 38.86 & 38.9555 & 38.9162 & 0.0392312 & -0.0954812 \tabularnewline
9 & 38.83 & 38.93 & 38.9167 & 0.0133383 & -0.100005 \tabularnewline
10 & 39.08 & 38.8996 & 38.92 & -0.0203522 & 0.180352 \tabularnewline
11 & 39.05 & 38.9105 & 38.9313 & -0.0207093 & 0.139459 \tabularnewline
12 & 38.97 & 38.9218 & 38.9442 & -0.022376 & 0.0482093 \tabularnewline
13 & 38.97 & 38.9405 & 38.9525 & -0.0120188 & 0.0295188 \tabularnewline
14 & 38.95 & 38.9501 & 38.9604 & -0.0102927 & -0.000124008 \tabularnewline
15 & 38.95 & 38.9613 & 38.9683 & -0.00707837 & -0.011255 \tabularnewline
16 & 38.92 & 38.936 & 38.9592 & -0.0232093 & -0.0159573 \tabularnewline
17 & 38.96 & 38.9347 & 38.9358 & -0.00112599 & 0.0252927 \tabularnewline
18 & 38.97 & 38.953 & 38.9192 & 0.033874 & 0.0169593 \tabularnewline
19 & 38.97 & 38.9366 & 38.9058 & 0.0307192 & 0.0334474 \tabularnewline
20 & 38.95 & 38.9313 & 38.8921 & 0.0392312 & 0.0186855 \tabularnewline
21 & 38.93 & 38.8908 & 38.8775 & 0.0133383 & 0.0391617 \tabularnewline
22 & 38.76 & 38.8367 & 38.8571 & -0.0203522 & -0.0767312 \tabularnewline
23 & 38.81 & 38.8122 & 38.8329 & -0.0207093 & -0.00220734 \tabularnewline
24 & 38.81 & 38.7876 & 38.81 & -0.022376 & 0.022376 \tabularnewline
25 & 38.81 & 38.7742 & 38.7862 & -0.0120188 & 0.0357688 \tabularnewline
26 & 38.78 & 38.7551 & 38.7654 & -0.0102927 & 0.024876 \tabularnewline
27 & 38.77 & 38.7413 & 38.7483 & -0.00707837 & 0.028745 \tabularnewline
28 & 38.61 & 38.711 & 38.7342 & -0.0232093 & -0.100957 \tabularnewline
29 & 38.69 & 38.7172 & 38.7183 & -0.00112599 & -0.0272073 \tabularnewline
30 & 38.69 & 38.7322 & 38.6983 & 0.033874 & -0.0422073 \tabularnewline
31 & 38.68 & 38.7091 & 38.6783 & 0.0307192 & -0.0290526 \tabularnewline
32 & 38.74 & 38.6988 & 38.6596 & 0.0392312 & 0.0411855 \tabularnewline
33 & 38.73 & 38.6554 & 38.6421 & 0.0133383 & 0.0745784 \tabularnewline
34 & 38.62 & 38.6105 & 38.6308 & -0.0203522 & 0.00951885 \tabularnewline
35 & 38.57 & 38.5964 & 38.6171 & -0.0207093 & -0.026374 \tabularnewline
36 & 38.57 & 38.5743 & 38.5967 & -0.022376 & -0.00429067 \tabularnewline
37 & 38.57 & 38.5667 & 38.5788 & -0.0120188 & 0.00326885 \tabularnewline
38 & 38.57 & 38.5489 & 38.5592 & -0.0102927 & 0.021126 \tabularnewline
39 & 38.56 & 38.5296 & 38.5367 & -0.00707837 & 0.0304117 \tabularnewline
40 & 38.55 & 38.4939 & 38.5171 & -0.0232093 & 0.056126 \tabularnewline
41 & 38.42 & 38.5022 & 38.5033 & -0.00112599 & -0.0822073 \tabularnewline
42 & 38.47 & 38.5276 & 38.4938 & 0.033874 & -0.057624 \tabularnewline
43 & 38.47 & 38.517 & 38.4862 & 0.0307192 & -0.0469692 \tabularnewline
44 & 38.48 & 38.518 & 38.4788 & 0.0392312 & -0.0379812 \tabularnewline
45 & 38.45 & 38.4863 & 38.4729 & 0.0133383 & -0.036255 \tabularnewline
46 & 38.43 & 38.4476 & 38.4679 & -0.0203522 & -0.0175645 \tabularnewline
47 & 38.43 & 38.4497 & 38.4704 & -0.0207093 & -0.0197073 \tabularnewline
48 & 38.48 & 38.4568 & 38.4792 & -0.022376 & 0.0232093 \tabularnewline
49 & 38.48 & 38.4738 & 38.4858 & -0.0120188 & 0.00618552 \tabularnewline
50 & 38.48 & 38.4793 & 38.4896 & -0.0102927 & 0.000709325 \tabularnewline
51 & 38.51 & 38.4796 & 38.4867 & -0.00707837 & 0.0304117 \tabularnewline
52 & 38.48 & 38.448 & 38.4712 & -0.0232093 & 0.0319593 \tabularnewline
53 & 38.55 & 38.4435 & 38.4446 & -0.00112599 & 0.106543 \tabularnewline
54 & 38.55 & 38.4455 & 38.4117 & 0.033874 & 0.104459 \tabularnewline
55 & 38.55 & 38.4057 & 38.375 & 0.0307192 & 0.144281 \tabularnewline
56 & 38.49 & 38.3771 & 38.3379 & 0.0392312 & 0.112852 \tabularnewline
57 & 38.37 & 38.3104 & 38.2971 & 0.0133383 & 0.0595784 \tabularnewline
58 & 38.14 & 38.2359 & 38.2562 & -0.0203522 & -0.0958978 \tabularnewline
59 & 38.08 & 38.196 & 38.2167 & -0.0207093 & -0.115957 \tabularnewline
60 & 38.04 & 38.1526 & 38.175 & -0.022376 & -0.112624 \tabularnewline
61 & 38.04 & 38.1213 & 38.1333 & -0.0120188 & -0.0813145 \tabularnewline
62 & 38.03 & 38.0839 & 38.0942 & -0.0102927 & -0.053874 \tabularnewline
63 & 37.98 & 38.0542 & 38.0612 & -0.00707837 & -0.0741716 \tabularnewline
64 & 38.03 & 38.0201 & 38.0433 & -0.0232093 & 0.00987599 \tabularnewline
65 & 38.05 & 38.036 & 38.0371 & -0.00112599 & 0.0140427 \tabularnewline
66 & 38.05 & 38.0664 & 38.0325 & 0.033874 & -0.016374 \tabularnewline
67 & 38.05 & 38.0599 & 38.0292 & 0.0307192 & -0.00988591 \tabularnewline
68 & 38.05 & 38.0655 & 38.0263 & 0.0392312 & -0.0154812 \tabularnewline
69 & 38.02 & 38.0388 & 38.0254 & 0.0133383 & -0.018755 \tabularnewline
70 & 38.06 & 38.0026 & 38.0229 & -0.0203522 & 0.0574355 \tabularnewline
71 & 38.01 & 37.9955 & 38.0162 & -0.0207093 & 0.0144593 \tabularnewline
72 & 38 & 37.9889 & 38.0113 & -0.022376 & 0.011126 \tabularnewline
73 & 38 & 37.9967 & 38.0088 & -0.0120188 & 0.00326885 \tabularnewline
74 & 38 & 37.996 & 38.0063 & -0.0102927 & 0.00404266 \tabularnewline
75 & 37.99 & 37.9971 & 38.0042 & -0.00707837 & -0.00708829 \tabularnewline
76 & 37.96 & 37.9747 & 37.9979 & -0.0232093 & -0.0147073 \tabularnewline
77 & 37.96 & 37.991 & 37.9921 & -0.00112599 & -0.0309573 \tabularnewline
78 & 38.02 & 38.0255 & 37.9917 & 0.033874 & -0.00554067 \tabularnewline
79 & 38.02 & 38.0224 & 37.9917 & 0.0307192 & -0.00238591 \tabularnewline
80 & 38.02 & 38.0309 & 37.9917 & 0.0392312 & -0.0108978 \tabularnewline
81 & 38 & 38.0054 & 37.9921 & 0.0133383 & -0.00542163 \tabularnewline
82 & 37.93 & 37.9742 & 37.9946 & -0.0203522 & -0.0442312 \tabularnewline
83 & 38 & 37.9768 & 37.9975 & -0.0207093 & 0.0232093 \tabularnewline
84 & 38 & 37.9751 & 37.9975 & -0.022376 & 0.024876 \tabularnewline
85 & 38 & 37.9838 & 37.9958 & -0.0120188 & 0.0161855 \tabularnewline
86 & 38 & 37.9839 & 37.9942 & -0.0102927 & 0.016126 \tabularnewline
87 & 38 & 37.9842 & 37.9913 & -0.00707837 & 0.0158284 \tabularnewline
88 & 38.01 & 37.9635 & 37.9867 & -0.0232093 & 0.0465427 \tabularnewline
89 & 37.98 & 37.9726 & 37.9738 & -0.00112599 & 0.00737599 \tabularnewline
90 & 38 & 37.9868 & 37.9529 & 0.033874 & 0.0132093 \tabularnewline
91 & 38 & NA & NA & 0.0307192 & NA \tabularnewline
92 & 38 & NA & NA & 0.0392312 & NA \tabularnewline
93 & 37.95 & NA & NA & 0.0133383 & NA \tabularnewline
94 & 37.87 & NA & NA & -0.0203522 & NA \tabularnewline
95 & 37.75 & NA & NA & -0.0207093 & NA \tabularnewline
96 & 37.75 & NA & NA & -0.022376 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=231411&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]38.95[/C][C]NA[/C][C]NA[/C][C]-0.0120188[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]38.96[/C][C]NA[/C][C]NA[/C][C]-0.0102927[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]38.93[/C][C]NA[/C][C]NA[/C][C]-0.00707837[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]38.86[/C][C]NA[/C][C]NA[/C][C]-0.0232093[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]38.75[/C][C]NA[/C][C]NA[/C][C]-0.00112599[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]38.87[/C][C]NA[/C][C]NA[/C][C]0.033874[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]38.87[/C][C]38.9466[/C][C]38.9158[/C][C]0.0307192[/C][C]-0.0765526[/C][/ROW]
[ROW][C]8[/C][C]38.86[/C][C]38.9555[/C][C]38.9162[/C][C]0.0392312[/C][C]-0.0954812[/C][/ROW]
[ROW][C]9[/C][C]38.83[/C][C]38.93[/C][C]38.9167[/C][C]0.0133383[/C][C]-0.100005[/C][/ROW]
[ROW][C]10[/C][C]39.08[/C][C]38.8996[/C][C]38.92[/C][C]-0.0203522[/C][C]0.180352[/C][/ROW]
[ROW][C]11[/C][C]39.05[/C][C]38.9105[/C][C]38.9313[/C][C]-0.0207093[/C][C]0.139459[/C][/ROW]
[ROW][C]12[/C][C]38.97[/C][C]38.9218[/C][C]38.9442[/C][C]-0.022376[/C][C]0.0482093[/C][/ROW]
[ROW][C]13[/C][C]38.97[/C][C]38.9405[/C][C]38.9525[/C][C]-0.0120188[/C][C]0.0295188[/C][/ROW]
[ROW][C]14[/C][C]38.95[/C][C]38.9501[/C][C]38.9604[/C][C]-0.0102927[/C][C]-0.000124008[/C][/ROW]
[ROW][C]15[/C][C]38.95[/C][C]38.9613[/C][C]38.9683[/C][C]-0.00707837[/C][C]-0.011255[/C][/ROW]
[ROW][C]16[/C][C]38.92[/C][C]38.936[/C][C]38.9592[/C][C]-0.0232093[/C][C]-0.0159573[/C][/ROW]
[ROW][C]17[/C][C]38.96[/C][C]38.9347[/C][C]38.9358[/C][C]-0.00112599[/C][C]0.0252927[/C][/ROW]
[ROW][C]18[/C][C]38.97[/C][C]38.953[/C][C]38.9192[/C][C]0.033874[/C][C]0.0169593[/C][/ROW]
[ROW][C]19[/C][C]38.97[/C][C]38.9366[/C][C]38.9058[/C][C]0.0307192[/C][C]0.0334474[/C][/ROW]
[ROW][C]20[/C][C]38.95[/C][C]38.9313[/C][C]38.8921[/C][C]0.0392312[/C][C]0.0186855[/C][/ROW]
[ROW][C]21[/C][C]38.93[/C][C]38.8908[/C][C]38.8775[/C][C]0.0133383[/C][C]0.0391617[/C][/ROW]
[ROW][C]22[/C][C]38.76[/C][C]38.8367[/C][C]38.8571[/C][C]-0.0203522[/C][C]-0.0767312[/C][/ROW]
[ROW][C]23[/C][C]38.81[/C][C]38.8122[/C][C]38.8329[/C][C]-0.0207093[/C][C]-0.00220734[/C][/ROW]
[ROW][C]24[/C][C]38.81[/C][C]38.7876[/C][C]38.81[/C][C]-0.022376[/C][C]0.022376[/C][/ROW]
[ROW][C]25[/C][C]38.81[/C][C]38.7742[/C][C]38.7862[/C][C]-0.0120188[/C][C]0.0357688[/C][/ROW]
[ROW][C]26[/C][C]38.78[/C][C]38.7551[/C][C]38.7654[/C][C]-0.0102927[/C][C]0.024876[/C][/ROW]
[ROW][C]27[/C][C]38.77[/C][C]38.7413[/C][C]38.7483[/C][C]-0.00707837[/C][C]0.028745[/C][/ROW]
[ROW][C]28[/C][C]38.61[/C][C]38.711[/C][C]38.7342[/C][C]-0.0232093[/C][C]-0.100957[/C][/ROW]
[ROW][C]29[/C][C]38.69[/C][C]38.7172[/C][C]38.7183[/C][C]-0.00112599[/C][C]-0.0272073[/C][/ROW]
[ROW][C]30[/C][C]38.69[/C][C]38.7322[/C][C]38.6983[/C][C]0.033874[/C][C]-0.0422073[/C][/ROW]
[ROW][C]31[/C][C]38.68[/C][C]38.7091[/C][C]38.6783[/C][C]0.0307192[/C][C]-0.0290526[/C][/ROW]
[ROW][C]32[/C][C]38.74[/C][C]38.6988[/C][C]38.6596[/C][C]0.0392312[/C][C]0.0411855[/C][/ROW]
[ROW][C]33[/C][C]38.73[/C][C]38.6554[/C][C]38.6421[/C][C]0.0133383[/C][C]0.0745784[/C][/ROW]
[ROW][C]34[/C][C]38.62[/C][C]38.6105[/C][C]38.6308[/C][C]-0.0203522[/C][C]0.00951885[/C][/ROW]
[ROW][C]35[/C][C]38.57[/C][C]38.5964[/C][C]38.6171[/C][C]-0.0207093[/C][C]-0.026374[/C][/ROW]
[ROW][C]36[/C][C]38.57[/C][C]38.5743[/C][C]38.5967[/C][C]-0.022376[/C][C]-0.00429067[/C][/ROW]
[ROW][C]37[/C][C]38.57[/C][C]38.5667[/C][C]38.5788[/C][C]-0.0120188[/C][C]0.00326885[/C][/ROW]
[ROW][C]38[/C][C]38.57[/C][C]38.5489[/C][C]38.5592[/C][C]-0.0102927[/C][C]0.021126[/C][/ROW]
[ROW][C]39[/C][C]38.56[/C][C]38.5296[/C][C]38.5367[/C][C]-0.00707837[/C][C]0.0304117[/C][/ROW]
[ROW][C]40[/C][C]38.55[/C][C]38.4939[/C][C]38.5171[/C][C]-0.0232093[/C][C]0.056126[/C][/ROW]
[ROW][C]41[/C][C]38.42[/C][C]38.5022[/C][C]38.5033[/C][C]-0.00112599[/C][C]-0.0822073[/C][/ROW]
[ROW][C]42[/C][C]38.47[/C][C]38.5276[/C][C]38.4938[/C][C]0.033874[/C][C]-0.057624[/C][/ROW]
[ROW][C]43[/C][C]38.47[/C][C]38.517[/C][C]38.4862[/C][C]0.0307192[/C][C]-0.0469692[/C][/ROW]
[ROW][C]44[/C][C]38.48[/C][C]38.518[/C][C]38.4788[/C][C]0.0392312[/C][C]-0.0379812[/C][/ROW]
[ROW][C]45[/C][C]38.45[/C][C]38.4863[/C][C]38.4729[/C][C]0.0133383[/C][C]-0.036255[/C][/ROW]
[ROW][C]46[/C][C]38.43[/C][C]38.4476[/C][C]38.4679[/C][C]-0.0203522[/C][C]-0.0175645[/C][/ROW]
[ROW][C]47[/C][C]38.43[/C][C]38.4497[/C][C]38.4704[/C][C]-0.0207093[/C][C]-0.0197073[/C][/ROW]
[ROW][C]48[/C][C]38.48[/C][C]38.4568[/C][C]38.4792[/C][C]-0.022376[/C][C]0.0232093[/C][/ROW]
[ROW][C]49[/C][C]38.48[/C][C]38.4738[/C][C]38.4858[/C][C]-0.0120188[/C][C]0.00618552[/C][/ROW]
[ROW][C]50[/C][C]38.48[/C][C]38.4793[/C][C]38.4896[/C][C]-0.0102927[/C][C]0.000709325[/C][/ROW]
[ROW][C]51[/C][C]38.51[/C][C]38.4796[/C][C]38.4867[/C][C]-0.00707837[/C][C]0.0304117[/C][/ROW]
[ROW][C]52[/C][C]38.48[/C][C]38.448[/C][C]38.4712[/C][C]-0.0232093[/C][C]0.0319593[/C][/ROW]
[ROW][C]53[/C][C]38.55[/C][C]38.4435[/C][C]38.4446[/C][C]-0.00112599[/C][C]0.106543[/C][/ROW]
[ROW][C]54[/C][C]38.55[/C][C]38.4455[/C][C]38.4117[/C][C]0.033874[/C][C]0.104459[/C][/ROW]
[ROW][C]55[/C][C]38.55[/C][C]38.4057[/C][C]38.375[/C][C]0.0307192[/C][C]0.144281[/C][/ROW]
[ROW][C]56[/C][C]38.49[/C][C]38.3771[/C][C]38.3379[/C][C]0.0392312[/C][C]0.112852[/C][/ROW]
[ROW][C]57[/C][C]38.37[/C][C]38.3104[/C][C]38.2971[/C][C]0.0133383[/C][C]0.0595784[/C][/ROW]
[ROW][C]58[/C][C]38.14[/C][C]38.2359[/C][C]38.2562[/C][C]-0.0203522[/C][C]-0.0958978[/C][/ROW]
[ROW][C]59[/C][C]38.08[/C][C]38.196[/C][C]38.2167[/C][C]-0.0207093[/C][C]-0.115957[/C][/ROW]
[ROW][C]60[/C][C]38.04[/C][C]38.1526[/C][C]38.175[/C][C]-0.022376[/C][C]-0.112624[/C][/ROW]
[ROW][C]61[/C][C]38.04[/C][C]38.1213[/C][C]38.1333[/C][C]-0.0120188[/C][C]-0.0813145[/C][/ROW]
[ROW][C]62[/C][C]38.03[/C][C]38.0839[/C][C]38.0942[/C][C]-0.0102927[/C][C]-0.053874[/C][/ROW]
[ROW][C]63[/C][C]37.98[/C][C]38.0542[/C][C]38.0612[/C][C]-0.00707837[/C][C]-0.0741716[/C][/ROW]
[ROW][C]64[/C][C]38.03[/C][C]38.0201[/C][C]38.0433[/C][C]-0.0232093[/C][C]0.00987599[/C][/ROW]
[ROW][C]65[/C][C]38.05[/C][C]38.036[/C][C]38.0371[/C][C]-0.00112599[/C][C]0.0140427[/C][/ROW]
[ROW][C]66[/C][C]38.05[/C][C]38.0664[/C][C]38.0325[/C][C]0.033874[/C][C]-0.016374[/C][/ROW]
[ROW][C]67[/C][C]38.05[/C][C]38.0599[/C][C]38.0292[/C][C]0.0307192[/C][C]-0.00988591[/C][/ROW]
[ROW][C]68[/C][C]38.05[/C][C]38.0655[/C][C]38.0263[/C][C]0.0392312[/C][C]-0.0154812[/C][/ROW]
[ROW][C]69[/C][C]38.02[/C][C]38.0388[/C][C]38.0254[/C][C]0.0133383[/C][C]-0.018755[/C][/ROW]
[ROW][C]70[/C][C]38.06[/C][C]38.0026[/C][C]38.0229[/C][C]-0.0203522[/C][C]0.0574355[/C][/ROW]
[ROW][C]71[/C][C]38.01[/C][C]37.9955[/C][C]38.0162[/C][C]-0.0207093[/C][C]0.0144593[/C][/ROW]
[ROW][C]72[/C][C]38[/C][C]37.9889[/C][C]38.0113[/C][C]-0.022376[/C][C]0.011126[/C][/ROW]
[ROW][C]73[/C][C]38[/C][C]37.9967[/C][C]38.0088[/C][C]-0.0120188[/C][C]0.00326885[/C][/ROW]
[ROW][C]74[/C][C]38[/C][C]37.996[/C][C]38.0063[/C][C]-0.0102927[/C][C]0.00404266[/C][/ROW]
[ROW][C]75[/C][C]37.99[/C][C]37.9971[/C][C]38.0042[/C][C]-0.00707837[/C][C]-0.00708829[/C][/ROW]
[ROW][C]76[/C][C]37.96[/C][C]37.9747[/C][C]37.9979[/C][C]-0.0232093[/C][C]-0.0147073[/C][/ROW]
[ROW][C]77[/C][C]37.96[/C][C]37.991[/C][C]37.9921[/C][C]-0.00112599[/C][C]-0.0309573[/C][/ROW]
[ROW][C]78[/C][C]38.02[/C][C]38.0255[/C][C]37.9917[/C][C]0.033874[/C][C]-0.00554067[/C][/ROW]
[ROW][C]79[/C][C]38.02[/C][C]38.0224[/C][C]37.9917[/C][C]0.0307192[/C][C]-0.00238591[/C][/ROW]
[ROW][C]80[/C][C]38.02[/C][C]38.0309[/C][C]37.9917[/C][C]0.0392312[/C][C]-0.0108978[/C][/ROW]
[ROW][C]81[/C][C]38[/C][C]38.0054[/C][C]37.9921[/C][C]0.0133383[/C][C]-0.00542163[/C][/ROW]
[ROW][C]82[/C][C]37.93[/C][C]37.9742[/C][C]37.9946[/C][C]-0.0203522[/C][C]-0.0442312[/C][/ROW]
[ROW][C]83[/C][C]38[/C][C]37.9768[/C][C]37.9975[/C][C]-0.0207093[/C][C]0.0232093[/C][/ROW]
[ROW][C]84[/C][C]38[/C][C]37.9751[/C][C]37.9975[/C][C]-0.022376[/C][C]0.024876[/C][/ROW]
[ROW][C]85[/C][C]38[/C][C]37.9838[/C][C]37.9958[/C][C]-0.0120188[/C][C]0.0161855[/C][/ROW]
[ROW][C]86[/C][C]38[/C][C]37.9839[/C][C]37.9942[/C][C]-0.0102927[/C][C]0.016126[/C][/ROW]
[ROW][C]87[/C][C]38[/C][C]37.9842[/C][C]37.9913[/C][C]-0.00707837[/C][C]0.0158284[/C][/ROW]
[ROW][C]88[/C][C]38.01[/C][C]37.9635[/C][C]37.9867[/C][C]-0.0232093[/C][C]0.0465427[/C][/ROW]
[ROW][C]89[/C][C]37.98[/C][C]37.9726[/C][C]37.9738[/C][C]-0.00112599[/C][C]0.00737599[/C][/ROW]
[ROW][C]90[/C][C]38[/C][C]37.9868[/C][C]37.9529[/C][C]0.033874[/C][C]0.0132093[/C][/ROW]
[ROW][C]91[/C][C]38[/C][C]NA[/C][C]NA[/C][C]0.0307192[/C][C]NA[/C][/ROW]
[ROW][C]92[/C][C]38[/C][C]NA[/C][C]NA[/C][C]0.0392312[/C][C]NA[/C][/ROW]
[ROW][C]93[/C][C]37.95[/C][C]NA[/C][C]NA[/C][C]0.0133383[/C][C]NA[/C][/ROW]
[ROW][C]94[/C][C]37.87[/C][C]NA[/C][C]NA[/C][C]-0.0203522[/C][C]NA[/C][/ROW]
[ROW][C]95[/C][C]37.75[/C][C]NA[/C][C]NA[/C][C]-0.0207093[/C][C]NA[/C][/ROW]
[ROW][C]96[/C][C]37.75[/C][C]NA[/C][C]NA[/C][C]-0.022376[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=231411&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=231411&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	38.95	NA	NA	-0.0120188	NA
2	38.96	NA	NA	-0.0102927	NA
3	38.93	NA	NA	-0.00707837	NA
4	38.86	NA	NA	-0.0232093	NA
5	38.75	NA	NA	-0.00112599	NA
6	38.87	NA	NA	0.033874	NA
7	38.87	38.9466	38.9158	0.0307192	-0.0765526
8	38.86	38.9555	38.9162	0.0392312	-0.0954812
9	38.83	38.93	38.9167	0.0133383	-0.100005
10	39.08	38.8996	38.92	-0.0203522	0.180352
11	39.05	38.9105	38.9313	-0.0207093	0.139459
12	38.97	38.9218	38.9442	-0.022376	0.0482093
13	38.97	38.9405	38.9525	-0.0120188	0.0295188
14	38.95	38.9501	38.9604	-0.0102927	-0.000124008
15	38.95	38.9613	38.9683	-0.00707837	-0.011255
16	38.92	38.936	38.9592	-0.0232093	-0.0159573
17	38.96	38.9347	38.9358	-0.00112599	0.0252927
18	38.97	38.953	38.9192	0.033874	0.0169593
19	38.97	38.9366	38.9058	0.0307192	0.0334474
20	38.95	38.9313	38.8921	0.0392312	0.0186855
21	38.93	38.8908	38.8775	0.0133383	0.0391617
22	38.76	38.8367	38.8571	-0.0203522	-0.0767312
23	38.81	38.8122	38.8329	-0.0207093	-0.00220734
24	38.81	38.7876	38.81	-0.022376	0.022376
25	38.81	38.7742	38.7862	-0.0120188	0.0357688
26	38.78	38.7551	38.7654	-0.0102927	0.024876
27	38.77	38.7413	38.7483	-0.00707837	0.028745
28	38.61	38.711	38.7342	-0.0232093	-0.100957
29	38.69	38.7172	38.7183	-0.00112599	-0.0272073
30	38.69	38.7322	38.6983	0.033874	-0.0422073
31	38.68	38.7091	38.6783	0.0307192	-0.0290526
32	38.74	38.6988	38.6596	0.0392312	0.0411855
33	38.73	38.6554	38.6421	0.0133383	0.0745784
34	38.62	38.6105	38.6308	-0.0203522	0.00951885
35	38.57	38.5964	38.6171	-0.0207093	-0.026374
36	38.57	38.5743	38.5967	-0.022376	-0.00429067
37	38.57	38.5667	38.5788	-0.0120188	0.00326885
38	38.57	38.5489	38.5592	-0.0102927	0.021126
39	38.56	38.5296	38.5367	-0.00707837	0.0304117
40	38.55	38.4939	38.5171	-0.0232093	0.056126
41	38.42	38.5022	38.5033	-0.00112599	-0.0822073
42	38.47	38.5276	38.4938	0.033874	-0.057624
43	38.47	38.517	38.4862	0.0307192	-0.0469692
44	38.48	38.518	38.4788	0.0392312	-0.0379812
45	38.45	38.4863	38.4729	0.0133383	-0.036255
46	38.43	38.4476	38.4679	-0.0203522	-0.0175645
47	38.43	38.4497	38.4704	-0.0207093	-0.0197073
48	38.48	38.4568	38.4792	-0.022376	0.0232093
49	38.48	38.4738	38.4858	-0.0120188	0.00618552
50	38.48	38.4793	38.4896	-0.0102927	0.000709325
51	38.51	38.4796	38.4867	-0.00707837	0.0304117
52	38.48	38.448	38.4712	-0.0232093	0.0319593
53	38.55	38.4435	38.4446	-0.00112599	0.106543
54	38.55	38.4455	38.4117	0.033874	0.104459
55	38.55	38.4057	38.375	0.0307192	0.144281
56	38.49	38.3771	38.3379	0.0392312	0.112852
57	38.37	38.3104	38.2971	0.0133383	0.0595784
58	38.14	38.2359	38.2562	-0.0203522	-0.0958978
59	38.08	38.196	38.2167	-0.0207093	-0.115957
60	38.04	38.1526	38.175	-0.022376	-0.112624
61	38.04	38.1213	38.1333	-0.0120188	-0.0813145
62	38.03	38.0839	38.0942	-0.0102927	-0.053874
63	37.98	38.0542	38.0612	-0.00707837	-0.0741716
64	38.03	38.0201	38.0433	-0.0232093	0.00987599
65	38.05	38.036	38.0371	-0.00112599	0.0140427
66	38.05	38.0664	38.0325	0.033874	-0.016374
67	38.05	38.0599	38.0292	0.0307192	-0.00988591
68	38.05	38.0655	38.0263	0.0392312	-0.0154812
69	38.02	38.0388	38.0254	0.0133383	-0.018755
70	38.06	38.0026	38.0229	-0.0203522	0.0574355
71	38.01	37.9955	38.0162	-0.0207093	0.0144593
72	38	37.9889	38.0113	-0.022376	0.011126
73	38	37.9967	38.0088	-0.0120188	0.00326885
74	38	37.996	38.0063	-0.0102927	0.00404266
75	37.99	37.9971	38.0042	-0.00707837	-0.00708829
76	37.96	37.9747	37.9979	-0.0232093	-0.0147073
77	37.96	37.991	37.9921	-0.00112599	-0.0309573
78	38.02	38.0255	37.9917	0.033874	-0.00554067
79	38.02	38.0224	37.9917	0.0307192	-0.00238591
80	38.02	38.0309	37.9917	0.0392312	-0.0108978
81	38	38.0054	37.9921	0.0133383	-0.00542163
82	37.93	37.9742	37.9946	-0.0203522	-0.0442312
83	38	37.9768	37.9975	-0.0207093	0.0232093
84	38	37.9751	37.9975	-0.022376	0.024876
85	38	37.9838	37.9958	-0.0120188	0.0161855
86	38	37.9839	37.9942	-0.0102927	0.016126
87	38	37.9842	37.9913	-0.00707837	0.0158284
88	38.01	37.9635	37.9867	-0.0232093	0.0465427
89	37.98	37.9726	37.9738	-0.00112599	0.00737599
90	38	37.9868	37.9529	0.033874	0.0132093
91	38	NA	NA	0.0307192	NA
92	38	NA	NA	0.0392312	NA
93	37.95	NA	NA	0.0133383	NA
94	37.87	NA	NA	-0.0203522	NA
95	37.75	NA	NA	-0.0207093	NA
96	37.75	NA	NA	-0.022376	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