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, 18 Aug 2014 07:45:26 +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/2014/Aug/18/t14083445819an5bbve3088jg8.htm/, Retrieved Wed, 19 Nov 2025 22:08:08 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=235676, Retrieved Wed, 19 Nov 2025 22:08:08 +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

312

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

-     [Notched Boxplots] [] [2013-02-26 20:31:34] [f974b105a61ab974a820d469d59cfaf7]
- RMPD  [Harrell-Davis Quantiles] [] [2014-08-18 05:22:13] [f974b105a61ab974a820d469d59cfaf7]
- RMP     [(Partial) Autocorrelation Function] [] [2014-08-18 06:01:25] [f974b105a61ab974a820d469d59cfaf7]
- RMP         [Classical Decomposition] [] [2014-08-18 06:45:26] [8f84a338303fe8d74ac0d8ad91c8b331] [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	3 seconds
R Server	'Gertrude Mary Cox' @ cox.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 & 3 seconds \tabularnewline
R Server & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=235676&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]3 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gertrude Mary Cox' @ cox.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=235676&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=235676&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	3 seconds
R Server	'Gertrude Mary Cox' @ cox.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	95870	NA	NA	0.842453	NA
2	95523	NA	NA	0.940243	NA
3	95208	NA	NA	0.94781	NA
4	94541	NA	NA	0.960087	NA
5	101097	NA	NA	1.10323	NA
6	100781	NA	NA	1.11016	NA
7	95870	97090.3	95277.1	1.01903	0.987431
8	92581	96767.6	95208.6	1.01637	0.956735
9	92928	96963.9	95318.3	1.01726	0.958377
10	92928	104438	95468.8	1.09395	0.889794
11	93244	95298.9	95483.4	0.998067	0.978437
12	93910	90655.2	95292.1	0.95134	1.0359
13	93559	80036.8	95004.5	0.842453	1.16895
14	96190	89122.6	94786.8	0.940243	1.0793
15	97172	89698.5	94637.6	0.94781	1.08332
16	96190	90728.6	94500.4	0.960087	1.06019
17	99799	103999	94268.3	1.10323	0.959613
18	97488	104320	93968.9	1.11016	0.934505
19	92261	95452.1	93669.5	1.01903	0.966569
20	90964	94802.4	93275.1	1.01637	0.959511
21	90964	94510.8	92906.8	1.01726	0.962472
22	91599	101395	92687.5	1.09395	0.903387
23	89004	92317.3	92496	0.998067	0.96411
24	90964	87814.2	92305.8	0.95134	1.03587
25	89319	77626.5	92143.4	0.842453	1.15063
26	90964	86418.8	91911.2	0.940243	1.0526
27	93559	86815.5	91595.9	0.94781	1.07768
28	94541	87612	91254.2	0.960087	1.07909
29	96852	100358	90967.7	1.10323	0.965066
30	95870	100655	90666.9	1.11016	0.952464
31	89981	92016	90297.6	1.01903	0.977884
32	87670	91457.2	89983.7	1.01637	0.958591
33	86692	91246.2	89697.6	1.01726	0.950089
34	87670	97737.6	89344.1	1.09395	0.896994
35	86057	88954.3	89126.5	0.998067	0.96743
36	86692	84776	89112.2	0.95134	1.0226
37	84728	75015.3	89043.9	0.842453	1.12948
38	88021	83582.9	88895	0.940243	1.0531
39	89635	84166.9	88801.4	0.94781	1.06497
40	89981	85206.4	88748.6	0.960087	1.05604
41	96190	97729.3	88585.1	1.10323	0.984249
42	96190	97918.7	88202.4	1.11016	0.982346
43	88021	89367.3	87698.3	1.01903	0.984935
44	86057	88497.5	87071.7	1.01637	0.972423
45	86057	87882.5	86391	1.01726	0.979228
46	87039	93702	85655.1	1.09395	0.928892
47	82764	84645.6	84809.5	0.998067	0.97777
48	80799	79918.3	84006	0.95134	1.01102
49	78524	70196.4	83323.8	0.842453	1.11863
50	79186	77766.6	82709	0.940243	1.01825
51	82133	77746	82027	0.94781	1.05643
52	79821	78059	81304	0.960087	1.02257
53	86057	88944.2	80622	1.10323	0.967539
54	87039	88807.5	79995.3	1.11016	0.980086
55	80799	80782.3	79273.7	1.01903	1.00021
56	78524	79740.4	78455.7	1.01637	0.984746
57	77221	78893.5	77554.5	1.01726	0.9788
58	78524	83856.1	76654.8	1.09395	0.936414
59	74910	75718	75864.6	0.998067	0.989329
60	73613	71354.7	75004.4	0.95134	1.03165
61	68390	62360.8	74023	0.842453	1.09668
62	69688	68587.4	72946.5	0.940243	1.01605
63	70004	68079.1	71827.8	0.94781	1.02827
64	70355	67900.7	70723.5	0.960087	1.03614
65	76559	76700.9	69524.2	1.10323	0.99815
66	75893	75594	68093	1.11016	1.00396
67	68390	67693.6	66429.5	1.01903	1.01029
68	65097	65688.3	64630	1.01637	0.990998
69	63799	63875	62791	1.01726	0.99881
70	65444	66617.5	60896.5	1.09395	0.982385
71	59208	58819.5	58933.4	0.998067	1.00661
72	54964	54212	56984.9	0.95134	1.01387
73	47115	46433.4	55116.9	0.842453	1.01468
74	47777	50182.2	53371.6	0.940243	0.95207
75	47777	48958.2	51654	0.94781	0.975873
76	47115	47968.8	49963	0.960087	0.982201
77	52684	53330.3	48340.4	1.10323	0.987881
78	53004	51864.2	46717.8	1.11016	1.02198
79	46448	45981.5	45122.8	1.01903	1.01015
80	45151	44295.5	43581.9	1.01637	1.01931
81	42524	42724.1	41999	1.01726	0.995317
82	46133	44183.8	40389.4	1.09395	1.04412
83	39577	38732.5	38807.5	0.998067	1.0218
84	35653	35414.5	37225.9	0.95134	1.00674
85	28146	30167.4	35809	0.842453	0.932993
86	29764	32503.1	34568.9	0.940243	0.915727
87	27800	31730.4	33477.6	0.94781	0.876132
88	28462	31225.4	32523.5	0.960087	0.911501
89	33373	34813.9	31556.5	1.10323	0.958612
90	34355	33868.3	30507.6	1.11016	1.01437
91	31093	29934.6	29375.6	1.01903	1.0387
92	30742	28885.8	28420.5	1.01637	1.06426
93	30742	28203.8	27725.1	1.01726	1.09
94	35017	29599.4	27057.5	1.09395	1.18303
95	27484	26448.1	26499.3	0.998067	1.03917
96	22573	24717.6	25981.9	0.95134	0.913236
97	14058	21371.5	25368.2	0.842453	0.657792
98	20929	23340	24823.3	0.940243	0.896703
99	19946	23090.4	24361.8	0.94781	0.863822
100	20293	23011	23967.6	0.960087	0.881884
101	28146	26111.3	23668.2	1.10323	1.07792
102	27164	26019.1	23437.2	1.11016	1.044
103	23555	23786.5	23342.2	1.01903	0.990269
104	25204	23780.8	23397.6	1.01637	1.05985
105	25204	23927.8	23521.7	1.01726	1.05334
106	31093	25880.4	23657.8	1.09395	1.20141
107	24222	23705.8	23751.8	0.998067	1.02177
108	20293	22660.1	23819.2	0.95134	0.895538
109	14058	20181	23955.1	0.842453	0.696595
110	22258	22651.4	24091	0.940243	0.982633
111	21595	22975	24240.1	0.94781	0.939935
112	21911	23389.1	24361.4	0.960087	0.936804
113	28782	26964.8	24441.8	1.10323	1.06739
114	28146	27254.3	24549.9	1.11016	1.03272
115	25835	NA	NA	1.01903	NA
116	26186	NA	NA	1.01637	NA
117	27800	NA	NA	1.01726	NA
118	31409	NA	NA	1.09395	NA
119	25835	NA	NA	0.998067	NA
120	21275	NA	NA	0.95134	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 95870 & NA & NA & 0.842453 & NA \tabularnewline
2 & 95523 & NA & NA & 0.940243 & NA \tabularnewline
3 & 95208 & NA & NA & 0.94781 & NA \tabularnewline
4 & 94541 & NA & NA & 0.960087 & NA \tabularnewline
5 & 101097 & NA & NA & 1.10323 & NA \tabularnewline
6 & 100781 & NA & NA & 1.11016 & NA \tabularnewline
7 & 95870 & 97090.3 & 95277.1 & 1.01903 & 0.987431 \tabularnewline
8 & 92581 & 96767.6 & 95208.6 & 1.01637 & 0.956735 \tabularnewline
9 & 92928 & 96963.9 & 95318.3 & 1.01726 & 0.958377 \tabularnewline
10 & 92928 & 104438 & 95468.8 & 1.09395 & 0.889794 \tabularnewline
11 & 93244 & 95298.9 & 95483.4 & 0.998067 & 0.978437 \tabularnewline
12 & 93910 & 90655.2 & 95292.1 & 0.95134 & 1.0359 \tabularnewline
13 & 93559 & 80036.8 & 95004.5 & 0.842453 & 1.16895 \tabularnewline
14 & 96190 & 89122.6 & 94786.8 & 0.940243 & 1.0793 \tabularnewline
15 & 97172 & 89698.5 & 94637.6 & 0.94781 & 1.08332 \tabularnewline
16 & 96190 & 90728.6 & 94500.4 & 0.960087 & 1.06019 \tabularnewline
17 & 99799 & 103999 & 94268.3 & 1.10323 & 0.959613 \tabularnewline
18 & 97488 & 104320 & 93968.9 & 1.11016 & 0.934505 \tabularnewline
19 & 92261 & 95452.1 & 93669.5 & 1.01903 & 0.966569 \tabularnewline
20 & 90964 & 94802.4 & 93275.1 & 1.01637 & 0.959511 \tabularnewline
21 & 90964 & 94510.8 & 92906.8 & 1.01726 & 0.962472 \tabularnewline
22 & 91599 & 101395 & 92687.5 & 1.09395 & 0.903387 \tabularnewline
23 & 89004 & 92317.3 & 92496 & 0.998067 & 0.96411 \tabularnewline
24 & 90964 & 87814.2 & 92305.8 & 0.95134 & 1.03587 \tabularnewline
25 & 89319 & 77626.5 & 92143.4 & 0.842453 & 1.15063 \tabularnewline
26 & 90964 & 86418.8 & 91911.2 & 0.940243 & 1.0526 \tabularnewline
27 & 93559 & 86815.5 & 91595.9 & 0.94781 & 1.07768 \tabularnewline
28 & 94541 & 87612 & 91254.2 & 0.960087 & 1.07909 \tabularnewline
29 & 96852 & 100358 & 90967.7 & 1.10323 & 0.965066 \tabularnewline
30 & 95870 & 100655 & 90666.9 & 1.11016 & 0.952464 \tabularnewline
31 & 89981 & 92016 & 90297.6 & 1.01903 & 0.977884 \tabularnewline
32 & 87670 & 91457.2 & 89983.7 & 1.01637 & 0.958591 \tabularnewline
33 & 86692 & 91246.2 & 89697.6 & 1.01726 & 0.950089 \tabularnewline
34 & 87670 & 97737.6 & 89344.1 & 1.09395 & 0.896994 \tabularnewline
35 & 86057 & 88954.3 & 89126.5 & 0.998067 & 0.96743 \tabularnewline
36 & 86692 & 84776 & 89112.2 & 0.95134 & 1.0226 \tabularnewline
37 & 84728 & 75015.3 & 89043.9 & 0.842453 & 1.12948 \tabularnewline
38 & 88021 & 83582.9 & 88895 & 0.940243 & 1.0531 \tabularnewline
39 & 89635 & 84166.9 & 88801.4 & 0.94781 & 1.06497 \tabularnewline
40 & 89981 & 85206.4 & 88748.6 & 0.960087 & 1.05604 \tabularnewline
41 & 96190 & 97729.3 & 88585.1 & 1.10323 & 0.984249 \tabularnewline
42 & 96190 & 97918.7 & 88202.4 & 1.11016 & 0.982346 \tabularnewline
43 & 88021 & 89367.3 & 87698.3 & 1.01903 & 0.984935 \tabularnewline
44 & 86057 & 88497.5 & 87071.7 & 1.01637 & 0.972423 \tabularnewline
45 & 86057 & 87882.5 & 86391 & 1.01726 & 0.979228 \tabularnewline
46 & 87039 & 93702 & 85655.1 & 1.09395 & 0.928892 \tabularnewline
47 & 82764 & 84645.6 & 84809.5 & 0.998067 & 0.97777 \tabularnewline
48 & 80799 & 79918.3 & 84006 & 0.95134 & 1.01102 \tabularnewline
49 & 78524 & 70196.4 & 83323.8 & 0.842453 & 1.11863 \tabularnewline
50 & 79186 & 77766.6 & 82709 & 0.940243 & 1.01825 \tabularnewline
51 & 82133 & 77746 & 82027 & 0.94781 & 1.05643 \tabularnewline
52 & 79821 & 78059 & 81304 & 0.960087 & 1.02257 \tabularnewline
53 & 86057 & 88944.2 & 80622 & 1.10323 & 0.967539 \tabularnewline
54 & 87039 & 88807.5 & 79995.3 & 1.11016 & 0.980086 \tabularnewline
55 & 80799 & 80782.3 & 79273.7 & 1.01903 & 1.00021 \tabularnewline
56 & 78524 & 79740.4 & 78455.7 & 1.01637 & 0.984746 \tabularnewline
57 & 77221 & 78893.5 & 77554.5 & 1.01726 & 0.9788 \tabularnewline
58 & 78524 & 83856.1 & 76654.8 & 1.09395 & 0.936414 \tabularnewline
59 & 74910 & 75718 & 75864.6 & 0.998067 & 0.989329 \tabularnewline
60 & 73613 & 71354.7 & 75004.4 & 0.95134 & 1.03165 \tabularnewline
61 & 68390 & 62360.8 & 74023 & 0.842453 & 1.09668 \tabularnewline
62 & 69688 & 68587.4 & 72946.5 & 0.940243 & 1.01605 \tabularnewline
63 & 70004 & 68079.1 & 71827.8 & 0.94781 & 1.02827 \tabularnewline
64 & 70355 & 67900.7 & 70723.5 & 0.960087 & 1.03614 \tabularnewline
65 & 76559 & 76700.9 & 69524.2 & 1.10323 & 0.99815 \tabularnewline
66 & 75893 & 75594 & 68093 & 1.11016 & 1.00396 \tabularnewline
67 & 68390 & 67693.6 & 66429.5 & 1.01903 & 1.01029 \tabularnewline
68 & 65097 & 65688.3 & 64630 & 1.01637 & 0.990998 \tabularnewline
69 & 63799 & 63875 & 62791 & 1.01726 & 0.99881 \tabularnewline
70 & 65444 & 66617.5 & 60896.5 & 1.09395 & 0.982385 \tabularnewline
71 & 59208 & 58819.5 & 58933.4 & 0.998067 & 1.00661 \tabularnewline
72 & 54964 & 54212 & 56984.9 & 0.95134 & 1.01387 \tabularnewline
73 & 47115 & 46433.4 & 55116.9 & 0.842453 & 1.01468 \tabularnewline
74 & 47777 & 50182.2 & 53371.6 & 0.940243 & 0.95207 \tabularnewline
75 & 47777 & 48958.2 & 51654 & 0.94781 & 0.975873 \tabularnewline
76 & 47115 & 47968.8 & 49963 & 0.960087 & 0.982201 \tabularnewline
77 & 52684 & 53330.3 & 48340.4 & 1.10323 & 0.987881 \tabularnewline
78 & 53004 & 51864.2 & 46717.8 & 1.11016 & 1.02198 \tabularnewline
79 & 46448 & 45981.5 & 45122.8 & 1.01903 & 1.01015 \tabularnewline
80 & 45151 & 44295.5 & 43581.9 & 1.01637 & 1.01931 \tabularnewline
81 & 42524 & 42724.1 & 41999 & 1.01726 & 0.995317 \tabularnewline
82 & 46133 & 44183.8 & 40389.4 & 1.09395 & 1.04412 \tabularnewline
83 & 39577 & 38732.5 & 38807.5 & 0.998067 & 1.0218 \tabularnewline
84 & 35653 & 35414.5 & 37225.9 & 0.95134 & 1.00674 \tabularnewline
85 & 28146 & 30167.4 & 35809 & 0.842453 & 0.932993 \tabularnewline
86 & 29764 & 32503.1 & 34568.9 & 0.940243 & 0.915727 \tabularnewline
87 & 27800 & 31730.4 & 33477.6 & 0.94781 & 0.876132 \tabularnewline
88 & 28462 & 31225.4 & 32523.5 & 0.960087 & 0.911501 \tabularnewline
89 & 33373 & 34813.9 & 31556.5 & 1.10323 & 0.958612 \tabularnewline
90 & 34355 & 33868.3 & 30507.6 & 1.11016 & 1.01437 \tabularnewline
91 & 31093 & 29934.6 & 29375.6 & 1.01903 & 1.0387 \tabularnewline
92 & 30742 & 28885.8 & 28420.5 & 1.01637 & 1.06426 \tabularnewline
93 & 30742 & 28203.8 & 27725.1 & 1.01726 & 1.09 \tabularnewline
94 & 35017 & 29599.4 & 27057.5 & 1.09395 & 1.18303 \tabularnewline
95 & 27484 & 26448.1 & 26499.3 & 0.998067 & 1.03917 \tabularnewline
96 & 22573 & 24717.6 & 25981.9 & 0.95134 & 0.913236 \tabularnewline
97 & 14058 & 21371.5 & 25368.2 & 0.842453 & 0.657792 \tabularnewline
98 & 20929 & 23340 & 24823.3 & 0.940243 & 0.896703 \tabularnewline
99 & 19946 & 23090.4 & 24361.8 & 0.94781 & 0.863822 \tabularnewline
100 & 20293 & 23011 & 23967.6 & 0.960087 & 0.881884 \tabularnewline
101 & 28146 & 26111.3 & 23668.2 & 1.10323 & 1.07792 \tabularnewline
102 & 27164 & 26019.1 & 23437.2 & 1.11016 & 1.044 \tabularnewline
103 & 23555 & 23786.5 & 23342.2 & 1.01903 & 0.990269 \tabularnewline
104 & 25204 & 23780.8 & 23397.6 & 1.01637 & 1.05985 \tabularnewline
105 & 25204 & 23927.8 & 23521.7 & 1.01726 & 1.05334 \tabularnewline
106 & 31093 & 25880.4 & 23657.8 & 1.09395 & 1.20141 \tabularnewline
107 & 24222 & 23705.8 & 23751.8 & 0.998067 & 1.02177 \tabularnewline
108 & 20293 & 22660.1 & 23819.2 & 0.95134 & 0.895538 \tabularnewline
109 & 14058 & 20181 & 23955.1 & 0.842453 & 0.696595 \tabularnewline
110 & 22258 & 22651.4 & 24091 & 0.940243 & 0.982633 \tabularnewline
111 & 21595 & 22975 & 24240.1 & 0.94781 & 0.939935 \tabularnewline
112 & 21911 & 23389.1 & 24361.4 & 0.960087 & 0.936804 \tabularnewline
113 & 28782 & 26964.8 & 24441.8 & 1.10323 & 1.06739 \tabularnewline
114 & 28146 & 27254.3 & 24549.9 & 1.11016 & 1.03272 \tabularnewline
115 & 25835 & NA & NA & 1.01903 & NA \tabularnewline
116 & 26186 & NA & NA & 1.01637 & NA \tabularnewline
117 & 27800 & NA & NA & 1.01726 & NA \tabularnewline
118 & 31409 & NA & NA & 1.09395 & NA \tabularnewline
119 & 25835 & NA & NA & 0.998067 & NA \tabularnewline
120 & 21275 & NA & NA & 0.95134 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=235676&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]95870[/C][C]NA[/C][C]NA[/C][C]0.842453[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]95523[/C][C]NA[/C][C]NA[/C][C]0.940243[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]95208[/C][C]NA[/C][C]NA[/C][C]0.94781[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]94541[/C][C]NA[/C][C]NA[/C][C]0.960087[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]101097[/C][C]NA[/C][C]NA[/C][C]1.10323[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]100781[/C][C]NA[/C][C]NA[/C][C]1.11016[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]95870[/C][C]97090.3[/C][C]95277.1[/C][C]1.01903[/C][C]0.987431[/C][/ROW]
[ROW][C]8[/C][C]92581[/C][C]96767.6[/C][C]95208.6[/C][C]1.01637[/C][C]0.956735[/C][/ROW]
[ROW][C]9[/C][C]92928[/C][C]96963.9[/C][C]95318.3[/C][C]1.01726[/C][C]0.958377[/C][/ROW]
[ROW][C]10[/C][C]92928[/C][C]104438[/C][C]95468.8[/C][C]1.09395[/C][C]0.889794[/C][/ROW]
[ROW][C]11[/C][C]93244[/C][C]95298.9[/C][C]95483.4[/C][C]0.998067[/C][C]0.978437[/C][/ROW]
[ROW][C]12[/C][C]93910[/C][C]90655.2[/C][C]95292.1[/C][C]0.95134[/C][C]1.0359[/C][/ROW]
[ROW][C]13[/C][C]93559[/C][C]80036.8[/C][C]95004.5[/C][C]0.842453[/C][C]1.16895[/C][/ROW]
[ROW][C]14[/C][C]96190[/C][C]89122.6[/C][C]94786.8[/C][C]0.940243[/C][C]1.0793[/C][/ROW]
[ROW][C]15[/C][C]97172[/C][C]89698.5[/C][C]94637.6[/C][C]0.94781[/C][C]1.08332[/C][/ROW]
[ROW][C]16[/C][C]96190[/C][C]90728.6[/C][C]94500.4[/C][C]0.960087[/C][C]1.06019[/C][/ROW]
[ROW][C]17[/C][C]99799[/C][C]103999[/C][C]94268.3[/C][C]1.10323[/C][C]0.959613[/C][/ROW]
[ROW][C]18[/C][C]97488[/C][C]104320[/C][C]93968.9[/C][C]1.11016[/C][C]0.934505[/C][/ROW]
[ROW][C]19[/C][C]92261[/C][C]95452.1[/C][C]93669.5[/C][C]1.01903[/C][C]0.966569[/C][/ROW]
[ROW][C]20[/C][C]90964[/C][C]94802.4[/C][C]93275.1[/C][C]1.01637[/C][C]0.959511[/C][/ROW]
[ROW][C]21[/C][C]90964[/C][C]94510.8[/C][C]92906.8[/C][C]1.01726[/C][C]0.962472[/C][/ROW]
[ROW][C]22[/C][C]91599[/C][C]101395[/C][C]92687.5[/C][C]1.09395[/C][C]0.903387[/C][/ROW]
[ROW][C]23[/C][C]89004[/C][C]92317.3[/C][C]92496[/C][C]0.998067[/C][C]0.96411[/C][/ROW]
[ROW][C]24[/C][C]90964[/C][C]87814.2[/C][C]92305.8[/C][C]0.95134[/C][C]1.03587[/C][/ROW]
[ROW][C]25[/C][C]89319[/C][C]77626.5[/C][C]92143.4[/C][C]0.842453[/C][C]1.15063[/C][/ROW]
[ROW][C]26[/C][C]90964[/C][C]86418.8[/C][C]91911.2[/C][C]0.940243[/C][C]1.0526[/C][/ROW]
[ROW][C]27[/C][C]93559[/C][C]86815.5[/C][C]91595.9[/C][C]0.94781[/C][C]1.07768[/C][/ROW]
[ROW][C]28[/C][C]94541[/C][C]87612[/C][C]91254.2[/C][C]0.960087[/C][C]1.07909[/C][/ROW]
[ROW][C]29[/C][C]96852[/C][C]100358[/C][C]90967.7[/C][C]1.10323[/C][C]0.965066[/C][/ROW]
[ROW][C]30[/C][C]95870[/C][C]100655[/C][C]90666.9[/C][C]1.11016[/C][C]0.952464[/C][/ROW]
[ROW][C]31[/C][C]89981[/C][C]92016[/C][C]90297.6[/C][C]1.01903[/C][C]0.977884[/C][/ROW]
[ROW][C]32[/C][C]87670[/C][C]91457.2[/C][C]89983.7[/C][C]1.01637[/C][C]0.958591[/C][/ROW]
[ROW][C]33[/C][C]86692[/C][C]91246.2[/C][C]89697.6[/C][C]1.01726[/C][C]0.950089[/C][/ROW]
[ROW][C]34[/C][C]87670[/C][C]97737.6[/C][C]89344.1[/C][C]1.09395[/C][C]0.896994[/C][/ROW]
[ROW][C]35[/C][C]86057[/C][C]88954.3[/C][C]89126.5[/C][C]0.998067[/C][C]0.96743[/C][/ROW]
[ROW][C]36[/C][C]86692[/C][C]84776[/C][C]89112.2[/C][C]0.95134[/C][C]1.0226[/C][/ROW]
[ROW][C]37[/C][C]84728[/C][C]75015.3[/C][C]89043.9[/C][C]0.842453[/C][C]1.12948[/C][/ROW]
[ROW][C]38[/C][C]88021[/C][C]83582.9[/C][C]88895[/C][C]0.940243[/C][C]1.0531[/C][/ROW]
[ROW][C]39[/C][C]89635[/C][C]84166.9[/C][C]88801.4[/C][C]0.94781[/C][C]1.06497[/C][/ROW]
[ROW][C]40[/C][C]89981[/C][C]85206.4[/C][C]88748.6[/C][C]0.960087[/C][C]1.05604[/C][/ROW]
[ROW][C]41[/C][C]96190[/C][C]97729.3[/C][C]88585.1[/C][C]1.10323[/C][C]0.984249[/C][/ROW]
[ROW][C]42[/C][C]96190[/C][C]97918.7[/C][C]88202.4[/C][C]1.11016[/C][C]0.982346[/C][/ROW]
[ROW][C]43[/C][C]88021[/C][C]89367.3[/C][C]87698.3[/C][C]1.01903[/C][C]0.984935[/C][/ROW]
[ROW][C]44[/C][C]86057[/C][C]88497.5[/C][C]87071.7[/C][C]1.01637[/C][C]0.972423[/C][/ROW]
[ROW][C]45[/C][C]86057[/C][C]87882.5[/C][C]86391[/C][C]1.01726[/C][C]0.979228[/C][/ROW]
[ROW][C]46[/C][C]87039[/C][C]93702[/C][C]85655.1[/C][C]1.09395[/C][C]0.928892[/C][/ROW]
[ROW][C]47[/C][C]82764[/C][C]84645.6[/C][C]84809.5[/C][C]0.998067[/C][C]0.97777[/C][/ROW]
[ROW][C]48[/C][C]80799[/C][C]79918.3[/C][C]84006[/C][C]0.95134[/C][C]1.01102[/C][/ROW]
[ROW][C]49[/C][C]78524[/C][C]70196.4[/C][C]83323.8[/C][C]0.842453[/C][C]1.11863[/C][/ROW]
[ROW][C]50[/C][C]79186[/C][C]77766.6[/C][C]82709[/C][C]0.940243[/C][C]1.01825[/C][/ROW]
[ROW][C]51[/C][C]82133[/C][C]77746[/C][C]82027[/C][C]0.94781[/C][C]1.05643[/C][/ROW]
[ROW][C]52[/C][C]79821[/C][C]78059[/C][C]81304[/C][C]0.960087[/C][C]1.02257[/C][/ROW]
[ROW][C]53[/C][C]86057[/C][C]88944.2[/C][C]80622[/C][C]1.10323[/C][C]0.967539[/C][/ROW]
[ROW][C]54[/C][C]87039[/C][C]88807.5[/C][C]79995.3[/C][C]1.11016[/C][C]0.980086[/C][/ROW]
[ROW][C]55[/C][C]80799[/C][C]80782.3[/C][C]79273.7[/C][C]1.01903[/C][C]1.00021[/C][/ROW]
[ROW][C]56[/C][C]78524[/C][C]79740.4[/C][C]78455.7[/C][C]1.01637[/C][C]0.984746[/C][/ROW]
[ROW][C]57[/C][C]77221[/C][C]78893.5[/C][C]77554.5[/C][C]1.01726[/C][C]0.9788[/C][/ROW]
[ROW][C]58[/C][C]78524[/C][C]83856.1[/C][C]76654.8[/C][C]1.09395[/C][C]0.936414[/C][/ROW]
[ROW][C]59[/C][C]74910[/C][C]75718[/C][C]75864.6[/C][C]0.998067[/C][C]0.989329[/C][/ROW]
[ROW][C]60[/C][C]73613[/C][C]71354.7[/C][C]75004.4[/C][C]0.95134[/C][C]1.03165[/C][/ROW]
[ROW][C]61[/C][C]68390[/C][C]62360.8[/C][C]74023[/C][C]0.842453[/C][C]1.09668[/C][/ROW]
[ROW][C]62[/C][C]69688[/C][C]68587.4[/C][C]72946.5[/C][C]0.940243[/C][C]1.01605[/C][/ROW]
[ROW][C]63[/C][C]70004[/C][C]68079.1[/C][C]71827.8[/C][C]0.94781[/C][C]1.02827[/C][/ROW]
[ROW][C]64[/C][C]70355[/C][C]67900.7[/C][C]70723.5[/C][C]0.960087[/C][C]1.03614[/C][/ROW]
[ROW][C]65[/C][C]76559[/C][C]76700.9[/C][C]69524.2[/C][C]1.10323[/C][C]0.99815[/C][/ROW]
[ROW][C]66[/C][C]75893[/C][C]75594[/C][C]68093[/C][C]1.11016[/C][C]1.00396[/C][/ROW]
[ROW][C]67[/C][C]68390[/C][C]67693.6[/C][C]66429.5[/C][C]1.01903[/C][C]1.01029[/C][/ROW]
[ROW][C]68[/C][C]65097[/C][C]65688.3[/C][C]64630[/C][C]1.01637[/C][C]0.990998[/C][/ROW]
[ROW][C]69[/C][C]63799[/C][C]63875[/C][C]62791[/C][C]1.01726[/C][C]0.99881[/C][/ROW]
[ROW][C]70[/C][C]65444[/C][C]66617.5[/C][C]60896.5[/C][C]1.09395[/C][C]0.982385[/C][/ROW]
[ROW][C]71[/C][C]59208[/C][C]58819.5[/C][C]58933.4[/C][C]0.998067[/C][C]1.00661[/C][/ROW]
[ROW][C]72[/C][C]54964[/C][C]54212[/C][C]56984.9[/C][C]0.95134[/C][C]1.01387[/C][/ROW]
[ROW][C]73[/C][C]47115[/C][C]46433.4[/C][C]55116.9[/C][C]0.842453[/C][C]1.01468[/C][/ROW]
[ROW][C]74[/C][C]47777[/C][C]50182.2[/C][C]53371.6[/C][C]0.940243[/C][C]0.95207[/C][/ROW]
[ROW][C]75[/C][C]47777[/C][C]48958.2[/C][C]51654[/C][C]0.94781[/C][C]0.975873[/C][/ROW]
[ROW][C]76[/C][C]47115[/C][C]47968.8[/C][C]49963[/C][C]0.960087[/C][C]0.982201[/C][/ROW]
[ROW][C]77[/C][C]52684[/C][C]53330.3[/C][C]48340.4[/C][C]1.10323[/C][C]0.987881[/C][/ROW]
[ROW][C]78[/C][C]53004[/C][C]51864.2[/C][C]46717.8[/C][C]1.11016[/C][C]1.02198[/C][/ROW]
[ROW][C]79[/C][C]46448[/C][C]45981.5[/C][C]45122.8[/C][C]1.01903[/C][C]1.01015[/C][/ROW]
[ROW][C]80[/C][C]45151[/C][C]44295.5[/C][C]43581.9[/C][C]1.01637[/C][C]1.01931[/C][/ROW]
[ROW][C]81[/C][C]42524[/C][C]42724.1[/C][C]41999[/C][C]1.01726[/C][C]0.995317[/C][/ROW]
[ROW][C]82[/C][C]46133[/C][C]44183.8[/C][C]40389.4[/C][C]1.09395[/C][C]1.04412[/C][/ROW]
[ROW][C]83[/C][C]39577[/C][C]38732.5[/C][C]38807.5[/C][C]0.998067[/C][C]1.0218[/C][/ROW]
[ROW][C]84[/C][C]35653[/C][C]35414.5[/C][C]37225.9[/C][C]0.95134[/C][C]1.00674[/C][/ROW]
[ROW][C]85[/C][C]28146[/C][C]30167.4[/C][C]35809[/C][C]0.842453[/C][C]0.932993[/C][/ROW]
[ROW][C]86[/C][C]29764[/C][C]32503.1[/C][C]34568.9[/C][C]0.940243[/C][C]0.915727[/C][/ROW]
[ROW][C]87[/C][C]27800[/C][C]31730.4[/C][C]33477.6[/C][C]0.94781[/C][C]0.876132[/C][/ROW]
[ROW][C]88[/C][C]28462[/C][C]31225.4[/C][C]32523.5[/C][C]0.960087[/C][C]0.911501[/C][/ROW]
[ROW][C]89[/C][C]33373[/C][C]34813.9[/C][C]31556.5[/C][C]1.10323[/C][C]0.958612[/C][/ROW]
[ROW][C]90[/C][C]34355[/C][C]33868.3[/C][C]30507.6[/C][C]1.11016[/C][C]1.01437[/C][/ROW]
[ROW][C]91[/C][C]31093[/C][C]29934.6[/C][C]29375.6[/C][C]1.01903[/C][C]1.0387[/C][/ROW]
[ROW][C]92[/C][C]30742[/C][C]28885.8[/C][C]28420.5[/C][C]1.01637[/C][C]1.06426[/C][/ROW]
[ROW][C]93[/C][C]30742[/C][C]28203.8[/C][C]27725.1[/C][C]1.01726[/C][C]1.09[/C][/ROW]
[ROW][C]94[/C][C]35017[/C][C]29599.4[/C][C]27057.5[/C][C]1.09395[/C][C]1.18303[/C][/ROW]
[ROW][C]95[/C][C]27484[/C][C]26448.1[/C][C]26499.3[/C][C]0.998067[/C][C]1.03917[/C][/ROW]
[ROW][C]96[/C][C]22573[/C][C]24717.6[/C][C]25981.9[/C][C]0.95134[/C][C]0.913236[/C][/ROW]
[ROW][C]97[/C][C]14058[/C][C]21371.5[/C][C]25368.2[/C][C]0.842453[/C][C]0.657792[/C][/ROW]
[ROW][C]98[/C][C]20929[/C][C]23340[/C][C]24823.3[/C][C]0.940243[/C][C]0.896703[/C][/ROW]
[ROW][C]99[/C][C]19946[/C][C]23090.4[/C][C]24361.8[/C][C]0.94781[/C][C]0.863822[/C][/ROW]
[ROW][C]100[/C][C]20293[/C][C]23011[/C][C]23967.6[/C][C]0.960087[/C][C]0.881884[/C][/ROW]
[ROW][C]101[/C][C]28146[/C][C]26111.3[/C][C]23668.2[/C][C]1.10323[/C][C]1.07792[/C][/ROW]
[ROW][C]102[/C][C]27164[/C][C]26019.1[/C][C]23437.2[/C][C]1.11016[/C][C]1.044[/C][/ROW]
[ROW][C]103[/C][C]23555[/C][C]23786.5[/C][C]23342.2[/C][C]1.01903[/C][C]0.990269[/C][/ROW]
[ROW][C]104[/C][C]25204[/C][C]23780.8[/C][C]23397.6[/C][C]1.01637[/C][C]1.05985[/C][/ROW]
[ROW][C]105[/C][C]25204[/C][C]23927.8[/C][C]23521.7[/C][C]1.01726[/C][C]1.05334[/C][/ROW]
[ROW][C]106[/C][C]31093[/C][C]25880.4[/C][C]23657.8[/C][C]1.09395[/C][C]1.20141[/C][/ROW]
[ROW][C]107[/C][C]24222[/C][C]23705.8[/C][C]23751.8[/C][C]0.998067[/C][C]1.02177[/C][/ROW]
[ROW][C]108[/C][C]20293[/C][C]22660.1[/C][C]23819.2[/C][C]0.95134[/C][C]0.895538[/C][/ROW]
[ROW][C]109[/C][C]14058[/C][C]20181[/C][C]23955.1[/C][C]0.842453[/C][C]0.696595[/C][/ROW]
[ROW][C]110[/C][C]22258[/C][C]22651.4[/C][C]24091[/C][C]0.940243[/C][C]0.982633[/C][/ROW]
[ROW][C]111[/C][C]21595[/C][C]22975[/C][C]24240.1[/C][C]0.94781[/C][C]0.939935[/C][/ROW]
[ROW][C]112[/C][C]21911[/C][C]23389.1[/C][C]24361.4[/C][C]0.960087[/C][C]0.936804[/C][/ROW]
[ROW][C]113[/C][C]28782[/C][C]26964.8[/C][C]24441.8[/C][C]1.10323[/C][C]1.06739[/C][/ROW]
[ROW][C]114[/C][C]28146[/C][C]27254.3[/C][C]24549.9[/C][C]1.11016[/C][C]1.03272[/C][/ROW]
[ROW][C]115[/C][C]25835[/C][C]NA[/C][C]NA[/C][C]1.01903[/C][C]NA[/C][/ROW]
[ROW][C]116[/C][C]26186[/C][C]NA[/C][C]NA[/C][C]1.01637[/C][C]NA[/C][/ROW]
[ROW][C]117[/C][C]27800[/C][C]NA[/C][C]NA[/C][C]1.01726[/C][C]NA[/C][/ROW]
[ROW][C]118[/C][C]31409[/C][C]NA[/C][C]NA[/C][C]1.09395[/C][C]NA[/C][/ROW]
[ROW][C]119[/C][C]25835[/C][C]NA[/C][C]NA[/C][C]0.998067[/C][C]NA[/C][/ROW]
[ROW][C]120[/C][C]21275[/C][C]NA[/C][C]NA[/C][C]0.95134[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=235676&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=235676&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	95870	NA	NA	0.842453	NA
2	95523	NA	NA	0.940243	NA
3	95208	NA	NA	0.94781	NA
4	94541	NA	NA	0.960087	NA
5	101097	NA	NA	1.10323	NA
6	100781	NA	NA	1.11016	NA
7	95870	97090.3	95277.1	1.01903	0.987431
8	92581	96767.6	95208.6	1.01637	0.956735
9	92928	96963.9	95318.3	1.01726	0.958377
10	92928	104438	95468.8	1.09395	0.889794
11	93244	95298.9	95483.4	0.998067	0.978437
12	93910	90655.2	95292.1	0.95134	1.0359
13	93559	80036.8	95004.5	0.842453	1.16895
14	96190	89122.6	94786.8	0.940243	1.0793
15	97172	89698.5	94637.6	0.94781	1.08332
16	96190	90728.6	94500.4	0.960087	1.06019
17	99799	103999	94268.3	1.10323	0.959613
18	97488	104320	93968.9	1.11016	0.934505
19	92261	95452.1	93669.5	1.01903	0.966569
20	90964	94802.4	93275.1	1.01637	0.959511
21	90964	94510.8	92906.8	1.01726	0.962472
22	91599	101395	92687.5	1.09395	0.903387
23	89004	92317.3	92496	0.998067	0.96411
24	90964	87814.2	92305.8	0.95134	1.03587
25	89319	77626.5	92143.4	0.842453	1.15063
26	90964	86418.8	91911.2	0.940243	1.0526
27	93559	86815.5	91595.9	0.94781	1.07768
28	94541	87612	91254.2	0.960087	1.07909
29	96852	100358	90967.7	1.10323	0.965066
30	95870	100655	90666.9	1.11016	0.952464
31	89981	92016	90297.6	1.01903	0.977884
32	87670	91457.2	89983.7	1.01637	0.958591
33	86692	91246.2	89697.6	1.01726	0.950089
34	87670	97737.6	89344.1	1.09395	0.896994
35	86057	88954.3	89126.5	0.998067	0.96743
36	86692	84776	89112.2	0.95134	1.0226
37	84728	75015.3	89043.9	0.842453	1.12948
38	88021	83582.9	88895	0.940243	1.0531
39	89635	84166.9	88801.4	0.94781	1.06497
40	89981	85206.4	88748.6	0.960087	1.05604
41	96190	97729.3	88585.1	1.10323	0.984249
42	96190	97918.7	88202.4	1.11016	0.982346
43	88021	89367.3	87698.3	1.01903	0.984935
44	86057	88497.5	87071.7	1.01637	0.972423
45	86057	87882.5	86391	1.01726	0.979228
46	87039	93702	85655.1	1.09395	0.928892
47	82764	84645.6	84809.5	0.998067	0.97777
48	80799	79918.3	84006	0.95134	1.01102
49	78524	70196.4	83323.8	0.842453	1.11863
50	79186	77766.6	82709	0.940243	1.01825
51	82133	77746	82027	0.94781	1.05643
52	79821	78059	81304	0.960087	1.02257
53	86057	88944.2	80622	1.10323	0.967539
54	87039	88807.5	79995.3	1.11016	0.980086
55	80799	80782.3	79273.7	1.01903	1.00021
56	78524	79740.4	78455.7	1.01637	0.984746
57	77221	78893.5	77554.5	1.01726	0.9788
58	78524	83856.1	76654.8	1.09395	0.936414
59	74910	75718	75864.6	0.998067	0.989329
60	73613	71354.7	75004.4	0.95134	1.03165
61	68390	62360.8	74023	0.842453	1.09668
62	69688	68587.4	72946.5	0.940243	1.01605
63	70004	68079.1	71827.8	0.94781	1.02827
64	70355	67900.7	70723.5	0.960087	1.03614
65	76559	76700.9	69524.2	1.10323	0.99815
66	75893	75594	68093	1.11016	1.00396
67	68390	67693.6	66429.5	1.01903	1.01029
68	65097	65688.3	64630	1.01637	0.990998
69	63799	63875	62791	1.01726	0.99881
70	65444	66617.5	60896.5	1.09395	0.982385
71	59208	58819.5	58933.4	0.998067	1.00661
72	54964	54212	56984.9	0.95134	1.01387
73	47115	46433.4	55116.9	0.842453	1.01468
74	47777	50182.2	53371.6	0.940243	0.95207
75	47777	48958.2	51654	0.94781	0.975873
76	47115	47968.8	49963	0.960087	0.982201
77	52684	53330.3	48340.4	1.10323	0.987881
78	53004	51864.2	46717.8	1.11016	1.02198
79	46448	45981.5	45122.8	1.01903	1.01015
80	45151	44295.5	43581.9	1.01637	1.01931
81	42524	42724.1	41999	1.01726	0.995317
82	46133	44183.8	40389.4	1.09395	1.04412
83	39577	38732.5	38807.5	0.998067	1.0218
84	35653	35414.5	37225.9	0.95134	1.00674
85	28146	30167.4	35809	0.842453	0.932993
86	29764	32503.1	34568.9	0.940243	0.915727
87	27800	31730.4	33477.6	0.94781	0.876132
88	28462	31225.4	32523.5	0.960087	0.911501
89	33373	34813.9	31556.5	1.10323	0.958612
90	34355	33868.3	30507.6	1.11016	1.01437
91	31093	29934.6	29375.6	1.01903	1.0387
92	30742	28885.8	28420.5	1.01637	1.06426
93	30742	28203.8	27725.1	1.01726	1.09
94	35017	29599.4	27057.5	1.09395	1.18303
95	27484	26448.1	26499.3	0.998067	1.03917
96	22573	24717.6	25981.9	0.95134	0.913236
97	14058	21371.5	25368.2	0.842453	0.657792
98	20929	23340	24823.3	0.940243	0.896703
99	19946	23090.4	24361.8	0.94781	0.863822
100	20293	23011	23967.6	0.960087	0.881884
101	28146	26111.3	23668.2	1.10323	1.07792
102	27164	26019.1	23437.2	1.11016	1.044
103	23555	23786.5	23342.2	1.01903	0.990269
104	25204	23780.8	23397.6	1.01637	1.05985
105	25204	23927.8	23521.7	1.01726	1.05334
106	31093	25880.4	23657.8	1.09395	1.20141
107	24222	23705.8	23751.8	0.998067	1.02177
108	20293	22660.1	23819.2	0.95134	0.895538
109	14058	20181	23955.1	0.842453	0.696595
110	22258	22651.4	24091	0.940243	0.982633
111	21595	22975	24240.1	0.94781	0.939935
112	21911	23389.1	24361.4	0.960087	0.936804
113	28782	26964.8	24441.8	1.10323	1.06739
114	28146	27254.3	24549.9	1.11016	1.03272
115	25835	NA	NA	1.01903	NA
116	26186	NA	NA	1.01637	NA
117	27800	NA	NA	1.01726	NA
118	31409	NA	NA	1.09395	NA
119	25835	NA	NA	0.998067	NA
120	21275	NA	NA	0.95134	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 <- '12'
par1 <- 'additive'
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