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 Mar 2015 15:09:29 +0100

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/Mar/30/t1427724631aeir6llrlym4ev0.htm/, Retrieved Tue, 21 May 2024 22:12:03 +0000

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

128

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

-       [Classical Decomposition] [] [2015-03-30 14:09:29] [679411f6187277139d0a9a0a87b165a8] [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	'George Udny Yule' @ yule.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 & 'George Udny Yule' @ yule.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=278468&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]'George Udny Yule' @ yule.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=278468&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=278468&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	'George Udny Yule' @ yule.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	96.01	NA	NA	0.991724	NA
2	96.39	NA	NA	0.996461	NA
3	97.16	NA	NA	1.00519	NA
4	97.46	NA	NA	1.00701	NA
5	97.6	NA	NA	1.00616	NA
6	97.02	NA	NA	1.00085	NA
7	96.95	97.0591	97.2771	0.997759	0.998876
8	97.23	97.2925	97.4037	0.998858	0.999358
9	98	97.8473	97.5408	1.00314	1.00156
10	98.04	97.8605	97.6742	1.00191	1.00183
11	97.76	97.6493	97.7925	0.998536	1.00113
12	96.99	97.1703	97.9146	0.992399	0.998144
13	97.44	97.2357	98.0471	0.991724	1.0021
14	98	97.8375	98.185	0.996461	1.00166
15	98.84	98.8408	98.33	1.00519	0.999992
16	98.98	99.1607	98.4708	1.00701	0.998178
17	98.92	99.2172	98.6096	1.00616	0.997004
18	98.63	98.8465	98.7625	1.00085	0.99781
19	98.52	98.6751	98.8967	0.997759	0.998428
20	98.97	98.8794	98.9925	0.998858	1.00092
21	99.74	99.3896	99.0783	1.00314	1.00353
22	99.68	99.3642	99.175	1.00191	1.00318
23	99.45	99.1455	99.2908	0.998536	1.00307
24	98.97	98.654	99.4096	0.992399	1.0032
25	98.68	98.6985	99.5221	0.991724	0.999813
26	99.06	99.2819	99.6346	0.996461	0.997765
27	99.84	100.252	99.7342	1.00519	0.995888
28	100.3	100.509	99.8096	1.00701	0.997922
29	100.38	100.495	99.88	1.00616	0.998851
30	100.02	100.043	99.9579	1.00085	0.999771
31	99.83	99.8333	100.057	0.997759	0.999967
32	100.36	100.063	100.177	0.998858	1.00297
33	100.74	100.629	100.314	1.00314	1.0011
34	100.49	100.656	100.464	1.00191	0.998353
35	100.33	100.468	100.615	0.998536	0.998625
36	99.96	99.9978	100.764	0.992399	0.999622
37	100.08	100.063	100.898	0.991724	1.00017
38	100.54	100.647	101.005	0.996461	0.998936
39	101.63	101.631	101.106	1.00519	0.999985
40	102.12	101.938	101.229	1.00701	1.00178
41	102.19	102.002	101.377	1.00616	1.00185
42	101.77	101.622	101.535	1.00085	1.00146
43	101.29	101.47	101.698	0.997759	0.998226
44	101.47	101.76	101.877	0.998858	0.997147
45	102.07	102.383	102.062	1.00314	0.996945
46	102.11	102.435	102.24	1.00191	0.996827
47	102.26	102.276	102.426	0.998536	0.999845
48	101.83	101.854	102.634	0.992399	0.999768
49	102.11	102.027	102.878	0.991724	1.00082
50	102.8	102.785	103.15	0.996461	1.00015
51	103.82	103.953	103.416	1.00519	0.99872
52	104.2	104.39	103.664	1.00701	0.998176
53	104.57	104.519	103.879	1.00616	1.00049
54	104.38	104.146	104.058	1.00085	1.00225
55	104.54	103.989	104.222	0.997759	1.0053
56	104.74	104.269	104.388	0.998858	1.00452
57	105.19	104.885	104.557	1.00314	1.00291
58	104.95	104.921	104.721	1.00191	1.00028
59	104.57	104.716	104.87	0.998536	0.998605
60	103.81	104.203	105.001	0.992399	0.996227
61	104.08	104.202	105.072	0.991724	0.998828
62	104.81	104.72	105.092	0.996461	1.00086
63	105.86	105.667	105.121	1.00519	1.00183
64	106.1	105.905	105.168	1.00701	1.00184
65	106.24	105.89	105.241	1.00616	1.00331
66	105.87	105.421	105.331	1.00085	1.00426
67	104.74	105.178	105.415	0.997759	0.995832
68	105.03	105.366	105.486	0.998858	0.996813
69	105.59	105.899	105.567	1.00314	0.997084
70	105.69	105.863	105.661	1.00191	0.998368
71	105.58	105.598	105.753	0.998536	0.999829
72	104.96	105.027	105.831	0.992399	0.999364
73	104.93	105.062	105.938	0.991724	0.998747
74	105.68	105.699	106.075	0.996461	0.999819
75	106.93	106.761	106.21	1.00519	1.00158
76	107.29	107.093	106.348	1.00701	1.00184
77	107.25	107.142	106.486	1.00616	1.00101
78	106.74	106.729	106.639	1.00085	1.0001
79	106.44	106.57	106.81	0.997759	0.998778
80	106.6	106.859	106.982	0.998858	0.997572
81	107.26	107.491	107.155	1.00314	0.997849
82	107.35	107.54	107.335	1.00191	0.998232
83	107.22	107.374	107.532	0.998536	0.998564
84	106.99	106.917	107.736	0.992399	1.00068
85	107	107.06	107.954	0.991724	0.999436
86	107.74	107.803	108.186	0.996461	0.999416
87	109.02	108.986	108.423	1.00519	1.00031
88	109.54	109.422	108.661	1.00701	1.00108
89	109.71	109.565	108.894	1.00616	1.00133
90	109.18	109.209	109.116	1.00085	0.999734
91	109.23	109.083	109.327	0.997759	1.00135
92	109.38	109.416	109.541	0.998858	0.99967
93	110.17	110.103	109.758	1.00314	1.00061
94	110.15	110.181	109.971	1.00191	0.999722
95	110.01	110.006	110.167	0.998536	1.00004
96	109.54	109.51	110.349	0.992399	1.00027
97	109.52	109.644	110.559	0.991724	0.998867
98	110.35	110.405	110.798	0.996461	0.999499
99	111.61	111.599	111.022	1.00519	1.0001
100	112.06	112.041	111.261	1.00701	1.00017
101	111.9	112.203	111.515	1.00616	0.997303
102	111.36	111.864	111.769	1.00085	0.995493
103	112.09	111.787	112.038	0.997759	1.00271
104	112.24	112.183	112.311	0.998858	1.00051
105	112.7	112.939	112.585	1.00314	0.997886
106	113.36	113.057	112.842	1.00191	1.00268
107	112.9	112.927	113.092	0.998536	0.999761
108	112.74	112.494	113.355	0.992399	1.00219
109	112.77	112.693	113.633	0.991724	1.00069
110	113.66	113.505	113.908	0.996461	1.00137
111	114.87	114.747	114.154	1.00519	1.00107
112	114.97	115.144	114.343	1.00701	0.998489
113	115	115.191	114.486	1.00616	0.998339
114	114.57	114.731	114.633	1.00085	0.998598
115	115.54	NA	NA	0.997759	NA
116	115.39	NA	NA	0.998858	NA
117	115.46	NA	NA	1.00314	NA
118	115.13	NA	NA	1.00191	NA
119	114.56	NA	NA	0.998536	NA
120	114.62	NA	NA	0.992399	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 96.01 & NA & NA & 0.991724 & NA \tabularnewline
2 & 96.39 & NA & NA & 0.996461 & NA \tabularnewline
3 & 97.16 & NA & NA & 1.00519 & NA \tabularnewline
4 & 97.46 & NA & NA & 1.00701 & NA \tabularnewline
5 & 97.6 & NA & NA & 1.00616 & NA \tabularnewline
6 & 97.02 & NA & NA & 1.00085 & NA \tabularnewline
7 & 96.95 & 97.0591 & 97.2771 & 0.997759 & 0.998876 \tabularnewline
8 & 97.23 & 97.2925 & 97.4037 & 0.998858 & 0.999358 \tabularnewline
9 & 98 & 97.8473 & 97.5408 & 1.00314 & 1.00156 \tabularnewline
10 & 98.04 & 97.8605 & 97.6742 & 1.00191 & 1.00183 \tabularnewline
11 & 97.76 & 97.6493 & 97.7925 & 0.998536 & 1.00113 \tabularnewline
12 & 96.99 & 97.1703 & 97.9146 & 0.992399 & 0.998144 \tabularnewline
13 & 97.44 & 97.2357 & 98.0471 & 0.991724 & 1.0021 \tabularnewline
14 & 98 & 97.8375 & 98.185 & 0.996461 & 1.00166 \tabularnewline
15 & 98.84 & 98.8408 & 98.33 & 1.00519 & 0.999992 \tabularnewline
16 & 98.98 & 99.1607 & 98.4708 & 1.00701 & 0.998178 \tabularnewline
17 & 98.92 & 99.2172 & 98.6096 & 1.00616 & 0.997004 \tabularnewline
18 & 98.63 & 98.8465 & 98.7625 & 1.00085 & 0.99781 \tabularnewline
19 & 98.52 & 98.6751 & 98.8967 & 0.997759 & 0.998428 \tabularnewline
20 & 98.97 & 98.8794 & 98.9925 & 0.998858 & 1.00092 \tabularnewline
21 & 99.74 & 99.3896 & 99.0783 & 1.00314 & 1.00353 \tabularnewline
22 & 99.68 & 99.3642 & 99.175 & 1.00191 & 1.00318 \tabularnewline
23 & 99.45 & 99.1455 & 99.2908 & 0.998536 & 1.00307 \tabularnewline
24 & 98.97 & 98.654 & 99.4096 & 0.992399 & 1.0032 \tabularnewline
25 & 98.68 & 98.6985 & 99.5221 & 0.991724 & 0.999813 \tabularnewline
26 & 99.06 & 99.2819 & 99.6346 & 0.996461 & 0.997765 \tabularnewline
27 & 99.84 & 100.252 & 99.7342 & 1.00519 & 0.995888 \tabularnewline
28 & 100.3 & 100.509 & 99.8096 & 1.00701 & 0.997922 \tabularnewline
29 & 100.38 & 100.495 & 99.88 & 1.00616 & 0.998851 \tabularnewline
30 & 100.02 & 100.043 & 99.9579 & 1.00085 & 0.999771 \tabularnewline
31 & 99.83 & 99.8333 & 100.057 & 0.997759 & 0.999967 \tabularnewline
32 & 100.36 & 100.063 & 100.177 & 0.998858 & 1.00297 \tabularnewline
33 & 100.74 & 100.629 & 100.314 & 1.00314 & 1.0011 \tabularnewline
34 & 100.49 & 100.656 & 100.464 & 1.00191 & 0.998353 \tabularnewline
35 & 100.33 & 100.468 & 100.615 & 0.998536 & 0.998625 \tabularnewline
36 & 99.96 & 99.9978 & 100.764 & 0.992399 & 0.999622 \tabularnewline
37 & 100.08 & 100.063 & 100.898 & 0.991724 & 1.00017 \tabularnewline
38 & 100.54 & 100.647 & 101.005 & 0.996461 & 0.998936 \tabularnewline
39 & 101.63 & 101.631 & 101.106 & 1.00519 & 0.999985 \tabularnewline
40 & 102.12 & 101.938 & 101.229 & 1.00701 & 1.00178 \tabularnewline
41 & 102.19 & 102.002 & 101.377 & 1.00616 & 1.00185 \tabularnewline
42 & 101.77 & 101.622 & 101.535 & 1.00085 & 1.00146 \tabularnewline
43 & 101.29 & 101.47 & 101.698 & 0.997759 & 0.998226 \tabularnewline
44 & 101.47 & 101.76 & 101.877 & 0.998858 & 0.997147 \tabularnewline
45 & 102.07 & 102.383 & 102.062 & 1.00314 & 0.996945 \tabularnewline
46 & 102.11 & 102.435 & 102.24 & 1.00191 & 0.996827 \tabularnewline
47 & 102.26 & 102.276 & 102.426 & 0.998536 & 0.999845 \tabularnewline
48 & 101.83 & 101.854 & 102.634 & 0.992399 & 0.999768 \tabularnewline
49 & 102.11 & 102.027 & 102.878 & 0.991724 & 1.00082 \tabularnewline
50 & 102.8 & 102.785 & 103.15 & 0.996461 & 1.00015 \tabularnewline
51 & 103.82 & 103.953 & 103.416 & 1.00519 & 0.99872 \tabularnewline
52 & 104.2 & 104.39 & 103.664 & 1.00701 & 0.998176 \tabularnewline
53 & 104.57 & 104.519 & 103.879 & 1.00616 & 1.00049 \tabularnewline
54 & 104.38 & 104.146 & 104.058 & 1.00085 & 1.00225 \tabularnewline
55 & 104.54 & 103.989 & 104.222 & 0.997759 & 1.0053 \tabularnewline
56 & 104.74 & 104.269 & 104.388 & 0.998858 & 1.00452 \tabularnewline
57 & 105.19 & 104.885 & 104.557 & 1.00314 & 1.00291 \tabularnewline
58 & 104.95 & 104.921 & 104.721 & 1.00191 & 1.00028 \tabularnewline
59 & 104.57 & 104.716 & 104.87 & 0.998536 & 0.998605 \tabularnewline
60 & 103.81 & 104.203 & 105.001 & 0.992399 & 0.996227 \tabularnewline
61 & 104.08 & 104.202 & 105.072 & 0.991724 & 0.998828 \tabularnewline
62 & 104.81 & 104.72 & 105.092 & 0.996461 & 1.00086 \tabularnewline
63 & 105.86 & 105.667 & 105.121 & 1.00519 & 1.00183 \tabularnewline
64 & 106.1 & 105.905 & 105.168 & 1.00701 & 1.00184 \tabularnewline
65 & 106.24 & 105.89 & 105.241 & 1.00616 & 1.00331 \tabularnewline
66 & 105.87 & 105.421 & 105.331 & 1.00085 & 1.00426 \tabularnewline
67 & 104.74 & 105.178 & 105.415 & 0.997759 & 0.995832 \tabularnewline
68 & 105.03 & 105.366 & 105.486 & 0.998858 & 0.996813 \tabularnewline
69 & 105.59 & 105.899 & 105.567 & 1.00314 & 0.997084 \tabularnewline
70 & 105.69 & 105.863 & 105.661 & 1.00191 & 0.998368 \tabularnewline
71 & 105.58 & 105.598 & 105.753 & 0.998536 & 0.999829 \tabularnewline
72 & 104.96 & 105.027 & 105.831 & 0.992399 & 0.999364 \tabularnewline
73 & 104.93 & 105.062 & 105.938 & 0.991724 & 0.998747 \tabularnewline
74 & 105.68 & 105.699 & 106.075 & 0.996461 & 0.999819 \tabularnewline
75 & 106.93 & 106.761 & 106.21 & 1.00519 & 1.00158 \tabularnewline
76 & 107.29 & 107.093 & 106.348 & 1.00701 & 1.00184 \tabularnewline
77 & 107.25 & 107.142 & 106.486 & 1.00616 & 1.00101 \tabularnewline
78 & 106.74 & 106.729 & 106.639 & 1.00085 & 1.0001 \tabularnewline
79 & 106.44 & 106.57 & 106.81 & 0.997759 & 0.998778 \tabularnewline
80 & 106.6 & 106.859 & 106.982 & 0.998858 & 0.997572 \tabularnewline
81 & 107.26 & 107.491 & 107.155 & 1.00314 & 0.997849 \tabularnewline
82 & 107.35 & 107.54 & 107.335 & 1.00191 & 0.998232 \tabularnewline
83 & 107.22 & 107.374 & 107.532 & 0.998536 & 0.998564 \tabularnewline
84 & 106.99 & 106.917 & 107.736 & 0.992399 & 1.00068 \tabularnewline
85 & 107 & 107.06 & 107.954 & 0.991724 & 0.999436 \tabularnewline
86 & 107.74 & 107.803 & 108.186 & 0.996461 & 0.999416 \tabularnewline
87 & 109.02 & 108.986 & 108.423 & 1.00519 & 1.00031 \tabularnewline
88 & 109.54 & 109.422 & 108.661 & 1.00701 & 1.00108 \tabularnewline
89 & 109.71 & 109.565 & 108.894 & 1.00616 & 1.00133 \tabularnewline
90 & 109.18 & 109.209 & 109.116 & 1.00085 & 0.999734 \tabularnewline
91 & 109.23 & 109.083 & 109.327 & 0.997759 & 1.00135 \tabularnewline
92 & 109.38 & 109.416 & 109.541 & 0.998858 & 0.99967 \tabularnewline
93 & 110.17 & 110.103 & 109.758 & 1.00314 & 1.00061 \tabularnewline
94 & 110.15 & 110.181 & 109.971 & 1.00191 & 0.999722 \tabularnewline
95 & 110.01 & 110.006 & 110.167 & 0.998536 & 1.00004 \tabularnewline
96 & 109.54 & 109.51 & 110.349 & 0.992399 & 1.00027 \tabularnewline
97 & 109.52 & 109.644 & 110.559 & 0.991724 & 0.998867 \tabularnewline
98 & 110.35 & 110.405 & 110.798 & 0.996461 & 0.999499 \tabularnewline
99 & 111.61 & 111.599 & 111.022 & 1.00519 & 1.0001 \tabularnewline
100 & 112.06 & 112.041 & 111.261 & 1.00701 & 1.00017 \tabularnewline
101 & 111.9 & 112.203 & 111.515 & 1.00616 & 0.997303 \tabularnewline
102 & 111.36 & 111.864 & 111.769 & 1.00085 & 0.995493 \tabularnewline
103 & 112.09 & 111.787 & 112.038 & 0.997759 & 1.00271 \tabularnewline
104 & 112.24 & 112.183 & 112.311 & 0.998858 & 1.00051 \tabularnewline
105 & 112.7 & 112.939 & 112.585 & 1.00314 & 0.997886 \tabularnewline
106 & 113.36 & 113.057 & 112.842 & 1.00191 & 1.00268 \tabularnewline
107 & 112.9 & 112.927 & 113.092 & 0.998536 & 0.999761 \tabularnewline
108 & 112.74 & 112.494 & 113.355 & 0.992399 & 1.00219 \tabularnewline
109 & 112.77 & 112.693 & 113.633 & 0.991724 & 1.00069 \tabularnewline
110 & 113.66 & 113.505 & 113.908 & 0.996461 & 1.00137 \tabularnewline
111 & 114.87 & 114.747 & 114.154 & 1.00519 & 1.00107 \tabularnewline
112 & 114.97 & 115.144 & 114.343 & 1.00701 & 0.998489 \tabularnewline
113 & 115 & 115.191 & 114.486 & 1.00616 & 0.998339 \tabularnewline
114 & 114.57 & 114.731 & 114.633 & 1.00085 & 0.998598 \tabularnewline
115 & 115.54 & NA & NA & 0.997759 & NA \tabularnewline
116 & 115.39 & NA & NA & 0.998858 & NA \tabularnewline
117 & 115.46 & NA & NA & 1.00314 & NA \tabularnewline
118 & 115.13 & NA & NA & 1.00191 & NA \tabularnewline
119 & 114.56 & NA & NA & 0.998536 & NA \tabularnewline
120 & 114.62 & NA & NA & 0.992399 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=278468&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]96.01[/C][C]NA[/C][C]NA[/C][C]0.991724[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]96.39[/C][C]NA[/C][C]NA[/C][C]0.996461[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]97.16[/C][C]NA[/C][C]NA[/C][C]1.00519[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]97.46[/C][C]NA[/C][C]NA[/C][C]1.00701[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]97.6[/C][C]NA[/C][C]NA[/C][C]1.00616[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]97.02[/C][C]NA[/C][C]NA[/C][C]1.00085[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]96.95[/C][C]97.0591[/C][C]97.2771[/C][C]0.997759[/C][C]0.998876[/C][/ROW]
[ROW][C]8[/C][C]97.23[/C][C]97.2925[/C][C]97.4037[/C][C]0.998858[/C][C]0.999358[/C][/ROW]
[ROW][C]9[/C][C]98[/C][C]97.8473[/C][C]97.5408[/C][C]1.00314[/C][C]1.00156[/C][/ROW]
[ROW][C]10[/C][C]98.04[/C][C]97.8605[/C][C]97.6742[/C][C]1.00191[/C][C]1.00183[/C][/ROW]
[ROW][C]11[/C][C]97.76[/C][C]97.6493[/C][C]97.7925[/C][C]0.998536[/C][C]1.00113[/C][/ROW]
[ROW][C]12[/C][C]96.99[/C][C]97.1703[/C][C]97.9146[/C][C]0.992399[/C][C]0.998144[/C][/ROW]
[ROW][C]13[/C][C]97.44[/C][C]97.2357[/C][C]98.0471[/C][C]0.991724[/C][C]1.0021[/C][/ROW]
[ROW][C]14[/C][C]98[/C][C]97.8375[/C][C]98.185[/C][C]0.996461[/C][C]1.00166[/C][/ROW]
[ROW][C]15[/C][C]98.84[/C][C]98.8408[/C][C]98.33[/C][C]1.00519[/C][C]0.999992[/C][/ROW]
[ROW][C]16[/C][C]98.98[/C][C]99.1607[/C][C]98.4708[/C][C]1.00701[/C][C]0.998178[/C][/ROW]
[ROW][C]17[/C][C]98.92[/C][C]99.2172[/C][C]98.6096[/C][C]1.00616[/C][C]0.997004[/C][/ROW]
[ROW][C]18[/C][C]98.63[/C][C]98.8465[/C][C]98.7625[/C][C]1.00085[/C][C]0.99781[/C][/ROW]
[ROW][C]19[/C][C]98.52[/C][C]98.6751[/C][C]98.8967[/C][C]0.997759[/C][C]0.998428[/C][/ROW]
[ROW][C]20[/C][C]98.97[/C][C]98.8794[/C][C]98.9925[/C][C]0.998858[/C][C]1.00092[/C][/ROW]
[ROW][C]21[/C][C]99.74[/C][C]99.3896[/C][C]99.0783[/C][C]1.00314[/C][C]1.00353[/C][/ROW]
[ROW][C]22[/C][C]99.68[/C][C]99.3642[/C][C]99.175[/C][C]1.00191[/C][C]1.00318[/C][/ROW]
[ROW][C]23[/C][C]99.45[/C][C]99.1455[/C][C]99.2908[/C][C]0.998536[/C][C]1.00307[/C][/ROW]
[ROW][C]24[/C][C]98.97[/C][C]98.654[/C][C]99.4096[/C][C]0.992399[/C][C]1.0032[/C][/ROW]
[ROW][C]25[/C][C]98.68[/C][C]98.6985[/C][C]99.5221[/C][C]0.991724[/C][C]0.999813[/C][/ROW]
[ROW][C]26[/C][C]99.06[/C][C]99.2819[/C][C]99.6346[/C][C]0.996461[/C][C]0.997765[/C][/ROW]
[ROW][C]27[/C][C]99.84[/C][C]100.252[/C][C]99.7342[/C][C]1.00519[/C][C]0.995888[/C][/ROW]
[ROW][C]28[/C][C]100.3[/C][C]100.509[/C][C]99.8096[/C][C]1.00701[/C][C]0.997922[/C][/ROW]
[ROW][C]29[/C][C]100.38[/C][C]100.495[/C][C]99.88[/C][C]1.00616[/C][C]0.998851[/C][/ROW]
[ROW][C]30[/C][C]100.02[/C][C]100.043[/C][C]99.9579[/C][C]1.00085[/C][C]0.999771[/C][/ROW]
[ROW][C]31[/C][C]99.83[/C][C]99.8333[/C][C]100.057[/C][C]0.997759[/C][C]0.999967[/C][/ROW]
[ROW][C]32[/C][C]100.36[/C][C]100.063[/C][C]100.177[/C][C]0.998858[/C][C]1.00297[/C][/ROW]
[ROW][C]33[/C][C]100.74[/C][C]100.629[/C][C]100.314[/C][C]1.00314[/C][C]1.0011[/C][/ROW]
[ROW][C]34[/C][C]100.49[/C][C]100.656[/C][C]100.464[/C][C]1.00191[/C][C]0.998353[/C][/ROW]
[ROW][C]35[/C][C]100.33[/C][C]100.468[/C][C]100.615[/C][C]0.998536[/C][C]0.998625[/C][/ROW]
[ROW][C]36[/C][C]99.96[/C][C]99.9978[/C][C]100.764[/C][C]0.992399[/C][C]0.999622[/C][/ROW]
[ROW][C]37[/C][C]100.08[/C][C]100.063[/C][C]100.898[/C][C]0.991724[/C][C]1.00017[/C][/ROW]
[ROW][C]38[/C][C]100.54[/C][C]100.647[/C][C]101.005[/C][C]0.996461[/C][C]0.998936[/C][/ROW]
[ROW][C]39[/C][C]101.63[/C][C]101.631[/C][C]101.106[/C][C]1.00519[/C][C]0.999985[/C][/ROW]
[ROW][C]40[/C][C]102.12[/C][C]101.938[/C][C]101.229[/C][C]1.00701[/C][C]1.00178[/C][/ROW]
[ROW][C]41[/C][C]102.19[/C][C]102.002[/C][C]101.377[/C][C]1.00616[/C][C]1.00185[/C][/ROW]
[ROW][C]42[/C][C]101.77[/C][C]101.622[/C][C]101.535[/C][C]1.00085[/C][C]1.00146[/C][/ROW]
[ROW][C]43[/C][C]101.29[/C][C]101.47[/C][C]101.698[/C][C]0.997759[/C][C]0.998226[/C][/ROW]
[ROW][C]44[/C][C]101.47[/C][C]101.76[/C][C]101.877[/C][C]0.998858[/C][C]0.997147[/C][/ROW]
[ROW][C]45[/C][C]102.07[/C][C]102.383[/C][C]102.062[/C][C]1.00314[/C][C]0.996945[/C][/ROW]
[ROW][C]46[/C][C]102.11[/C][C]102.435[/C][C]102.24[/C][C]1.00191[/C][C]0.996827[/C][/ROW]
[ROW][C]47[/C][C]102.26[/C][C]102.276[/C][C]102.426[/C][C]0.998536[/C][C]0.999845[/C][/ROW]
[ROW][C]48[/C][C]101.83[/C][C]101.854[/C][C]102.634[/C][C]0.992399[/C][C]0.999768[/C][/ROW]
[ROW][C]49[/C][C]102.11[/C][C]102.027[/C][C]102.878[/C][C]0.991724[/C][C]1.00082[/C][/ROW]
[ROW][C]50[/C][C]102.8[/C][C]102.785[/C][C]103.15[/C][C]0.996461[/C][C]1.00015[/C][/ROW]
[ROW][C]51[/C][C]103.82[/C][C]103.953[/C][C]103.416[/C][C]1.00519[/C][C]0.99872[/C][/ROW]
[ROW][C]52[/C][C]104.2[/C][C]104.39[/C][C]103.664[/C][C]1.00701[/C][C]0.998176[/C][/ROW]
[ROW][C]53[/C][C]104.57[/C][C]104.519[/C][C]103.879[/C][C]1.00616[/C][C]1.00049[/C][/ROW]
[ROW][C]54[/C][C]104.38[/C][C]104.146[/C][C]104.058[/C][C]1.00085[/C][C]1.00225[/C][/ROW]
[ROW][C]55[/C][C]104.54[/C][C]103.989[/C][C]104.222[/C][C]0.997759[/C][C]1.0053[/C][/ROW]
[ROW][C]56[/C][C]104.74[/C][C]104.269[/C][C]104.388[/C][C]0.998858[/C][C]1.00452[/C][/ROW]
[ROW][C]57[/C][C]105.19[/C][C]104.885[/C][C]104.557[/C][C]1.00314[/C][C]1.00291[/C][/ROW]
[ROW][C]58[/C][C]104.95[/C][C]104.921[/C][C]104.721[/C][C]1.00191[/C][C]1.00028[/C][/ROW]
[ROW][C]59[/C][C]104.57[/C][C]104.716[/C][C]104.87[/C][C]0.998536[/C][C]0.998605[/C][/ROW]
[ROW][C]60[/C][C]103.81[/C][C]104.203[/C][C]105.001[/C][C]0.992399[/C][C]0.996227[/C][/ROW]
[ROW][C]61[/C][C]104.08[/C][C]104.202[/C][C]105.072[/C][C]0.991724[/C][C]0.998828[/C][/ROW]
[ROW][C]62[/C][C]104.81[/C][C]104.72[/C][C]105.092[/C][C]0.996461[/C][C]1.00086[/C][/ROW]
[ROW][C]63[/C][C]105.86[/C][C]105.667[/C][C]105.121[/C][C]1.00519[/C][C]1.00183[/C][/ROW]
[ROW][C]64[/C][C]106.1[/C][C]105.905[/C][C]105.168[/C][C]1.00701[/C][C]1.00184[/C][/ROW]
[ROW][C]65[/C][C]106.24[/C][C]105.89[/C][C]105.241[/C][C]1.00616[/C][C]1.00331[/C][/ROW]
[ROW][C]66[/C][C]105.87[/C][C]105.421[/C][C]105.331[/C][C]1.00085[/C][C]1.00426[/C][/ROW]
[ROW][C]67[/C][C]104.74[/C][C]105.178[/C][C]105.415[/C][C]0.997759[/C][C]0.995832[/C][/ROW]
[ROW][C]68[/C][C]105.03[/C][C]105.366[/C][C]105.486[/C][C]0.998858[/C][C]0.996813[/C][/ROW]
[ROW][C]69[/C][C]105.59[/C][C]105.899[/C][C]105.567[/C][C]1.00314[/C][C]0.997084[/C][/ROW]
[ROW][C]70[/C][C]105.69[/C][C]105.863[/C][C]105.661[/C][C]1.00191[/C][C]0.998368[/C][/ROW]
[ROW][C]71[/C][C]105.58[/C][C]105.598[/C][C]105.753[/C][C]0.998536[/C][C]0.999829[/C][/ROW]
[ROW][C]72[/C][C]104.96[/C][C]105.027[/C][C]105.831[/C][C]0.992399[/C][C]0.999364[/C][/ROW]
[ROW][C]73[/C][C]104.93[/C][C]105.062[/C][C]105.938[/C][C]0.991724[/C][C]0.998747[/C][/ROW]
[ROW][C]74[/C][C]105.68[/C][C]105.699[/C][C]106.075[/C][C]0.996461[/C][C]0.999819[/C][/ROW]
[ROW][C]75[/C][C]106.93[/C][C]106.761[/C][C]106.21[/C][C]1.00519[/C][C]1.00158[/C][/ROW]
[ROW][C]76[/C][C]107.29[/C][C]107.093[/C][C]106.348[/C][C]1.00701[/C][C]1.00184[/C][/ROW]
[ROW][C]77[/C][C]107.25[/C][C]107.142[/C][C]106.486[/C][C]1.00616[/C][C]1.00101[/C][/ROW]
[ROW][C]78[/C][C]106.74[/C][C]106.729[/C][C]106.639[/C][C]1.00085[/C][C]1.0001[/C][/ROW]
[ROW][C]79[/C][C]106.44[/C][C]106.57[/C][C]106.81[/C][C]0.997759[/C][C]0.998778[/C][/ROW]
[ROW][C]80[/C][C]106.6[/C][C]106.859[/C][C]106.982[/C][C]0.998858[/C][C]0.997572[/C][/ROW]
[ROW][C]81[/C][C]107.26[/C][C]107.491[/C][C]107.155[/C][C]1.00314[/C][C]0.997849[/C][/ROW]
[ROW][C]82[/C][C]107.35[/C][C]107.54[/C][C]107.335[/C][C]1.00191[/C][C]0.998232[/C][/ROW]
[ROW][C]83[/C][C]107.22[/C][C]107.374[/C][C]107.532[/C][C]0.998536[/C][C]0.998564[/C][/ROW]
[ROW][C]84[/C][C]106.99[/C][C]106.917[/C][C]107.736[/C][C]0.992399[/C][C]1.00068[/C][/ROW]
[ROW][C]85[/C][C]107[/C][C]107.06[/C][C]107.954[/C][C]0.991724[/C][C]0.999436[/C][/ROW]
[ROW][C]86[/C][C]107.74[/C][C]107.803[/C][C]108.186[/C][C]0.996461[/C][C]0.999416[/C][/ROW]
[ROW][C]87[/C][C]109.02[/C][C]108.986[/C][C]108.423[/C][C]1.00519[/C][C]1.00031[/C][/ROW]
[ROW][C]88[/C][C]109.54[/C][C]109.422[/C][C]108.661[/C][C]1.00701[/C][C]1.00108[/C][/ROW]
[ROW][C]89[/C][C]109.71[/C][C]109.565[/C][C]108.894[/C][C]1.00616[/C][C]1.00133[/C][/ROW]
[ROW][C]90[/C][C]109.18[/C][C]109.209[/C][C]109.116[/C][C]1.00085[/C][C]0.999734[/C][/ROW]
[ROW][C]91[/C][C]109.23[/C][C]109.083[/C][C]109.327[/C][C]0.997759[/C][C]1.00135[/C][/ROW]
[ROW][C]92[/C][C]109.38[/C][C]109.416[/C][C]109.541[/C][C]0.998858[/C][C]0.99967[/C][/ROW]
[ROW][C]93[/C][C]110.17[/C][C]110.103[/C][C]109.758[/C][C]1.00314[/C][C]1.00061[/C][/ROW]
[ROW][C]94[/C][C]110.15[/C][C]110.181[/C][C]109.971[/C][C]1.00191[/C][C]0.999722[/C][/ROW]
[ROW][C]95[/C][C]110.01[/C][C]110.006[/C][C]110.167[/C][C]0.998536[/C][C]1.00004[/C][/ROW]
[ROW][C]96[/C][C]109.54[/C][C]109.51[/C][C]110.349[/C][C]0.992399[/C][C]1.00027[/C][/ROW]
[ROW][C]97[/C][C]109.52[/C][C]109.644[/C][C]110.559[/C][C]0.991724[/C][C]0.998867[/C][/ROW]
[ROW][C]98[/C][C]110.35[/C][C]110.405[/C][C]110.798[/C][C]0.996461[/C][C]0.999499[/C][/ROW]
[ROW][C]99[/C][C]111.61[/C][C]111.599[/C][C]111.022[/C][C]1.00519[/C][C]1.0001[/C][/ROW]
[ROW][C]100[/C][C]112.06[/C][C]112.041[/C][C]111.261[/C][C]1.00701[/C][C]1.00017[/C][/ROW]
[ROW][C]101[/C][C]111.9[/C][C]112.203[/C][C]111.515[/C][C]1.00616[/C][C]0.997303[/C][/ROW]
[ROW][C]102[/C][C]111.36[/C][C]111.864[/C][C]111.769[/C][C]1.00085[/C][C]0.995493[/C][/ROW]
[ROW][C]103[/C][C]112.09[/C][C]111.787[/C][C]112.038[/C][C]0.997759[/C][C]1.00271[/C][/ROW]
[ROW][C]104[/C][C]112.24[/C][C]112.183[/C][C]112.311[/C][C]0.998858[/C][C]1.00051[/C][/ROW]
[ROW][C]105[/C][C]112.7[/C][C]112.939[/C][C]112.585[/C][C]1.00314[/C][C]0.997886[/C][/ROW]
[ROW][C]106[/C][C]113.36[/C][C]113.057[/C][C]112.842[/C][C]1.00191[/C][C]1.00268[/C][/ROW]
[ROW][C]107[/C][C]112.9[/C][C]112.927[/C][C]113.092[/C][C]0.998536[/C][C]0.999761[/C][/ROW]
[ROW][C]108[/C][C]112.74[/C][C]112.494[/C][C]113.355[/C][C]0.992399[/C][C]1.00219[/C][/ROW]
[ROW][C]109[/C][C]112.77[/C][C]112.693[/C][C]113.633[/C][C]0.991724[/C][C]1.00069[/C][/ROW]
[ROW][C]110[/C][C]113.66[/C][C]113.505[/C][C]113.908[/C][C]0.996461[/C][C]1.00137[/C][/ROW]
[ROW][C]111[/C][C]114.87[/C][C]114.747[/C][C]114.154[/C][C]1.00519[/C][C]1.00107[/C][/ROW]
[ROW][C]112[/C][C]114.97[/C][C]115.144[/C][C]114.343[/C][C]1.00701[/C][C]0.998489[/C][/ROW]
[ROW][C]113[/C][C]115[/C][C]115.191[/C][C]114.486[/C][C]1.00616[/C][C]0.998339[/C][/ROW]
[ROW][C]114[/C][C]114.57[/C][C]114.731[/C][C]114.633[/C][C]1.00085[/C][C]0.998598[/C][/ROW]
[ROW][C]115[/C][C]115.54[/C][C]NA[/C][C]NA[/C][C]0.997759[/C][C]NA[/C][/ROW]
[ROW][C]116[/C][C]115.39[/C][C]NA[/C][C]NA[/C][C]0.998858[/C][C]NA[/C][/ROW]
[ROW][C]117[/C][C]115.46[/C][C]NA[/C][C]NA[/C][C]1.00314[/C][C]NA[/C][/ROW]
[ROW][C]118[/C][C]115.13[/C][C]NA[/C][C]NA[/C][C]1.00191[/C][C]NA[/C][/ROW]
[ROW][C]119[/C][C]114.56[/C][C]NA[/C][C]NA[/C][C]0.998536[/C][C]NA[/C][/ROW]
[ROW][C]120[/C][C]114.62[/C][C]NA[/C][C]NA[/C][C]0.992399[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=278468&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=278468&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	96.01	NA	NA	0.991724	NA
2	96.39	NA	NA	0.996461	NA
3	97.16	NA	NA	1.00519	NA
4	97.46	NA	NA	1.00701	NA
5	97.6	NA	NA	1.00616	NA
6	97.02	NA	NA	1.00085	NA
7	96.95	97.0591	97.2771	0.997759	0.998876
8	97.23	97.2925	97.4037	0.998858	0.999358
9	98	97.8473	97.5408	1.00314	1.00156
10	98.04	97.8605	97.6742	1.00191	1.00183
11	97.76	97.6493	97.7925	0.998536	1.00113
12	96.99	97.1703	97.9146	0.992399	0.998144
13	97.44	97.2357	98.0471	0.991724	1.0021
14	98	97.8375	98.185	0.996461	1.00166
15	98.84	98.8408	98.33	1.00519	0.999992
16	98.98	99.1607	98.4708	1.00701	0.998178
17	98.92	99.2172	98.6096	1.00616	0.997004
18	98.63	98.8465	98.7625	1.00085	0.99781
19	98.52	98.6751	98.8967	0.997759	0.998428
20	98.97	98.8794	98.9925	0.998858	1.00092
21	99.74	99.3896	99.0783	1.00314	1.00353
22	99.68	99.3642	99.175	1.00191	1.00318
23	99.45	99.1455	99.2908	0.998536	1.00307
24	98.97	98.654	99.4096	0.992399	1.0032
25	98.68	98.6985	99.5221	0.991724	0.999813
26	99.06	99.2819	99.6346	0.996461	0.997765
27	99.84	100.252	99.7342	1.00519	0.995888
28	100.3	100.509	99.8096	1.00701	0.997922
29	100.38	100.495	99.88	1.00616	0.998851
30	100.02	100.043	99.9579	1.00085	0.999771
31	99.83	99.8333	100.057	0.997759	0.999967
32	100.36	100.063	100.177	0.998858	1.00297
33	100.74	100.629	100.314	1.00314	1.0011
34	100.49	100.656	100.464	1.00191	0.998353
35	100.33	100.468	100.615	0.998536	0.998625
36	99.96	99.9978	100.764	0.992399	0.999622
37	100.08	100.063	100.898	0.991724	1.00017
38	100.54	100.647	101.005	0.996461	0.998936
39	101.63	101.631	101.106	1.00519	0.999985
40	102.12	101.938	101.229	1.00701	1.00178
41	102.19	102.002	101.377	1.00616	1.00185
42	101.77	101.622	101.535	1.00085	1.00146
43	101.29	101.47	101.698	0.997759	0.998226
44	101.47	101.76	101.877	0.998858	0.997147
45	102.07	102.383	102.062	1.00314	0.996945
46	102.11	102.435	102.24	1.00191	0.996827
47	102.26	102.276	102.426	0.998536	0.999845
48	101.83	101.854	102.634	0.992399	0.999768
49	102.11	102.027	102.878	0.991724	1.00082
50	102.8	102.785	103.15	0.996461	1.00015
51	103.82	103.953	103.416	1.00519	0.99872
52	104.2	104.39	103.664	1.00701	0.998176
53	104.57	104.519	103.879	1.00616	1.00049
54	104.38	104.146	104.058	1.00085	1.00225
55	104.54	103.989	104.222	0.997759	1.0053
56	104.74	104.269	104.388	0.998858	1.00452
57	105.19	104.885	104.557	1.00314	1.00291
58	104.95	104.921	104.721	1.00191	1.00028
59	104.57	104.716	104.87	0.998536	0.998605
60	103.81	104.203	105.001	0.992399	0.996227
61	104.08	104.202	105.072	0.991724	0.998828
62	104.81	104.72	105.092	0.996461	1.00086
63	105.86	105.667	105.121	1.00519	1.00183
64	106.1	105.905	105.168	1.00701	1.00184
65	106.24	105.89	105.241	1.00616	1.00331
66	105.87	105.421	105.331	1.00085	1.00426
67	104.74	105.178	105.415	0.997759	0.995832
68	105.03	105.366	105.486	0.998858	0.996813
69	105.59	105.899	105.567	1.00314	0.997084
70	105.69	105.863	105.661	1.00191	0.998368
71	105.58	105.598	105.753	0.998536	0.999829
72	104.96	105.027	105.831	0.992399	0.999364
73	104.93	105.062	105.938	0.991724	0.998747
74	105.68	105.699	106.075	0.996461	0.999819
75	106.93	106.761	106.21	1.00519	1.00158
76	107.29	107.093	106.348	1.00701	1.00184
77	107.25	107.142	106.486	1.00616	1.00101
78	106.74	106.729	106.639	1.00085	1.0001
79	106.44	106.57	106.81	0.997759	0.998778
80	106.6	106.859	106.982	0.998858	0.997572
81	107.26	107.491	107.155	1.00314	0.997849
82	107.35	107.54	107.335	1.00191	0.998232
83	107.22	107.374	107.532	0.998536	0.998564
84	106.99	106.917	107.736	0.992399	1.00068
85	107	107.06	107.954	0.991724	0.999436
86	107.74	107.803	108.186	0.996461	0.999416
87	109.02	108.986	108.423	1.00519	1.00031
88	109.54	109.422	108.661	1.00701	1.00108
89	109.71	109.565	108.894	1.00616	1.00133
90	109.18	109.209	109.116	1.00085	0.999734
91	109.23	109.083	109.327	0.997759	1.00135
92	109.38	109.416	109.541	0.998858	0.99967
93	110.17	110.103	109.758	1.00314	1.00061
94	110.15	110.181	109.971	1.00191	0.999722
95	110.01	110.006	110.167	0.998536	1.00004
96	109.54	109.51	110.349	0.992399	1.00027
97	109.52	109.644	110.559	0.991724	0.998867
98	110.35	110.405	110.798	0.996461	0.999499
99	111.61	111.599	111.022	1.00519	1.0001
100	112.06	112.041	111.261	1.00701	1.00017
101	111.9	112.203	111.515	1.00616	0.997303
102	111.36	111.864	111.769	1.00085	0.995493
103	112.09	111.787	112.038	0.997759	1.00271
104	112.24	112.183	112.311	0.998858	1.00051
105	112.7	112.939	112.585	1.00314	0.997886
106	113.36	113.057	112.842	1.00191	1.00268
107	112.9	112.927	113.092	0.998536	0.999761
108	112.74	112.494	113.355	0.992399	1.00219
109	112.77	112.693	113.633	0.991724	1.00069
110	113.66	113.505	113.908	0.996461	1.00137
111	114.87	114.747	114.154	1.00519	1.00107
112	114.97	115.144	114.343	1.00701	0.998489
113	115	115.191	114.486	1.00616	0.998339
114	114.57	114.731	114.633	1.00085	0.998598
115	115.54	NA	NA	0.997759	NA
116	115.39	NA	NA	0.998858	NA
117	115.46	NA	NA	1.00314	NA
118	115.13	NA	NA	1.00191	NA
119	114.56	NA	NA	0.998536	NA
120	114.62	NA	NA	0.992399	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 = multiplicative ; par2 = 12 ;

Parameters (R input):

par1 = multiplicative ; 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