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

Thu, 28 May 2009 14:20:25 -0600

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/2009/May/28/t1243542082n8dcrffv9xd3p9x.htm/, Retrieved Mon, 06 May 2024 10:14:31 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=40713, Retrieved Mon, 06 May 2024 10:14:31 +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

138

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

-     [Standard Deviation-Mean Plot] [Opgave 8 Oefening...] [2009-05-28 19:48:48] [74be16979710d4c4e7c6647856088456]
- RMPD    [Classical Decomposition] [Opgave 9 Oefening...] [2009-05-28 20:20:25] [d41d8cd98f00b204e9800998ecf8427e] [Current]
-   PD      [Classical Decomposition] [Opgave 9 Oefening...] [2009-06-02 19:29:18] [74be16979710d4c4e7c6647856088456] 
-   P         [Classical Decomposition] [Opgave 9 Oefening...] [2009-06-07 15:45:48] [74be16979710d4c4e7c6647856088456] 

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	1 seconds
R Server	'George Udny Yule' @ 72.249.76.132

\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 & 1 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=40713&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]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=40713&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=40713&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	1 seconds
R Server	'George Udny Yule' @ 72.249.76.132

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	3779.7	NA	NA	1.00159506626097	NA
2	3795.5	NA	NA	1.00229277370746	NA
3	3813.1	NA	NA	1.00295040237925	NA
4	3826.9	NA	NA	1.00201952762084	NA
5	3833.3	NA	NA	1.00057170934675	NA
6	3844.8	NA	NA	1.00018478332918	NA
7	3851.3	3834.99353371675	3838.7375	0.999024688121226	1.00425201923807
8	3851.8	3837.43810865427	3844.6125	0.998133910414709	1.00374257276315
9	3854.1	3840.80084701114	3849.06666666667	0.99785251325286	1.00346259895230
10	3858.4	3841.56156153952	3851.34166666667	0.997460597897145	1.00438322754711
11	3861.6	3846.81701778664	3851.85416666667	0.998692279442038	1.00384291276268
12	3856.3	3848.37766057999	3851.375	0.999221748227578	1.00205861797327
13	3855.8	3856.02832565977	3849.8875	1.00159506626097	0.99994078734893
14	3860.4	3856.28803708035	3847.46666666667	1.00229277370746	1.00106630077425
15	3855.1	3855.62969498652	3844.2875	1.00295040237925	0.999862617774936
16	3839.5	3848.11404306141	3840.35833333333	1.00201952762084	0.997761489663503
17	3833	3838.26395088353	3836.07083333333	1.00057170934675	0.99862855943445
18	3833.6	3833.05398695499	3832.34583333333	1.00018478332918	1.00014244856630
19	3826.8	3827.151189915	3830.8875	0.999024688121226	0.999908237250744
20	3818.2	3824.17540431963	3831.325	0.998133910414709	0.99843746594027
21	3811.4	3824.12007916459	3832.35	0.99785251325286	0.996673723915235
22	3806.8	3824.73772612166	3834.475	0.997460597897145	0.995310076819347
23	3810.3	3832.68552203254	3837.70416666667	0.998692279442038	0.99415931155743
24	3818.2	3838.57696059945	3841.56666666667	0.999221748227578	0.994691532615182
25	3858.9	3852.10541165024	3845.97083333333	1.00159506626097	1.00176386355607
26	3867.8	3859.82947154745	3851	1.00229277370746	1.00206499497227
27	3872.3	3868.24179629644	3856.8625	1.00295040237925	1.00104910807475
28	3873.3	3871.48197346180	3863.67916666667	1.00201952762084	1.00046959447329
29	3876.7	3873.32982024734	3871.11666666667	1.00057170934675	1.00087009883203
30	3882.6	3879.65426298494	3878.9375	1.00018478332918	1.00075927822826
31	3883.5	3882.12668598174	3885.91666666667	0.999024688121226	1.00035375301461
32	3882.2	3884.98255392036	3892.24583333333	0.998133910414709	0.999283766688335
33	3888.1	3891.35870768262	3899.73333333333	0.99785251325286	0.999162578439201
34	3893.7	3898.80748768717	3908.73333333333	0.997460597897145	0.998689987206781
35	3901.9	3913.32160116182	3918.44583333333	0.998692279442038	0.997081353815022
36	3914.3	3925.04294921275	3928.1	0.999221748227578	0.997262972825583
37	3930.3	3944.70287552607	3938.42083333333	1.00159506626097	0.996348805986015
38	3948.3	3959.6160696098	3950.55833333333	1.00229277370746	0.9971421295876
39	3971.5	3976.07150143224	3964.375	1.00295040237925	0.998850246674238
40	3990.1	3987.22775414611	3979.19166666667	1.00201952762084	1.00072036162241
41	3993	3997.47992413333	3995.19583333333	1.00057170934675	0.998879312912547
42	3998	4013.10808513723	4012.36666666667	1.00018478332918	0.996235315666382
43	4015.8	4025.95294024826	4029.88333333333	0.999024688121226	0.997478127439902
44	4041.2	4039.32316870952	4046.875	0.998133910414709	1.00046464004292
45	4060.7	4054.18744925146	4062.9125	0.99785251325286	1.00160637632820
46	4076.7	4067.20377312715	4077.55833333333	0.997460597897145	1.00233482938219
47	4103	4085.40876456318	4090.75833333333	0.998692279442038	1.00430586911876
48	4125.3	4100.14823374173	4103.34166666667	0.999221748227578	1.00613435535118
49	4139.7	4121.44267159337	4114.87916666667	1.00159506626097	1.00442983922413
50	4146.7	4133.81872990005	4124.3625	1.00229277370746	1.00311607037986
51	4158	4144.28717871129	4132.09583333333	1.00295040237925	1.00330884919345
52	4155.1	4146.88286554703	4138.525	1.00201952762084	1.00198152075171
53	4144.8	4145.48115614087	4143.1125	1.00057170934675	0.999835687073415
54	4148.2	4146.56190728953	4145.79583333333	1.00018478332918	1.00039504841531
55	4142.5	4143.54647124586	4147.59166666667	0.999024688121226	0.99974744551482
56	4142.1	4141.45722109271	4149.2	0.998133910414709	1.00015520597533
57	4145.4	4141.97352410488	4150.8875	0.99785251325286	1.00082725683184
58	4146.3	4142.85700339183	4153.40416666667	0.997460597897145	1.00083106817478
59	4143.5	4152.39188798892	4157.82916666667	0.998692279442038	0.997858610596307
60	4149.2	4160.63029347715	4163.87083333333	0.999221748227578	0.997252749542521
61	4158.9	4177.66554131282	4171.0125	1.00159506626097	0.99550812741536
62	4166.1	4188.7109641401	4179.12916666667	1.00229277370746	0.994601927816536
63	4179.1	4200.43568540448	4188.07916666667	1.00295040237925	0.994920601813135
64	4194.4	4206.7744077292	4198.29583333333	1.00201952762084	0.997058457019596
65	4211.7	4212.63619403319	4210.22916666667	1.00057170934675	0.999777765278066
66	4226.3	4224.35961368615	4223.57916666667	1.00018478332918	1.00045933265425
67	4235.8	4233.66682332013	4237.8	0.999024688121226	1.00050386031043
68	4243.6	4245.08431545022	4253.02083333333	0.998133910414709	0.999650344883653
69	4258.7	4259.88642942092	4269.05416666667	0.99785251325286	0.999721488016035
70	4278.2	4274.67142140394	4285.55416666667	0.997460597897145	1.00082546194741
71	4298	NA	NA	0.998692279442038	NA
72	4315.1	NA	NA	0.999221748227578	NA
73	4334.3	NA	NA	NA	NA
74	4356	NA	NA	NA	NA
75	4374	NA	NA	NA	NA
76	4395.5	NA	NA	NA	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 3779.7 & NA & NA & 1.00159506626097 & NA \tabularnewline
2 & 3795.5 & NA & NA & 1.00229277370746 & NA \tabularnewline
3 & 3813.1 & NA & NA & 1.00295040237925 & NA \tabularnewline
4 & 3826.9 & NA & NA & 1.00201952762084 & NA \tabularnewline
5 & 3833.3 & NA & NA & 1.00057170934675 & NA \tabularnewline
6 & 3844.8 & NA & NA & 1.00018478332918 & NA \tabularnewline
7 & 3851.3 & 3834.99353371675 & 3838.7375 & 0.999024688121226 & 1.00425201923807 \tabularnewline
8 & 3851.8 & 3837.43810865427 & 3844.6125 & 0.998133910414709 & 1.00374257276315 \tabularnewline
9 & 3854.1 & 3840.80084701114 & 3849.06666666667 & 0.99785251325286 & 1.00346259895230 \tabularnewline
10 & 3858.4 & 3841.56156153952 & 3851.34166666667 & 0.997460597897145 & 1.00438322754711 \tabularnewline
11 & 3861.6 & 3846.81701778664 & 3851.85416666667 & 0.998692279442038 & 1.00384291276268 \tabularnewline
12 & 3856.3 & 3848.37766057999 & 3851.375 & 0.999221748227578 & 1.00205861797327 \tabularnewline
13 & 3855.8 & 3856.02832565977 & 3849.8875 & 1.00159506626097 & 0.99994078734893 \tabularnewline
14 & 3860.4 & 3856.28803708035 & 3847.46666666667 & 1.00229277370746 & 1.00106630077425 \tabularnewline
15 & 3855.1 & 3855.62969498652 & 3844.2875 & 1.00295040237925 & 0.999862617774936 \tabularnewline
16 & 3839.5 & 3848.11404306141 & 3840.35833333333 & 1.00201952762084 & 0.997761489663503 \tabularnewline
17 & 3833 & 3838.26395088353 & 3836.07083333333 & 1.00057170934675 & 0.99862855943445 \tabularnewline
18 & 3833.6 & 3833.05398695499 & 3832.34583333333 & 1.00018478332918 & 1.00014244856630 \tabularnewline
19 & 3826.8 & 3827.151189915 & 3830.8875 & 0.999024688121226 & 0.999908237250744 \tabularnewline
20 & 3818.2 & 3824.17540431963 & 3831.325 & 0.998133910414709 & 0.99843746594027 \tabularnewline
21 & 3811.4 & 3824.12007916459 & 3832.35 & 0.99785251325286 & 0.996673723915235 \tabularnewline
22 & 3806.8 & 3824.73772612166 & 3834.475 & 0.997460597897145 & 0.995310076819347 \tabularnewline
23 & 3810.3 & 3832.68552203254 & 3837.70416666667 & 0.998692279442038 & 0.99415931155743 \tabularnewline
24 & 3818.2 & 3838.57696059945 & 3841.56666666667 & 0.999221748227578 & 0.994691532615182 \tabularnewline
25 & 3858.9 & 3852.10541165024 & 3845.97083333333 & 1.00159506626097 & 1.00176386355607 \tabularnewline
26 & 3867.8 & 3859.82947154745 & 3851 & 1.00229277370746 & 1.00206499497227 \tabularnewline
27 & 3872.3 & 3868.24179629644 & 3856.8625 & 1.00295040237925 & 1.00104910807475 \tabularnewline
28 & 3873.3 & 3871.48197346180 & 3863.67916666667 & 1.00201952762084 & 1.00046959447329 \tabularnewline
29 & 3876.7 & 3873.32982024734 & 3871.11666666667 & 1.00057170934675 & 1.00087009883203 \tabularnewline
30 & 3882.6 & 3879.65426298494 & 3878.9375 & 1.00018478332918 & 1.00075927822826 \tabularnewline
31 & 3883.5 & 3882.12668598174 & 3885.91666666667 & 0.999024688121226 & 1.00035375301461 \tabularnewline
32 & 3882.2 & 3884.98255392036 & 3892.24583333333 & 0.998133910414709 & 0.999283766688335 \tabularnewline
33 & 3888.1 & 3891.35870768262 & 3899.73333333333 & 0.99785251325286 & 0.999162578439201 \tabularnewline
34 & 3893.7 & 3898.80748768717 & 3908.73333333333 & 0.997460597897145 & 0.998689987206781 \tabularnewline
35 & 3901.9 & 3913.32160116182 & 3918.44583333333 & 0.998692279442038 & 0.997081353815022 \tabularnewline
36 & 3914.3 & 3925.04294921275 & 3928.1 & 0.999221748227578 & 0.997262972825583 \tabularnewline
37 & 3930.3 & 3944.70287552607 & 3938.42083333333 & 1.00159506626097 & 0.996348805986015 \tabularnewline
38 & 3948.3 & 3959.6160696098 & 3950.55833333333 & 1.00229277370746 & 0.9971421295876 \tabularnewline
39 & 3971.5 & 3976.07150143224 & 3964.375 & 1.00295040237925 & 0.998850246674238 \tabularnewline
40 & 3990.1 & 3987.22775414611 & 3979.19166666667 & 1.00201952762084 & 1.00072036162241 \tabularnewline
41 & 3993 & 3997.47992413333 & 3995.19583333333 & 1.00057170934675 & 0.998879312912547 \tabularnewline
42 & 3998 & 4013.10808513723 & 4012.36666666667 & 1.00018478332918 & 0.996235315666382 \tabularnewline
43 & 4015.8 & 4025.95294024826 & 4029.88333333333 & 0.999024688121226 & 0.997478127439902 \tabularnewline
44 & 4041.2 & 4039.32316870952 & 4046.875 & 0.998133910414709 & 1.00046464004292 \tabularnewline
45 & 4060.7 & 4054.18744925146 & 4062.9125 & 0.99785251325286 & 1.00160637632820 \tabularnewline
46 & 4076.7 & 4067.20377312715 & 4077.55833333333 & 0.997460597897145 & 1.00233482938219 \tabularnewline
47 & 4103 & 4085.40876456318 & 4090.75833333333 & 0.998692279442038 & 1.00430586911876 \tabularnewline
48 & 4125.3 & 4100.14823374173 & 4103.34166666667 & 0.999221748227578 & 1.00613435535118 \tabularnewline
49 & 4139.7 & 4121.44267159337 & 4114.87916666667 & 1.00159506626097 & 1.00442983922413 \tabularnewline
50 & 4146.7 & 4133.81872990005 & 4124.3625 & 1.00229277370746 & 1.00311607037986 \tabularnewline
51 & 4158 & 4144.28717871129 & 4132.09583333333 & 1.00295040237925 & 1.00330884919345 \tabularnewline
52 & 4155.1 & 4146.88286554703 & 4138.525 & 1.00201952762084 & 1.00198152075171 \tabularnewline
53 & 4144.8 & 4145.48115614087 & 4143.1125 & 1.00057170934675 & 0.999835687073415 \tabularnewline
54 & 4148.2 & 4146.56190728953 & 4145.79583333333 & 1.00018478332918 & 1.00039504841531 \tabularnewline
55 & 4142.5 & 4143.54647124586 & 4147.59166666667 & 0.999024688121226 & 0.99974744551482 \tabularnewline
56 & 4142.1 & 4141.45722109271 & 4149.2 & 0.998133910414709 & 1.00015520597533 \tabularnewline
57 & 4145.4 & 4141.97352410488 & 4150.8875 & 0.99785251325286 & 1.00082725683184 \tabularnewline
58 & 4146.3 & 4142.85700339183 & 4153.40416666667 & 0.997460597897145 & 1.00083106817478 \tabularnewline
59 & 4143.5 & 4152.39188798892 & 4157.82916666667 & 0.998692279442038 & 0.997858610596307 \tabularnewline
60 & 4149.2 & 4160.63029347715 & 4163.87083333333 & 0.999221748227578 & 0.997252749542521 \tabularnewline
61 & 4158.9 & 4177.66554131282 & 4171.0125 & 1.00159506626097 & 0.99550812741536 \tabularnewline
62 & 4166.1 & 4188.7109641401 & 4179.12916666667 & 1.00229277370746 & 0.994601927816536 \tabularnewline
63 & 4179.1 & 4200.43568540448 & 4188.07916666667 & 1.00295040237925 & 0.994920601813135 \tabularnewline
64 & 4194.4 & 4206.7744077292 & 4198.29583333333 & 1.00201952762084 & 0.997058457019596 \tabularnewline
65 & 4211.7 & 4212.63619403319 & 4210.22916666667 & 1.00057170934675 & 0.999777765278066 \tabularnewline
66 & 4226.3 & 4224.35961368615 & 4223.57916666667 & 1.00018478332918 & 1.00045933265425 \tabularnewline
67 & 4235.8 & 4233.66682332013 & 4237.8 & 0.999024688121226 & 1.00050386031043 \tabularnewline
68 & 4243.6 & 4245.08431545022 & 4253.02083333333 & 0.998133910414709 & 0.999650344883653 \tabularnewline
69 & 4258.7 & 4259.88642942092 & 4269.05416666667 & 0.99785251325286 & 0.999721488016035 \tabularnewline
70 & 4278.2 & 4274.67142140394 & 4285.55416666667 & 0.997460597897145 & 1.00082546194741 \tabularnewline
71 & 4298 & NA & NA & 0.998692279442038 & NA \tabularnewline
72 & 4315.1 & NA & NA & 0.999221748227578 & NA \tabularnewline
73 & 4334.3 & NA & NA & NA & NA \tabularnewline
74 & 4356 & NA & NA & NA & NA \tabularnewline
75 & 4374 & NA & NA & NA & NA \tabularnewline
76 & 4395.5 & NA & NA & NA & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=40713&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]3779.7[/C][C]NA[/C][C]NA[/C][C]1.00159506626097[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]3795.5[/C][C]NA[/C][C]NA[/C][C]1.00229277370746[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]3813.1[/C][C]NA[/C][C]NA[/C][C]1.00295040237925[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]3826.9[/C][C]NA[/C][C]NA[/C][C]1.00201952762084[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]3833.3[/C][C]NA[/C][C]NA[/C][C]1.00057170934675[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]3844.8[/C][C]NA[/C][C]NA[/C][C]1.00018478332918[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]3851.3[/C][C]3834.99353371675[/C][C]3838.7375[/C][C]0.999024688121226[/C][C]1.00425201923807[/C][/ROW]
[ROW][C]8[/C][C]3851.8[/C][C]3837.43810865427[/C][C]3844.6125[/C][C]0.998133910414709[/C][C]1.00374257276315[/C][/ROW]
[ROW][C]9[/C][C]3854.1[/C][C]3840.80084701114[/C][C]3849.06666666667[/C][C]0.99785251325286[/C][C]1.00346259895230[/C][/ROW]
[ROW][C]10[/C][C]3858.4[/C][C]3841.56156153952[/C][C]3851.34166666667[/C][C]0.997460597897145[/C][C]1.00438322754711[/C][/ROW]
[ROW][C]11[/C][C]3861.6[/C][C]3846.81701778664[/C][C]3851.85416666667[/C][C]0.998692279442038[/C][C]1.00384291276268[/C][/ROW]
[ROW][C]12[/C][C]3856.3[/C][C]3848.37766057999[/C][C]3851.375[/C][C]0.999221748227578[/C][C]1.00205861797327[/C][/ROW]
[ROW][C]13[/C][C]3855.8[/C][C]3856.02832565977[/C][C]3849.8875[/C][C]1.00159506626097[/C][C]0.99994078734893[/C][/ROW]
[ROW][C]14[/C][C]3860.4[/C][C]3856.28803708035[/C][C]3847.46666666667[/C][C]1.00229277370746[/C][C]1.00106630077425[/C][/ROW]
[ROW][C]15[/C][C]3855.1[/C][C]3855.62969498652[/C][C]3844.2875[/C][C]1.00295040237925[/C][C]0.999862617774936[/C][/ROW]
[ROW][C]16[/C][C]3839.5[/C][C]3848.11404306141[/C][C]3840.35833333333[/C][C]1.00201952762084[/C][C]0.997761489663503[/C][/ROW]
[ROW][C]17[/C][C]3833[/C][C]3838.26395088353[/C][C]3836.07083333333[/C][C]1.00057170934675[/C][C]0.99862855943445[/C][/ROW]
[ROW][C]18[/C][C]3833.6[/C][C]3833.05398695499[/C][C]3832.34583333333[/C][C]1.00018478332918[/C][C]1.00014244856630[/C][/ROW]
[ROW][C]19[/C][C]3826.8[/C][C]3827.151189915[/C][C]3830.8875[/C][C]0.999024688121226[/C][C]0.999908237250744[/C][/ROW]
[ROW][C]20[/C][C]3818.2[/C][C]3824.17540431963[/C][C]3831.325[/C][C]0.998133910414709[/C][C]0.99843746594027[/C][/ROW]
[ROW][C]21[/C][C]3811.4[/C][C]3824.12007916459[/C][C]3832.35[/C][C]0.99785251325286[/C][C]0.996673723915235[/C][/ROW]
[ROW][C]22[/C][C]3806.8[/C][C]3824.73772612166[/C][C]3834.475[/C][C]0.997460597897145[/C][C]0.995310076819347[/C][/ROW]
[ROW][C]23[/C][C]3810.3[/C][C]3832.68552203254[/C][C]3837.70416666667[/C][C]0.998692279442038[/C][C]0.99415931155743[/C][/ROW]
[ROW][C]24[/C][C]3818.2[/C][C]3838.57696059945[/C][C]3841.56666666667[/C][C]0.999221748227578[/C][C]0.994691532615182[/C][/ROW]
[ROW][C]25[/C][C]3858.9[/C][C]3852.10541165024[/C][C]3845.97083333333[/C][C]1.00159506626097[/C][C]1.00176386355607[/C][/ROW]
[ROW][C]26[/C][C]3867.8[/C][C]3859.82947154745[/C][C]3851[/C][C]1.00229277370746[/C][C]1.00206499497227[/C][/ROW]
[ROW][C]27[/C][C]3872.3[/C][C]3868.24179629644[/C][C]3856.8625[/C][C]1.00295040237925[/C][C]1.00104910807475[/C][/ROW]
[ROW][C]28[/C][C]3873.3[/C][C]3871.48197346180[/C][C]3863.67916666667[/C][C]1.00201952762084[/C][C]1.00046959447329[/C][/ROW]
[ROW][C]29[/C][C]3876.7[/C][C]3873.32982024734[/C][C]3871.11666666667[/C][C]1.00057170934675[/C][C]1.00087009883203[/C][/ROW]
[ROW][C]30[/C][C]3882.6[/C][C]3879.65426298494[/C][C]3878.9375[/C][C]1.00018478332918[/C][C]1.00075927822826[/C][/ROW]
[ROW][C]31[/C][C]3883.5[/C][C]3882.12668598174[/C][C]3885.91666666667[/C][C]0.999024688121226[/C][C]1.00035375301461[/C][/ROW]
[ROW][C]32[/C][C]3882.2[/C][C]3884.98255392036[/C][C]3892.24583333333[/C][C]0.998133910414709[/C][C]0.999283766688335[/C][/ROW]
[ROW][C]33[/C][C]3888.1[/C][C]3891.35870768262[/C][C]3899.73333333333[/C][C]0.99785251325286[/C][C]0.999162578439201[/C][/ROW]
[ROW][C]34[/C][C]3893.7[/C][C]3898.80748768717[/C][C]3908.73333333333[/C][C]0.997460597897145[/C][C]0.998689987206781[/C][/ROW]
[ROW][C]35[/C][C]3901.9[/C][C]3913.32160116182[/C][C]3918.44583333333[/C][C]0.998692279442038[/C][C]0.997081353815022[/C][/ROW]
[ROW][C]36[/C][C]3914.3[/C][C]3925.04294921275[/C][C]3928.1[/C][C]0.999221748227578[/C][C]0.997262972825583[/C][/ROW]
[ROW][C]37[/C][C]3930.3[/C][C]3944.70287552607[/C][C]3938.42083333333[/C][C]1.00159506626097[/C][C]0.996348805986015[/C][/ROW]
[ROW][C]38[/C][C]3948.3[/C][C]3959.6160696098[/C][C]3950.55833333333[/C][C]1.00229277370746[/C][C]0.9971421295876[/C][/ROW]
[ROW][C]39[/C][C]3971.5[/C][C]3976.07150143224[/C][C]3964.375[/C][C]1.00295040237925[/C][C]0.998850246674238[/C][/ROW]
[ROW][C]40[/C][C]3990.1[/C][C]3987.22775414611[/C][C]3979.19166666667[/C][C]1.00201952762084[/C][C]1.00072036162241[/C][/ROW]
[ROW][C]41[/C][C]3993[/C][C]3997.47992413333[/C][C]3995.19583333333[/C][C]1.00057170934675[/C][C]0.998879312912547[/C][/ROW]
[ROW][C]42[/C][C]3998[/C][C]4013.10808513723[/C][C]4012.36666666667[/C][C]1.00018478332918[/C][C]0.996235315666382[/C][/ROW]
[ROW][C]43[/C][C]4015.8[/C][C]4025.95294024826[/C][C]4029.88333333333[/C][C]0.999024688121226[/C][C]0.997478127439902[/C][/ROW]
[ROW][C]44[/C][C]4041.2[/C][C]4039.32316870952[/C][C]4046.875[/C][C]0.998133910414709[/C][C]1.00046464004292[/C][/ROW]
[ROW][C]45[/C][C]4060.7[/C][C]4054.18744925146[/C][C]4062.9125[/C][C]0.99785251325286[/C][C]1.00160637632820[/C][/ROW]
[ROW][C]46[/C][C]4076.7[/C][C]4067.20377312715[/C][C]4077.55833333333[/C][C]0.997460597897145[/C][C]1.00233482938219[/C][/ROW]
[ROW][C]47[/C][C]4103[/C][C]4085.40876456318[/C][C]4090.75833333333[/C][C]0.998692279442038[/C][C]1.00430586911876[/C][/ROW]
[ROW][C]48[/C][C]4125.3[/C][C]4100.14823374173[/C][C]4103.34166666667[/C][C]0.999221748227578[/C][C]1.00613435535118[/C][/ROW]
[ROW][C]49[/C][C]4139.7[/C][C]4121.44267159337[/C][C]4114.87916666667[/C][C]1.00159506626097[/C][C]1.00442983922413[/C][/ROW]
[ROW][C]50[/C][C]4146.7[/C][C]4133.81872990005[/C][C]4124.3625[/C][C]1.00229277370746[/C][C]1.00311607037986[/C][/ROW]
[ROW][C]51[/C][C]4158[/C][C]4144.28717871129[/C][C]4132.09583333333[/C][C]1.00295040237925[/C][C]1.00330884919345[/C][/ROW]
[ROW][C]52[/C][C]4155.1[/C][C]4146.88286554703[/C][C]4138.525[/C][C]1.00201952762084[/C][C]1.00198152075171[/C][/ROW]
[ROW][C]53[/C][C]4144.8[/C][C]4145.48115614087[/C][C]4143.1125[/C][C]1.00057170934675[/C][C]0.999835687073415[/C][/ROW]
[ROW][C]54[/C][C]4148.2[/C][C]4146.56190728953[/C][C]4145.79583333333[/C][C]1.00018478332918[/C][C]1.00039504841531[/C][/ROW]
[ROW][C]55[/C][C]4142.5[/C][C]4143.54647124586[/C][C]4147.59166666667[/C][C]0.999024688121226[/C][C]0.99974744551482[/C][/ROW]
[ROW][C]56[/C][C]4142.1[/C][C]4141.45722109271[/C][C]4149.2[/C][C]0.998133910414709[/C][C]1.00015520597533[/C][/ROW]
[ROW][C]57[/C][C]4145.4[/C][C]4141.97352410488[/C][C]4150.8875[/C][C]0.99785251325286[/C][C]1.00082725683184[/C][/ROW]
[ROW][C]58[/C][C]4146.3[/C][C]4142.85700339183[/C][C]4153.40416666667[/C][C]0.997460597897145[/C][C]1.00083106817478[/C][/ROW]
[ROW][C]59[/C][C]4143.5[/C][C]4152.39188798892[/C][C]4157.82916666667[/C][C]0.998692279442038[/C][C]0.997858610596307[/C][/ROW]
[ROW][C]60[/C][C]4149.2[/C][C]4160.63029347715[/C][C]4163.87083333333[/C][C]0.999221748227578[/C][C]0.997252749542521[/C][/ROW]
[ROW][C]61[/C][C]4158.9[/C][C]4177.66554131282[/C][C]4171.0125[/C][C]1.00159506626097[/C][C]0.99550812741536[/C][/ROW]
[ROW][C]62[/C][C]4166.1[/C][C]4188.7109641401[/C][C]4179.12916666667[/C][C]1.00229277370746[/C][C]0.994601927816536[/C][/ROW]
[ROW][C]63[/C][C]4179.1[/C][C]4200.43568540448[/C][C]4188.07916666667[/C][C]1.00295040237925[/C][C]0.994920601813135[/C][/ROW]
[ROW][C]64[/C][C]4194.4[/C][C]4206.7744077292[/C][C]4198.29583333333[/C][C]1.00201952762084[/C][C]0.997058457019596[/C][/ROW]
[ROW][C]65[/C][C]4211.7[/C][C]4212.63619403319[/C][C]4210.22916666667[/C][C]1.00057170934675[/C][C]0.999777765278066[/C][/ROW]
[ROW][C]66[/C][C]4226.3[/C][C]4224.35961368615[/C][C]4223.57916666667[/C][C]1.00018478332918[/C][C]1.00045933265425[/C][/ROW]
[ROW][C]67[/C][C]4235.8[/C][C]4233.66682332013[/C][C]4237.8[/C][C]0.999024688121226[/C][C]1.00050386031043[/C][/ROW]
[ROW][C]68[/C][C]4243.6[/C][C]4245.08431545022[/C][C]4253.02083333333[/C][C]0.998133910414709[/C][C]0.999650344883653[/C][/ROW]
[ROW][C]69[/C][C]4258.7[/C][C]4259.88642942092[/C][C]4269.05416666667[/C][C]0.99785251325286[/C][C]0.999721488016035[/C][/ROW]
[ROW][C]70[/C][C]4278.2[/C][C]4274.67142140394[/C][C]4285.55416666667[/C][C]0.997460597897145[/C][C]1.00082546194741[/C][/ROW]
[ROW][C]71[/C][C]4298[/C][C]NA[/C][C]NA[/C][C]0.998692279442038[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]4315.1[/C][C]NA[/C][C]NA[/C][C]0.999221748227578[/C][C]NA[/C][/ROW]
[ROW][C]73[/C][C]4334.3[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]74[/C][C]4356[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]75[/C][C]4374[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[ROW][C]76[/C][C]4395.5[/C][C]NA[/C][C]NA[/C][C]NA[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=40713&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=40713&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	3779.7	NA	NA	1.00159506626097	NA
2	3795.5	NA	NA	1.00229277370746	NA
3	3813.1	NA	NA	1.00295040237925	NA
4	3826.9	NA	NA	1.00201952762084	NA
5	3833.3	NA	NA	1.00057170934675	NA
6	3844.8	NA	NA	1.00018478332918	NA
7	3851.3	3834.99353371675	3838.7375	0.999024688121226	1.00425201923807
8	3851.8	3837.43810865427	3844.6125	0.998133910414709	1.00374257276315
9	3854.1	3840.80084701114	3849.06666666667	0.99785251325286	1.00346259895230
10	3858.4	3841.56156153952	3851.34166666667	0.997460597897145	1.00438322754711
11	3861.6	3846.81701778664	3851.85416666667	0.998692279442038	1.00384291276268
12	3856.3	3848.37766057999	3851.375	0.999221748227578	1.00205861797327
13	3855.8	3856.02832565977	3849.8875	1.00159506626097	0.99994078734893
14	3860.4	3856.28803708035	3847.46666666667	1.00229277370746	1.00106630077425
15	3855.1	3855.62969498652	3844.2875	1.00295040237925	0.999862617774936
16	3839.5	3848.11404306141	3840.35833333333	1.00201952762084	0.997761489663503
17	3833	3838.26395088353	3836.07083333333	1.00057170934675	0.99862855943445
18	3833.6	3833.05398695499	3832.34583333333	1.00018478332918	1.00014244856630
19	3826.8	3827.151189915	3830.8875	0.999024688121226	0.999908237250744
20	3818.2	3824.17540431963	3831.325	0.998133910414709	0.99843746594027
21	3811.4	3824.12007916459	3832.35	0.99785251325286	0.996673723915235
22	3806.8	3824.73772612166	3834.475	0.997460597897145	0.995310076819347
23	3810.3	3832.68552203254	3837.70416666667	0.998692279442038	0.99415931155743
24	3818.2	3838.57696059945	3841.56666666667	0.999221748227578	0.994691532615182
25	3858.9	3852.10541165024	3845.97083333333	1.00159506626097	1.00176386355607
26	3867.8	3859.82947154745	3851	1.00229277370746	1.00206499497227
27	3872.3	3868.24179629644	3856.8625	1.00295040237925	1.00104910807475
28	3873.3	3871.48197346180	3863.67916666667	1.00201952762084	1.00046959447329
29	3876.7	3873.32982024734	3871.11666666667	1.00057170934675	1.00087009883203
30	3882.6	3879.65426298494	3878.9375	1.00018478332918	1.00075927822826
31	3883.5	3882.12668598174	3885.91666666667	0.999024688121226	1.00035375301461
32	3882.2	3884.98255392036	3892.24583333333	0.998133910414709	0.999283766688335
33	3888.1	3891.35870768262	3899.73333333333	0.99785251325286	0.999162578439201
34	3893.7	3898.80748768717	3908.73333333333	0.997460597897145	0.998689987206781
35	3901.9	3913.32160116182	3918.44583333333	0.998692279442038	0.997081353815022
36	3914.3	3925.04294921275	3928.1	0.999221748227578	0.997262972825583
37	3930.3	3944.70287552607	3938.42083333333	1.00159506626097	0.996348805986015
38	3948.3	3959.6160696098	3950.55833333333	1.00229277370746	0.9971421295876
39	3971.5	3976.07150143224	3964.375	1.00295040237925	0.998850246674238
40	3990.1	3987.22775414611	3979.19166666667	1.00201952762084	1.00072036162241
41	3993	3997.47992413333	3995.19583333333	1.00057170934675	0.998879312912547
42	3998	4013.10808513723	4012.36666666667	1.00018478332918	0.996235315666382
43	4015.8	4025.95294024826	4029.88333333333	0.999024688121226	0.997478127439902
44	4041.2	4039.32316870952	4046.875	0.998133910414709	1.00046464004292
45	4060.7	4054.18744925146	4062.9125	0.99785251325286	1.00160637632820
46	4076.7	4067.20377312715	4077.55833333333	0.997460597897145	1.00233482938219
47	4103	4085.40876456318	4090.75833333333	0.998692279442038	1.00430586911876
48	4125.3	4100.14823374173	4103.34166666667	0.999221748227578	1.00613435535118
49	4139.7	4121.44267159337	4114.87916666667	1.00159506626097	1.00442983922413
50	4146.7	4133.81872990005	4124.3625	1.00229277370746	1.00311607037986
51	4158	4144.28717871129	4132.09583333333	1.00295040237925	1.00330884919345
52	4155.1	4146.88286554703	4138.525	1.00201952762084	1.00198152075171
53	4144.8	4145.48115614087	4143.1125	1.00057170934675	0.999835687073415
54	4148.2	4146.56190728953	4145.79583333333	1.00018478332918	1.00039504841531
55	4142.5	4143.54647124586	4147.59166666667	0.999024688121226	0.99974744551482
56	4142.1	4141.45722109271	4149.2	0.998133910414709	1.00015520597533
57	4145.4	4141.97352410488	4150.8875	0.99785251325286	1.00082725683184
58	4146.3	4142.85700339183	4153.40416666667	0.997460597897145	1.00083106817478
59	4143.5	4152.39188798892	4157.82916666667	0.998692279442038	0.997858610596307
60	4149.2	4160.63029347715	4163.87083333333	0.999221748227578	0.997252749542521
61	4158.9	4177.66554131282	4171.0125	1.00159506626097	0.99550812741536
62	4166.1	4188.7109641401	4179.12916666667	1.00229277370746	0.994601927816536
63	4179.1	4200.43568540448	4188.07916666667	1.00295040237925	0.994920601813135
64	4194.4	4206.7744077292	4198.29583333333	1.00201952762084	0.997058457019596
65	4211.7	4212.63619403319	4210.22916666667	1.00057170934675	0.999777765278066
66	4226.3	4224.35961368615	4223.57916666667	1.00018478332918	1.00045933265425
67	4235.8	4233.66682332013	4237.8	0.999024688121226	1.00050386031043
68	4243.6	4245.08431545022	4253.02083333333	0.998133910414709	0.999650344883653
69	4258.7	4259.88642942092	4269.05416666667	0.99785251325286	0.999721488016035
70	4278.2	4274.67142140394	4285.55416666667	0.997460597897145	1.00082546194741
71	4298	NA	NA	0.998692279442038	NA
72	4315.1	NA	NA	0.999221748227578	NA
73	4334.3	NA	NA	NA	NA
74	4356	NA	NA	NA	NA
75	4374	NA	NA	NA	NA
76	4395.5	NA	NA	NA	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,m$trend[i]+m$seasonal[i]) else a<-table.element(a,m$trend[i]*m$seasonal[i])
a<-table.element(a,m$trend[i])
a<-table.element(a,m$seasonal[i])
a<-table.element(a,m$random[i])
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