Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_decompose.wasp

Title produced by software

Classical Decomposition

Date of computation

Wed, 10 Dec 2014 15:32:33 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/10/t14182256005okkwwapfvqt1x6.htm/, Retrieved Sun, 12 May 2024 02:45:46 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=265394, Retrieved Sun, 12 May 2024 02:45:46 +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

105

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

-     [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-12 13:32:37] [76963dc1903f0f612b6153510a3818cf]
- R  D  [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-17 12:14:40] [76963dc1903f0f612b6153510a3818cf]
-         [Univariate Explorative Data Analysis] [Run Sequence Plot...] [2008-12-22 18:19:51] [1ce0d16c8f4225c977b42c8fa93bc163]
- RMP       [Univariate Data Series] [Identifying Integ...] [2009-11-22 12:08:06] [b98453cac15ba1066b407e146608df68]
- RMP         [Classical Decomposition] [Births] [2010-11-30 13:45:46] [b98453cac15ba1066b407e146608df68]
- RM            [Classical Decomposition] [WS8 Q1] [2014-11-19 13:14:43] [bcf5edf18529a33bd1494456d2c6cb9a]
- RM D              [Classical Decomposition] [Classical decompo...] [2014-12-10 15:32:33] [0ce3062f3159e08d115eba7e96d082ef] [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	'Sir Ronald Aylmer Fisher' @ fisher.wessa.net

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 3 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265394&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]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265394&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	1894	NA	NA	-1319.18	NA
2	1757	NA	NA	-1709.51	NA
3	3582	NA	NA	-464.672	NA
4	5321	NA	NA	1824.13	NA
5	5561	NA	NA	2452.68	NA
6	5907	NA	NA	1696.58	NA
7	4944	5205.37	3521.25	1684.12	-261.37
8	4966	4659.8	3530.75	1129.05	306.201
9	3258	3127.52	3530.83	-403.313	130.48
10	1964	2317.23	3544.04	-1226.81	-353.233
11	1743	2098.95	3580.46	-1481.5	-355.953
12	1262	1379.31	3560.88	-2181.56	-117.312
13	2086	2202.23	3521.42	-1319.18	-116.233
14	1793	1821.03	3530.54	-1709.51	-28.0285
15	3548	3071.41	3536.08	-464.672	476.588
16	5672	5367.51	3543.37	1824.13	304.492
17	6084	6025.64	3572.96	2452.68	58.3632
18	4914	5297.66	3601.08	1696.58	-383.662
19	4990	5297.66	3613.54	1684.12	-307.662
20	5139	4757.22	3628.17	1129.05	381.784
21	3218	3233.81	3637.12	-403.313	-15.8118
22	2179	2380.65	3607.46	-1226.81	-201.649
23	2238	2176.75	3658.25	-1481.5	61.2549
24	1442	1555.02	3736.58	-2181.56	-113.02
25	2205	2426.02	3745.21	-1319.18	-221.024
26	2025	2048.36	3757.87	-1709.51	-23.3618
27	3531	3299.37	3764.04	-464.672	231.63
28	4977	5612.72	3788.58	1824.13	-635.716
29	7998	6260.76	3808.08	2452.68	1737.24
30	4880	5500.41	3803.83	1696.58	-620.412
31	5231	5494.25	3810.12	1684.12	-263.245
32	5202	4947.05	3818	1129.05	254.951
33	3303	3398.19	3801.5	-403.313	-95.1868
34	2683	2600.48	3827.29	-1226.81	82.5174
35	2202	2289.37	3770.87	-1481.5	-87.3701
36	1376	1555.73	3737.29	-2181.56	-179.728
37	2422	2522.77	3841.96	-1319.18	-100.774
38	1997	2143.9	3853.42	-1709.51	-146.903
39	3163	3344.33	3809	-464.672	-181.328
40	5964	5618.76	3794.62	1824.13	345.242
41	5657	6243.43	3790.75	2452.68	-586.428
42	6415	5488	3791.42	1696.58	927.005
43	6208	5486.16	3802.04	1684.12	721.838
44	4500	4933.63	3804.58	1129.05	-433.633
45	2939	3392.27	3795.58	-403.313	-453.27
46	2702	2572.52	3799.33	-1226.81	129.476
47	2090	2333.29	3814.79	-1481.5	-243.287
48	1504	1605.19	3786.75	-2181.56	-101.187
49	2549	2408.48	3727.67	-1319.18	140.517
50	1931	1998.7	3708.21	-1709.51	-67.6951
51	3013	3272.62	3737.29	-464.672	-259.62
52	6204	5575.42	3751.29	1824.13	628.576
53	5788	6190.93	3738.25	2452.68	-402.928
54	5611	5430.87	3734.29	1696.58	180.13
55	5594	5408.41	3724.29	1684.12	185.588
56	4647	4846.17	3717.13	1129.05	-199.174
57	3490	3319.35	3722.67	-403.313	170.647
58	2487	2462.07	3688.88	-1226.81	24.934
59	1992	2162.7	3644.21	-1481.5	-170.703
60	1507	1462.77	3644.33	-2181.56	44.2299
61	2306	2303.65	3622.83	-1319.18	2.35069
62	2002	1884.15	3593.67	-1709.51	117.847
63	3075	3134.37	3599.04	-464.672	-59.3701
64	5331	5415.51	3591.38	1824.13	-84.5076
65	5589	6036.72	3584.04	2452.68	-447.72
66	5813	5288.62	3592.04	1696.58	524.38
67	4876	5278.45	3594.33	1684.12	-402.453
68	4665	4722.26	3593.21	1129.05	-57.2576
69	3601	3195.9	3599.21	-403.313	405.105
70	2192	2364.98	3591.79	-1226.81	-172.983
71	2111	2091.95	3573.46	-1481.5	19.0465
72	1580	1385.56	3567.13	-2181.56	194.438
73	2288	2249.73	3568.92	-1319.18	38.2674
74	1993	1863.82	3573.33	-1709.51	129.18
75	3228	3109.75	3574.42	-464.672	118.255
76	5000	5400.05	3575.92	1824.13	-400.049
77	5480	6044.68	3592	2452.68	-564.678
78	5770	5304	3607.42	1696.58	466.005
79	4962	5289.62	3605.5	1684.12	-327.62
80	4685	4728.59	3599.54	1129.05	-43.591
81	3607	3189.81	3593.12	-403.313	417.188
82	2222	2355.4	3582.21	-1226.81	-133.399
83	2467	2124.79	3606.29	-1481.5	342.213
84	1594	1408.31	3589.87	-2181.56	185.688
85	2228	2222.77	3541.96	-1319.18	5.22569
86	1910	1837.11	3546.62	-1709.51	72.8882
87	3157	3061.95	3526.62	-464.672	95.0465
88	4809	5336.59	3512.46	1824.13	-527.591
89	6249	5964.72	3512.04	2452.68	284.28
90	4607	5188.12	3491.54	1696.58	-581.12
91	4975	5158.95	3474.83	1684.12	-183.953
92	4784	4596.34	3467.29	1129.05	187.659
93	3028	3057.48	3460.79	-403.313	-29.4785
94	2461	2219.57	3446.38	-1226.81	241.434
95	2218	1962.2	3443.71	-1481.5	255.797
96	1351	1262.19	3443.75	-2181.56	88.8132
97	2070	2135.36	3454.54	-1319.18	-65.3576
98	1887	1744.28	3453.79	-1709.51	142.722
99	3024	2957.2	3421.88	-464.672	66.7965
100	4596	5222.97	3398.83	1824.13	-626.966
101	6398	5840.01	3387.33	2452.68	557.988
102	4459	5073.66	3377.08	1696.58	-614.662
103	5382	5068.58	3384.46	1684.12	313.422
104	4359	4523.26	3394.21	1129.05	-164.258
105	2687	2978.27	3381.58	-403.313	-291.27
106	2249	2190.32	3417.12	-1226.81	58.684
107	2154	1951.54	3433.04	-1481.5	202.463
108	1169	1226.23	3407.79	-2181.56	-57.2285
109	2429	2104.48	3423.67	-1319.18	324.517
110	1762	1730.07	3439.58	-1709.51	31.9299
111	2846	2984.25	3448.92	-464.672	-138.245
112	5627	5296.63	3472.5	1824.13	330.367
113	5749	5937.3	3484.62	2452.68	-188.303
114	4502	5191.5	3494.92	1696.58	-689.495
115	5720	5190.37	3506.25	1684.12	529.63
116	4403	4631.51	3502.46	1129.05	-228.508
117	2867	3101.23	3504.54	-403.313	-234.228
118	2635	2306.61	3533.42	-1226.81	328.392
119	2059	2078.29	3559.79	-1481.5	-19.2868
120	1511	1451.52	3633.08	-2181.56	59.4799
121	2359	2362.32	3681.5	-1319.18	-3.31597
122	1741	1965.4	3674.92	-1709.51	-224.403
123	2917	3262.58	3727.25	-464.672	-345.578
124	6249	5578.67	3754.54	1824.13	670.326
125	5760	6203.64	3750.96	2452.68	-443.637
126	6250	5454	3757.42	1696.58	796.005
127	5134	NA	NA	1684.12	NA
128	4831	NA	NA	1129.05	NA
129	3695	NA	NA	-403.313	NA
130	2462	NA	NA	-1226.81	NA
131	2146	NA	NA	-1481.5	NA
132	1579	NA	NA	-2181.56	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 1894 & NA & NA & -1319.18 & NA \tabularnewline
2 & 1757 & NA & NA & -1709.51 & NA \tabularnewline
3 & 3582 & NA & NA & -464.672 & NA \tabularnewline
4 & 5321 & NA & NA & 1824.13 & NA \tabularnewline
5 & 5561 & NA & NA & 2452.68 & NA \tabularnewline
6 & 5907 & NA & NA & 1696.58 & NA \tabularnewline
7 & 4944 & 5205.37 & 3521.25 & 1684.12 & -261.37 \tabularnewline
8 & 4966 & 4659.8 & 3530.75 & 1129.05 & 306.201 \tabularnewline
9 & 3258 & 3127.52 & 3530.83 & -403.313 & 130.48 \tabularnewline
10 & 1964 & 2317.23 & 3544.04 & -1226.81 & -353.233 \tabularnewline
11 & 1743 & 2098.95 & 3580.46 & -1481.5 & -355.953 \tabularnewline
12 & 1262 & 1379.31 & 3560.88 & -2181.56 & -117.312 \tabularnewline
13 & 2086 & 2202.23 & 3521.42 & -1319.18 & -116.233 \tabularnewline
14 & 1793 & 1821.03 & 3530.54 & -1709.51 & -28.0285 \tabularnewline
15 & 3548 & 3071.41 & 3536.08 & -464.672 & 476.588 \tabularnewline
16 & 5672 & 5367.51 & 3543.37 & 1824.13 & 304.492 \tabularnewline
17 & 6084 & 6025.64 & 3572.96 & 2452.68 & 58.3632 \tabularnewline
18 & 4914 & 5297.66 & 3601.08 & 1696.58 & -383.662 \tabularnewline
19 & 4990 & 5297.66 & 3613.54 & 1684.12 & -307.662 \tabularnewline
20 & 5139 & 4757.22 & 3628.17 & 1129.05 & 381.784 \tabularnewline
21 & 3218 & 3233.81 & 3637.12 & -403.313 & -15.8118 \tabularnewline
22 & 2179 & 2380.65 & 3607.46 & -1226.81 & -201.649 \tabularnewline
23 & 2238 & 2176.75 & 3658.25 & -1481.5 & 61.2549 \tabularnewline
24 & 1442 & 1555.02 & 3736.58 & -2181.56 & -113.02 \tabularnewline
25 & 2205 & 2426.02 & 3745.21 & -1319.18 & -221.024 \tabularnewline
26 & 2025 & 2048.36 & 3757.87 & -1709.51 & -23.3618 \tabularnewline
27 & 3531 & 3299.37 & 3764.04 & -464.672 & 231.63 \tabularnewline
28 & 4977 & 5612.72 & 3788.58 & 1824.13 & -635.716 \tabularnewline
29 & 7998 & 6260.76 & 3808.08 & 2452.68 & 1737.24 \tabularnewline
30 & 4880 & 5500.41 & 3803.83 & 1696.58 & -620.412 \tabularnewline
31 & 5231 & 5494.25 & 3810.12 & 1684.12 & -263.245 \tabularnewline
32 & 5202 & 4947.05 & 3818 & 1129.05 & 254.951 \tabularnewline
33 & 3303 & 3398.19 & 3801.5 & -403.313 & -95.1868 \tabularnewline
34 & 2683 & 2600.48 & 3827.29 & -1226.81 & 82.5174 \tabularnewline
35 & 2202 & 2289.37 & 3770.87 & -1481.5 & -87.3701 \tabularnewline
36 & 1376 & 1555.73 & 3737.29 & -2181.56 & -179.728 \tabularnewline
37 & 2422 & 2522.77 & 3841.96 & -1319.18 & -100.774 \tabularnewline
38 & 1997 & 2143.9 & 3853.42 & -1709.51 & -146.903 \tabularnewline
39 & 3163 & 3344.33 & 3809 & -464.672 & -181.328 \tabularnewline
40 & 5964 & 5618.76 & 3794.62 & 1824.13 & 345.242 \tabularnewline
41 & 5657 & 6243.43 & 3790.75 & 2452.68 & -586.428 \tabularnewline
42 & 6415 & 5488 & 3791.42 & 1696.58 & 927.005 \tabularnewline
43 & 6208 & 5486.16 & 3802.04 & 1684.12 & 721.838 \tabularnewline
44 & 4500 & 4933.63 & 3804.58 & 1129.05 & -433.633 \tabularnewline
45 & 2939 & 3392.27 & 3795.58 & -403.313 & -453.27 \tabularnewline
46 & 2702 & 2572.52 & 3799.33 & -1226.81 & 129.476 \tabularnewline
47 & 2090 & 2333.29 & 3814.79 & -1481.5 & -243.287 \tabularnewline
48 & 1504 & 1605.19 & 3786.75 & -2181.56 & -101.187 \tabularnewline
49 & 2549 & 2408.48 & 3727.67 & -1319.18 & 140.517 \tabularnewline
50 & 1931 & 1998.7 & 3708.21 & -1709.51 & -67.6951 \tabularnewline
51 & 3013 & 3272.62 & 3737.29 & -464.672 & -259.62 \tabularnewline
52 & 6204 & 5575.42 & 3751.29 & 1824.13 & 628.576 \tabularnewline
53 & 5788 & 6190.93 & 3738.25 & 2452.68 & -402.928 \tabularnewline
54 & 5611 & 5430.87 & 3734.29 & 1696.58 & 180.13 \tabularnewline
55 & 5594 & 5408.41 & 3724.29 & 1684.12 & 185.588 \tabularnewline
56 & 4647 & 4846.17 & 3717.13 & 1129.05 & -199.174 \tabularnewline
57 & 3490 & 3319.35 & 3722.67 & -403.313 & 170.647 \tabularnewline
58 & 2487 & 2462.07 & 3688.88 & -1226.81 & 24.934 \tabularnewline
59 & 1992 & 2162.7 & 3644.21 & -1481.5 & -170.703 \tabularnewline
60 & 1507 & 1462.77 & 3644.33 & -2181.56 & 44.2299 \tabularnewline
61 & 2306 & 2303.65 & 3622.83 & -1319.18 & 2.35069 \tabularnewline
62 & 2002 & 1884.15 & 3593.67 & -1709.51 & 117.847 \tabularnewline
63 & 3075 & 3134.37 & 3599.04 & -464.672 & -59.3701 \tabularnewline
64 & 5331 & 5415.51 & 3591.38 & 1824.13 & -84.5076 \tabularnewline
65 & 5589 & 6036.72 & 3584.04 & 2452.68 & -447.72 \tabularnewline
66 & 5813 & 5288.62 & 3592.04 & 1696.58 & 524.38 \tabularnewline
67 & 4876 & 5278.45 & 3594.33 & 1684.12 & -402.453 \tabularnewline
68 & 4665 & 4722.26 & 3593.21 & 1129.05 & -57.2576 \tabularnewline
69 & 3601 & 3195.9 & 3599.21 & -403.313 & 405.105 \tabularnewline
70 & 2192 & 2364.98 & 3591.79 & -1226.81 & -172.983 \tabularnewline
71 & 2111 & 2091.95 & 3573.46 & -1481.5 & 19.0465 \tabularnewline
72 & 1580 & 1385.56 & 3567.13 & -2181.56 & 194.438 \tabularnewline
73 & 2288 & 2249.73 & 3568.92 & -1319.18 & 38.2674 \tabularnewline
74 & 1993 & 1863.82 & 3573.33 & -1709.51 & 129.18 \tabularnewline
75 & 3228 & 3109.75 & 3574.42 & -464.672 & 118.255 \tabularnewline
76 & 5000 & 5400.05 & 3575.92 & 1824.13 & -400.049 \tabularnewline
77 & 5480 & 6044.68 & 3592 & 2452.68 & -564.678 \tabularnewline
78 & 5770 & 5304 & 3607.42 & 1696.58 & 466.005 \tabularnewline
79 & 4962 & 5289.62 & 3605.5 & 1684.12 & -327.62 \tabularnewline
80 & 4685 & 4728.59 & 3599.54 & 1129.05 & -43.591 \tabularnewline
81 & 3607 & 3189.81 & 3593.12 & -403.313 & 417.188 \tabularnewline
82 & 2222 & 2355.4 & 3582.21 & -1226.81 & -133.399 \tabularnewline
83 & 2467 & 2124.79 & 3606.29 & -1481.5 & 342.213 \tabularnewline
84 & 1594 & 1408.31 & 3589.87 & -2181.56 & 185.688 \tabularnewline
85 & 2228 & 2222.77 & 3541.96 & -1319.18 & 5.22569 \tabularnewline
86 & 1910 & 1837.11 & 3546.62 & -1709.51 & 72.8882 \tabularnewline
87 & 3157 & 3061.95 & 3526.62 & -464.672 & 95.0465 \tabularnewline
88 & 4809 & 5336.59 & 3512.46 & 1824.13 & -527.591 \tabularnewline
89 & 6249 & 5964.72 & 3512.04 & 2452.68 & 284.28 \tabularnewline
90 & 4607 & 5188.12 & 3491.54 & 1696.58 & -581.12 \tabularnewline
91 & 4975 & 5158.95 & 3474.83 & 1684.12 & -183.953 \tabularnewline
92 & 4784 & 4596.34 & 3467.29 & 1129.05 & 187.659 \tabularnewline
93 & 3028 & 3057.48 & 3460.79 & -403.313 & -29.4785 \tabularnewline
94 & 2461 & 2219.57 & 3446.38 & -1226.81 & 241.434 \tabularnewline
95 & 2218 & 1962.2 & 3443.71 & -1481.5 & 255.797 \tabularnewline
96 & 1351 & 1262.19 & 3443.75 & -2181.56 & 88.8132 \tabularnewline
97 & 2070 & 2135.36 & 3454.54 & -1319.18 & -65.3576 \tabularnewline
98 & 1887 & 1744.28 & 3453.79 & -1709.51 & 142.722 \tabularnewline
99 & 3024 & 2957.2 & 3421.88 & -464.672 & 66.7965 \tabularnewline
100 & 4596 & 5222.97 & 3398.83 & 1824.13 & -626.966 \tabularnewline
101 & 6398 & 5840.01 & 3387.33 & 2452.68 & 557.988 \tabularnewline
102 & 4459 & 5073.66 & 3377.08 & 1696.58 & -614.662 \tabularnewline
103 & 5382 & 5068.58 & 3384.46 & 1684.12 & 313.422 \tabularnewline
104 & 4359 & 4523.26 & 3394.21 & 1129.05 & -164.258 \tabularnewline
105 & 2687 & 2978.27 & 3381.58 & -403.313 & -291.27 \tabularnewline
106 & 2249 & 2190.32 & 3417.12 & -1226.81 & 58.684 \tabularnewline
107 & 2154 & 1951.54 & 3433.04 & -1481.5 & 202.463 \tabularnewline
108 & 1169 & 1226.23 & 3407.79 & -2181.56 & -57.2285 \tabularnewline
109 & 2429 & 2104.48 & 3423.67 & -1319.18 & 324.517 \tabularnewline
110 & 1762 & 1730.07 & 3439.58 & -1709.51 & 31.9299 \tabularnewline
111 & 2846 & 2984.25 & 3448.92 & -464.672 & -138.245 \tabularnewline
112 & 5627 & 5296.63 & 3472.5 & 1824.13 & 330.367 \tabularnewline
113 & 5749 & 5937.3 & 3484.62 & 2452.68 & -188.303 \tabularnewline
114 & 4502 & 5191.5 & 3494.92 & 1696.58 & -689.495 \tabularnewline
115 & 5720 & 5190.37 & 3506.25 & 1684.12 & 529.63 \tabularnewline
116 & 4403 & 4631.51 & 3502.46 & 1129.05 & -228.508 \tabularnewline
117 & 2867 & 3101.23 & 3504.54 & -403.313 & -234.228 \tabularnewline
118 & 2635 & 2306.61 & 3533.42 & -1226.81 & 328.392 \tabularnewline
119 & 2059 & 2078.29 & 3559.79 & -1481.5 & -19.2868 \tabularnewline
120 & 1511 & 1451.52 & 3633.08 & -2181.56 & 59.4799 \tabularnewline
121 & 2359 & 2362.32 & 3681.5 & -1319.18 & -3.31597 \tabularnewline
122 & 1741 & 1965.4 & 3674.92 & -1709.51 & -224.403 \tabularnewline
123 & 2917 & 3262.58 & 3727.25 & -464.672 & -345.578 \tabularnewline
124 & 6249 & 5578.67 & 3754.54 & 1824.13 & 670.326 \tabularnewline
125 & 5760 & 6203.64 & 3750.96 & 2452.68 & -443.637 \tabularnewline
126 & 6250 & 5454 & 3757.42 & 1696.58 & 796.005 \tabularnewline
127 & 5134 & NA & NA & 1684.12 & NA \tabularnewline
128 & 4831 & NA & NA & 1129.05 & NA \tabularnewline
129 & 3695 & NA & NA & -403.313 & NA \tabularnewline
130 & 2462 & NA & NA & -1226.81 & NA \tabularnewline
131 & 2146 & NA & NA & -1481.5 & NA \tabularnewline
132 & 1579 & NA & NA & -2181.56 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265394&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]1894[/C][C]NA[/C][C]NA[/C][C]-1319.18[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]1757[/C][C]NA[/C][C]NA[/C][C]-1709.51[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]3582[/C][C]NA[/C][C]NA[/C][C]-464.672[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]5321[/C][C]NA[/C][C]NA[/C][C]1824.13[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]5561[/C][C]NA[/C][C]NA[/C][C]2452.68[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]5907[/C][C]NA[/C][C]NA[/C][C]1696.58[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]4944[/C][C]5205.37[/C][C]3521.25[/C][C]1684.12[/C][C]-261.37[/C][/ROW]
[ROW][C]8[/C][C]4966[/C][C]4659.8[/C][C]3530.75[/C][C]1129.05[/C][C]306.201[/C][/ROW]
[ROW][C]9[/C][C]3258[/C][C]3127.52[/C][C]3530.83[/C][C]-403.313[/C][C]130.48[/C][/ROW]
[ROW][C]10[/C][C]1964[/C][C]2317.23[/C][C]3544.04[/C][C]-1226.81[/C][C]-353.233[/C][/ROW]
[ROW][C]11[/C][C]1743[/C][C]2098.95[/C][C]3580.46[/C][C]-1481.5[/C][C]-355.953[/C][/ROW]
[ROW][C]12[/C][C]1262[/C][C]1379.31[/C][C]3560.88[/C][C]-2181.56[/C][C]-117.312[/C][/ROW]
[ROW][C]13[/C][C]2086[/C][C]2202.23[/C][C]3521.42[/C][C]-1319.18[/C][C]-116.233[/C][/ROW]
[ROW][C]14[/C][C]1793[/C][C]1821.03[/C][C]3530.54[/C][C]-1709.51[/C][C]-28.0285[/C][/ROW]
[ROW][C]15[/C][C]3548[/C][C]3071.41[/C][C]3536.08[/C][C]-464.672[/C][C]476.588[/C][/ROW]
[ROW][C]16[/C][C]5672[/C][C]5367.51[/C][C]3543.37[/C][C]1824.13[/C][C]304.492[/C][/ROW]
[ROW][C]17[/C][C]6084[/C][C]6025.64[/C][C]3572.96[/C][C]2452.68[/C][C]58.3632[/C][/ROW]
[ROW][C]18[/C][C]4914[/C][C]5297.66[/C][C]3601.08[/C][C]1696.58[/C][C]-383.662[/C][/ROW]
[ROW][C]19[/C][C]4990[/C][C]5297.66[/C][C]3613.54[/C][C]1684.12[/C][C]-307.662[/C][/ROW]
[ROW][C]20[/C][C]5139[/C][C]4757.22[/C][C]3628.17[/C][C]1129.05[/C][C]381.784[/C][/ROW]
[ROW][C]21[/C][C]3218[/C][C]3233.81[/C][C]3637.12[/C][C]-403.313[/C][C]-15.8118[/C][/ROW]
[ROW][C]22[/C][C]2179[/C][C]2380.65[/C][C]3607.46[/C][C]-1226.81[/C][C]-201.649[/C][/ROW]
[ROW][C]23[/C][C]2238[/C][C]2176.75[/C][C]3658.25[/C][C]-1481.5[/C][C]61.2549[/C][/ROW]
[ROW][C]24[/C][C]1442[/C][C]1555.02[/C][C]3736.58[/C][C]-2181.56[/C][C]-113.02[/C][/ROW]
[ROW][C]25[/C][C]2205[/C][C]2426.02[/C][C]3745.21[/C][C]-1319.18[/C][C]-221.024[/C][/ROW]
[ROW][C]26[/C][C]2025[/C][C]2048.36[/C][C]3757.87[/C][C]-1709.51[/C][C]-23.3618[/C][/ROW]
[ROW][C]27[/C][C]3531[/C][C]3299.37[/C][C]3764.04[/C][C]-464.672[/C][C]231.63[/C][/ROW]
[ROW][C]28[/C][C]4977[/C][C]5612.72[/C][C]3788.58[/C][C]1824.13[/C][C]-635.716[/C][/ROW]
[ROW][C]29[/C][C]7998[/C][C]6260.76[/C][C]3808.08[/C][C]2452.68[/C][C]1737.24[/C][/ROW]
[ROW][C]30[/C][C]4880[/C][C]5500.41[/C][C]3803.83[/C][C]1696.58[/C][C]-620.412[/C][/ROW]
[ROW][C]31[/C][C]5231[/C][C]5494.25[/C][C]3810.12[/C][C]1684.12[/C][C]-263.245[/C][/ROW]
[ROW][C]32[/C][C]5202[/C][C]4947.05[/C][C]3818[/C][C]1129.05[/C][C]254.951[/C][/ROW]
[ROW][C]33[/C][C]3303[/C][C]3398.19[/C][C]3801.5[/C][C]-403.313[/C][C]-95.1868[/C][/ROW]
[ROW][C]34[/C][C]2683[/C][C]2600.48[/C][C]3827.29[/C][C]-1226.81[/C][C]82.5174[/C][/ROW]
[ROW][C]35[/C][C]2202[/C][C]2289.37[/C][C]3770.87[/C][C]-1481.5[/C][C]-87.3701[/C][/ROW]
[ROW][C]36[/C][C]1376[/C][C]1555.73[/C][C]3737.29[/C][C]-2181.56[/C][C]-179.728[/C][/ROW]
[ROW][C]37[/C][C]2422[/C][C]2522.77[/C][C]3841.96[/C][C]-1319.18[/C][C]-100.774[/C][/ROW]
[ROW][C]38[/C][C]1997[/C][C]2143.9[/C][C]3853.42[/C][C]-1709.51[/C][C]-146.903[/C][/ROW]
[ROW][C]39[/C][C]3163[/C][C]3344.33[/C][C]3809[/C][C]-464.672[/C][C]-181.328[/C][/ROW]
[ROW][C]40[/C][C]5964[/C][C]5618.76[/C][C]3794.62[/C][C]1824.13[/C][C]345.242[/C][/ROW]
[ROW][C]41[/C][C]5657[/C][C]6243.43[/C][C]3790.75[/C][C]2452.68[/C][C]-586.428[/C][/ROW]
[ROW][C]42[/C][C]6415[/C][C]5488[/C][C]3791.42[/C][C]1696.58[/C][C]927.005[/C][/ROW]
[ROW][C]43[/C][C]6208[/C][C]5486.16[/C][C]3802.04[/C][C]1684.12[/C][C]721.838[/C][/ROW]
[ROW][C]44[/C][C]4500[/C][C]4933.63[/C][C]3804.58[/C][C]1129.05[/C][C]-433.633[/C][/ROW]
[ROW][C]45[/C][C]2939[/C][C]3392.27[/C][C]3795.58[/C][C]-403.313[/C][C]-453.27[/C][/ROW]
[ROW][C]46[/C][C]2702[/C][C]2572.52[/C][C]3799.33[/C][C]-1226.81[/C][C]129.476[/C][/ROW]
[ROW][C]47[/C][C]2090[/C][C]2333.29[/C][C]3814.79[/C][C]-1481.5[/C][C]-243.287[/C][/ROW]
[ROW][C]48[/C][C]1504[/C][C]1605.19[/C][C]3786.75[/C][C]-2181.56[/C][C]-101.187[/C][/ROW]
[ROW][C]49[/C][C]2549[/C][C]2408.48[/C][C]3727.67[/C][C]-1319.18[/C][C]140.517[/C][/ROW]
[ROW][C]50[/C][C]1931[/C][C]1998.7[/C][C]3708.21[/C][C]-1709.51[/C][C]-67.6951[/C][/ROW]
[ROW][C]51[/C][C]3013[/C][C]3272.62[/C][C]3737.29[/C][C]-464.672[/C][C]-259.62[/C][/ROW]
[ROW][C]52[/C][C]6204[/C][C]5575.42[/C][C]3751.29[/C][C]1824.13[/C][C]628.576[/C][/ROW]
[ROW][C]53[/C][C]5788[/C][C]6190.93[/C][C]3738.25[/C][C]2452.68[/C][C]-402.928[/C][/ROW]
[ROW][C]54[/C][C]5611[/C][C]5430.87[/C][C]3734.29[/C][C]1696.58[/C][C]180.13[/C][/ROW]
[ROW][C]55[/C][C]5594[/C][C]5408.41[/C][C]3724.29[/C][C]1684.12[/C][C]185.588[/C][/ROW]
[ROW][C]56[/C][C]4647[/C][C]4846.17[/C][C]3717.13[/C][C]1129.05[/C][C]-199.174[/C][/ROW]
[ROW][C]57[/C][C]3490[/C][C]3319.35[/C][C]3722.67[/C][C]-403.313[/C][C]170.647[/C][/ROW]
[ROW][C]58[/C][C]2487[/C][C]2462.07[/C][C]3688.88[/C][C]-1226.81[/C][C]24.934[/C][/ROW]
[ROW][C]59[/C][C]1992[/C][C]2162.7[/C][C]3644.21[/C][C]-1481.5[/C][C]-170.703[/C][/ROW]
[ROW][C]60[/C][C]1507[/C][C]1462.77[/C][C]3644.33[/C][C]-2181.56[/C][C]44.2299[/C][/ROW]
[ROW][C]61[/C][C]2306[/C][C]2303.65[/C][C]3622.83[/C][C]-1319.18[/C][C]2.35069[/C][/ROW]
[ROW][C]62[/C][C]2002[/C][C]1884.15[/C][C]3593.67[/C][C]-1709.51[/C][C]117.847[/C][/ROW]
[ROW][C]63[/C][C]3075[/C][C]3134.37[/C][C]3599.04[/C][C]-464.672[/C][C]-59.3701[/C][/ROW]
[ROW][C]64[/C][C]5331[/C][C]5415.51[/C][C]3591.38[/C][C]1824.13[/C][C]-84.5076[/C][/ROW]
[ROW][C]65[/C][C]5589[/C][C]6036.72[/C][C]3584.04[/C][C]2452.68[/C][C]-447.72[/C][/ROW]
[ROW][C]66[/C][C]5813[/C][C]5288.62[/C][C]3592.04[/C][C]1696.58[/C][C]524.38[/C][/ROW]
[ROW][C]67[/C][C]4876[/C][C]5278.45[/C][C]3594.33[/C][C]1684.12[/C][C]-402.453[/C][/ROW]
[ROW][C]68[/C][C]4665[/C][C]4722.26[/C][C]3593.21[/C][C]1129.05[/C][C]-57.2576[/C][/ROW]
[ROW][C]69[/C][C]3601[/C][C]3195.9[/C][C]3599.21[/C][C]-403.313[/C][C]405.105[/C][/ROW]
[ROW][C]70[/C][C]2192[/C][C]2364.98[/C][C]3591.79[/C][C]-1226.81[/C][C]-172.983[/C][/ROW]
[ROW][C]71[/C][C]2111[/C][C]2091.95[/C][C]3573.46[/C][C]-1481.5[/C][C]19.0465[/C][/ROW]
[ROW][C]72[/C][C]1580[/C][C]1385.56[/C][C]3567.13[/C][C]-2181.56[/C][C]194.438[/C][/ROW]
[ROW][C]73[/C][C]2288[/C][C]2249.73[/C][C]3568.92[/C][C]-1319.18[/C][C]38.2674[/C][/ROW]
[ROW][C]74[/C][C]1993[/C][C]1863.82[/C][C]3573.33[/C][C]-1709.51[/C][C]129.18[/C][/ROW]
[ROW][C]75[/C][C]3228[/C][C]3109.75[/C][C]3574.42[/C][C]-464.672[/C][C]118.255[/C][/ROW]
[ROW][C]76[/C][C]5000[/C][C]5400.05[/C][C]3575.92[/C][C]1824.13[/C][C]-400.049[/C][/ROW]
[ROW][C]77[/C][C]5480[/C][C]6044.68[/C][C]3592[/C][C]2452.68[/C][C]-564.678[/C][/ROW]
[ROW][C]78[/C][C]5770[/C][C]5304[/C][C]3607.42[/C][C]1696.58[/C][C]466.005[/C][/ROW]
[ROW][C]79[/C][C]4962[/C][C]5289.62[/C][C]3605.5[/C][C]1684.12[/C][C]-327.62[/C][/ROW]
[ROW][C]80[/C][C]4685[/C][C]4728.59[/C][C]3599.54[/C][C]1129.05[/C][C]-43.591[/C][/ROW]
[ROW][C]81[/C][C]3607[/C][C]3189.81[/C][C]3593.12[/C][C]-403.313[/C][C]417.188[/C][/ROW]
[ROW][C]82[/C][C]2222[/C][C]2355.4[/C][C]3582.21[/C][C]-1226.81[/C][C]-133.399[/C][/ROW]
[ROW][C]83[/C][C]2467[/C][C]2124.79[/C][C]3606.29[/C][C]-1481.5[/C][C]342.213[/C][/ROW]
[ROW][C]84[/C][C]1594[/C][C]1408.31[/C][C]3589.87[/C][C]-2181.56[/C][C]185.688[/C][/ROW]
[ROW][C]85[/C][C]2228[/C][C]2222.77[/C][C]3541.96[/C][C]-1319.18[/C][C]5.22569[/C][/ROW]
[ROW][C]86[/C][C]1910[/C][C]1837.11[/C][C]3546.62[/C][C]-1709.51[/C][C]72.8882[/C][/ROW]
[ROW][C]87[/C][C]3157[/C][C]3061.95[/C][C]3526.62[/C][C]-464.672[/C][C]95.0465[/C][/ROW]
[ROW][C]88[/C][C]4809[/C][C]5336.59[/C][C]3512.46[/C][C]1824.13[/C][C]-527.591[/C][/ROW]
[ROW][C]89[/C][C]6249[/C][C]5964.72[/C][C]3512.04[/C][C]2452.68[/C][C]284.28[/C][/ROW]
[ROW][C]90[/C][C]4607[/C][C]5188.12[/C][C]3491.54[/C][C]1696.58[/C][C]-581.12[/C][/ROW]
[ROW][C]91[/C][C]4975[/C][C]5158.95[/C][C]3474.83[/C][C]1684.12[/C][C]-183.953[/C][/ROW]
[ROW][C]92[/C][C]4784[/C][C]4596.34[/C][C]3467.29[/C][C]1129.05[/C][C]187.659[/C][/ROW]
[ROW][C]93[/C][C]3028[/C][C]3057.48[/C][C]3460.79[/C][C]-403.313[/C][C]-29.4785[/C][/ROW]
[ROW][C]94[/C][C]2461[/C][C]2219.57[/C][C]3446.38[/C][C]-1226.81[/C][C]241.434[/C][/ROW]
[ROW][C]95[/C][C]2218[/C][C]1962.2[/C][C]3443.71[/C][C]-1481.5[/C][C]255.797[/C][/ROW]
[ROW][C]96[/C][C]1351[/C][C]1262.19[/C][C]3443.75[/C][C]-2181.56[/C][C]88.8132[/C][/ROW]
[ROW][C]97[/C][C]2070[/C][C]2135.36[/C][C]3454.54[/C][C]-1319.18[/C][C]-65.3576[/C][/ROW]
[ROW][C]98[/C][C]1887[/C][C]1744.28[/C][C]3453.79[/C][C]-1709.51[/C][C]142.722[/C][/ROW]
[ROW][C]99[/C][C]3024[/C][C]2957.2[/C][C]3421.88[/C][C]-464.672[/C][C]66.7965[/C][/ROW]
[ROW][C]100[/C][C]4596[/C][C]5222.97[/C][C]3398.83[/C][C]1824.13[/C][C]-626.966[/C][/ROW]
[ROW][C]101[/C][C]6398[/C][C]5840.01[/C][C]3387.33[/C][C]2452.68[/C][C]557.988[/C][/ROW]
[ROW][C]102[/C][C]4459[/C][C]5073.66[/C][C]3377.08[/C][C]1696.58[/C][C]-614.662[/C][/ROW]
[ROW][C]103[/C][C]5382[/C][C]5068.58[/C][C]3384.46[/C][C]1684.12[/C][C]313.422[/C][/ROW]
[ROW][C]104[/C][C]4359[/C][C]4523.26[/C][C]3394.21[/C][C]1129.05[/C][C]-164.258[/C][/ROW]
[ROW][C]105[/C][C]2687[/C][C]2978.27[/C][C]3381.58[/C][C]-403.313[/C][C]-291.27[/C][/ROW]
[ROW][C]106[/C][C]2249[/C][C]2190.32[/C][C]3417.12[/C][C]-1226.81[/C][C]58.684[/C][/ROW]
[ROW][C]107[/C][C]2154[/C][C]1951.54[/C][C]3433.04[/C][C]-1481.5[/C][C]202.463[/C][/ROW]
[ROW][C]108[/C][C]1169[/C][C]1226.23[/C][C]3407.79[/C][C]-2181.56[/C][C]-57.2285[/C][/ROW]
[ROW][C]109[/C][C]2429[/C][C]2104.48[/C][C]3423.67[/C][C]-1319.18[/C][C]324.517[/C][/ROW]
[ROW][C]110[/C][C]1762[/C][C]1730.07[/C][C]3439.58[/C][C]-1709.51[/C][C]31.9299[/C][/ROW]
[ROW][C]111[/C][C]2846[/C][C]2984.25[/C][C]3448.92[/C][C]-464.672[/C][C]-138.245[/C][/ROW]
[ROW][C]112[/C][C]5627[/C][C]5296.63[/C][C]3472.5[/C][C]1824.13[/C][C]330.367[/C][/ROW]
[ROW][C]113[/C][C]5749[/C][C]5937.3[/C][C]3484.62[/C][C]2452.68[/C][C]-188.303[/C][/ROW]
[ROW][C]114[/C][C]4502[/C][C]5191.5[/C][C]3494.92[/C][C]1696.58[/C][C]-689.495[/C][/ROW]
[ROW][C]115[/C][C]5720[/C][C]5190.37[/C][C]3506.25[/C][C]1684.12[/C][C]529.63[/C][/ROW]
[ROW][C]116[/C][C]4403[/C][C]4631.51[/C][C]3502.46[/C][C]1129.05[/C][C]-228.508[/C][/ROW]
[ROW][C]117[/C][C]2867[/C][C]3101.23[/C][C]3504.54[/C][C]-403.313[/C][C]-234.228[/C][/ROW]
[ROW][C]118[/C][C]2635[/C][C]2306.61[/C][C]3533.42[/C][C]-1226.81[/C][C]328.392[/C][/ROW]
[ROW][C]119[/C][C]2059[/C][C]2078.29[/C][C]3559.79[/C][C]-1481.5[/C][C]-19.2868[/C][/ROW]
[ROW][C]120[/C][C]1511[/C][C]1451.52[/C][C]3633.08[/C][C]-2181.56[/C][C]59.4799[/C][/ROW]
[ROW][C]121[/C][C]2359[/C][C]2362.32[/C][C]3681.5[/C][C]-1319.18[/C][C]-3.31597[/C][/ROW]
[ROW][C]122[/C][C]1741[/C][C]1965.4[/C][C]3674.92[/C][C]-1709.51[/C][C]-224.403[/C][/ROW]
[ROW][C]123[/C][C]2917[/C][C]3262.58[/C][C]3727.25[/C][C]-464.672[/C][C]-345.578[/C][/ROW]
[ROW][C]124[/C][C]6249[/C][C]5578.67[/C][C]3754.54[/C][C]1824.13[/C][C]670.326[/C][/ROW]
[ROW][C]125[/C][C]5760[/C][C]6203.64[/C][C]3750.96[/C][C]2452.68[/C][C]-443.637[/C][/ROW]
[ROW][C]126[/C][C]6250[/C][C]5454[/C][C]3757.42[/C][C]1696.58[/C][C]796.005[/C][/ROW]
[ROW][C]127[/C][C]5134[/C][C]NA[/C][C]NA[/C][C]1684.12[/C][C]NA[/C][/ROW]
[ROW][C]128[/C][C]4831[/C][C]NA[/C][C]NA[/C][C]1129.05[/C][C]NA[/C][/ROW]
[ROW][C]129[/C][C]3695[/C][C]NA[/C][C]NA[/C][C]-403.313[/C][C]NA[/C][/ROW]
[ROW][C]130[/C][C]2462[/C][C]NA[/C][C]NA[/C][C]-1226.81[/C][C]NA[/C][/ROW]
[ROW][C]131[/C][C]2146[/C][C]NA[/C][C]NA[/C][C]-1481.5[/C][C]NA[/C][/ROW]
[ROW][C]132[/C][C]1579[/C][C]NA[/C][C]NA[/C][C]-2181.56[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265394&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265394&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	1894	NA	NA	-1319.18	NA
2	1757	NA	NA	-1709.51	NA
3	3582	NA	NA	-464.672	NA
4	5321	NA	NA	1824.13	NA
5	5561	NA	NA	2452.68	NA
6	5907	NA	NA	1696.58	NA
7	4944	5205.37	3521.25	1684.12	-261.37
8	4966	4659.8	3530.75	1129.05	306.201
9	3258	3127.52	3530.83	-403.313	130.48
10	1964	2317.23	3544.04	-1226.81	-353.233
11	1743	2098.95	3580.46	-1481.5	-355.953
12	1262	1379.31	3560.88	-2181.56	-117.312
13	2086	2202.23	3521.42	-1319.18	-116.233
14	1793	1821.03	3530.54	-1709.51	-28.0285
15	3548	3071.41	3536.08	-464.672	476.588
16	5672	5367.51	3543.37	1824.13	304.492
17	6084	6025.64	3572.96	2452.68	58.3632
18	4914	5297.66	3601.08	1696.58	-383.662
19	4990	5297.66	3613.54	1684.12	-307.662
20	5139	4757.22	3628.17	1129.05	381.784
21	3218	3233.81	3637.12	-403.313	-15.8118
22	2179	2380.65	3607.46	-1226.81	-201.649
23	2238	2176.75	3658.25	-1481.5	61.2549
24	1442	1555.02	3736.58	-2181.56	-113.02
25	2205	2426.02	3745.21	-1319.18	-221.024
26	2025	2048.36	3757.87	-1709.51	-23.3618
27	3531	3299.37	3764.04	-464.672	231.63
28	4977	5612.72	3788.58	1824.13	-635.716
29	7998	6260.76	3808.08	2452.68	1737.24
30	4880	5500.41	3803.83	1696.58	-620.412
31	5231	5494.25	3810.12	1684.12	-263.245
32	5202	4947.05	3818	1129.05	254.951
33	3303	3398.19	3801.5	-403.313	-95.1868
34	2683	2600.48	3827.29	-1226.81	82.5174
35	2202	2289.37	3770.87	-1481.5	-87.3701
36	1376	1555.73	3737.29	-2181.56	-179.728
37	2422	2522.77	3841.96	-1319.18	-100.774
38	1997	2143.9	3853.42	-1709.51	-146.903
39	3163	3344.33	3809	-464.672	-181.328
40	5964	5618.76	3794.62	1824.13	345.242
41	5657	6243.43	3790.75	2452.68	-586.428
42	6415	5488	3791.42	1696.58	927.005
43	6208	5486.16	3802.04	1684.12	721.838
44	4500	4933.63	3804.58	1129.05	-433.633
45	2939	3392.27	3795.58	-403.313	-453.27
46	2702	2572.52	3799.33	-1226.81	129.476
47	2090	2333.29	3814.79	-1481.5	-243.287
48	1504	1605.19	3786.75	-2181.56	-101.187
49	2549	2408.48	3727.67	-1319.18	140.517
50	1931	1998.7	3708.21	-1709.51	-67.6951
51	3013	3272.62	3737.29	-464.672	-259.62
52	6204	5575.42	3751.29	1824.13	628.576
53	5788	6190.93	3738.25	2452.68	-402.928
54	5611	5430.87	3734.29	1696.58	180.13
55	5594	5408.41	3724.29	1684.12	185.588
56	4647	4846.17	3717.13	1129.05	-199.174
57	3490	3319.35	3722.67	-403.313	170.647
58	2487	2462.07	3688.88	-1226.81	24.934
59	1992	2162.7	3644.21	-1481.5	-170.703
60	1507	1462.77	3644.33	-2181.56	44.2299
61	2306	2303.65	3622.83	-1319.18	2.35069
62	2002	1884.15	3593.67	-1709.51	117.847
63	3075	3134.37	3599.04	-464.672	-59.3701
64	5331	5415.51	3591.38	1824.13	-84.5076
65	5589	6036.72	3584.04	2452.68	-447.72
66	5813	5288.62	3592.04	1696.58	524.38
67	4876	5278.45	3594.33	1684.12	-402.453
68	4665	4722.26	3593.21	1129.05	-57.2576
69	3601	3195.9	3599.21	-403.313	405.105
70	2192	2364.98	3591.79	-1226.81	-172.983
71	2111	2091.95	3573.46	-1481.5	19.0465
72	1580	1385.56	3567.13	-2181.56	194.438
73	2288	2249.73	3568.92	-1319.18	38.2674
74	1993	1863.82	3573.33	-1709.51	129.18
75	3228	3109.75	3574.42	-464.672	118.255
76	5000	5400.05	3575.92	1824.13	-400.049
77	5480	6044.68	3592	2452.68	-564.678
78	5770	5304	3607.42	1696.58	466.005
79	4962	5289.62	3605.5	1684.12	-327.62
80	4685	4728.59	3599.54	1129.05	-43.591
81	3607	3189.81	3593.12	-403.313	417.188
82	2222	2355.4	3582.21	-1226.81	-133.399
83	2467	2124.79	3606.29	-1481.5	342.213
84	1594	1408.31	3589.87	-2181.56	185.688
85	2228	2222.77	3541.96	-1319.18	5.22569
86	1910	1837.11	3546.62	-1709.51	72.8882
87	3157	3061.95	3526.62	-464.672	95.0465
88	4809	5336.59	3512.46	1824.13	-527.591
89	6249	5964.72	3512.04	2452.68	284.28
90	4607	5188.12	3491.54	1696.58	-581.12
91	4975	5158.95	3474.83	1684.12	-183.953
92	4784	4596.34	3467.29	1129.05	187.659
93	3028	3057.48	3460.79	-403.313	-29.4785
94	2461	2219.57	3446.38	-1226.81	241.434
95	2218	1962.2	3443.71	-1481.5	255.797
96	1351	1262.19	3443.75	-2181.56	88.8132
97	2070	2135.36	3454.54	-1319.18	-65.3576
98	1887	1744.28	3453.79	-1709.51	142.722
99	3024	2957.2	3421.88	-464.672	66.7965
100	4596	5222.97	3398.83	1824.13	-626.966
101	6398	5840.01	3387.33	2452.68	557.988
102	4459	5073.66	3377.08	1696.58	-614.662
103	5382	5068.58	3384.46	1684.12	313.422
104	4359	4523.26	3394.21	1129.05	-164.258
105	2687	2978.27	3381.58	-403.313	-291.27
106	2249	2190.32	3417.12	-1226.81	58.684
107	2154	1951.54	3433.04	-1481.5	202.463
108	1169	1226.23	3407.79	-2181.56	-57.2285
109	2429	2104.48	3423.67	-1319.18	324.517
110	1762	1730.07	3439.58	-1709.51	31.9299
111	2846	2984.25	3448.92	-464.672	-138.245
112	5627	5296.63	3472.5	1824.13	330.367
113	5749	5937.3	3484.62	2452.68	-188.303
114	4502	5191.5	3494.92	1696.58	-689.495
115	5720	5190.37	3506.25	1684.12	529.63
116	4403	4631.51	3502.46	1129.05	-228.508
117	2867	3101.23	3504.54	-403.313	-234.228
118	2635	2306.61	3533.42	-1226.81	328.392
119	2059	2078.29	3559.79	-1481.5	-19.2868
120	1511	1451.52	3633.08	-2181.56	59.4799
121	2359	2362.32	3681.5	-1319.18	-3.31597
122	1741	1965.4	3674.92	-1709.51	-224.403
123	2917	3262.58	3727.25	-464.672	-345.578
124	6249	5578.67	3754.54	1824.13	670.326
125	5760	6203.64	3750.96	2452.68	-443.637
126	6250	5454	3757.42	1696.58	796.005
127	5134	NA	NA	1684.12	NA
128	4831	NA	NA	1129.05	NA
129	3695	NA	NA	-403.313	NA
130	2462	NA	NA	-1226.81	NA
131	2146	NA	NA	-1481.5	NA
132	1579	NA	NA	-2181.56	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 <- '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