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, 12 Dec 2013 17:25:22 -0500

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2013/Dec/12/t1386887137i3h273f1600b0wr.htm/, Retrieved Fri, 19 Apr 2024 10:42:01 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=232281, Retrieved Fri, 19 Apr 2024 10:42:01 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

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

-       [Classical Decomposition] [] [2013-12-12 22:25:22] [f3e37d24265d1c1b6ba14664c97da4c0] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

1,31
1,32
1,32
1,33
1,33
1,33
1,34
1,33
1,32
1,31
1,31
1,33
1,34
1,33
1,33
1,34
1,34
1,34
1,35
1,35
1,35
1,34
1,35
1,36
1,35
1,36
1,36
1,36
1,37
1,39
1,39
1,38
1,37
1,39
1,38
1,4
1,41
1,4
1,42
1,43
1,44
1,44
1,44
1,46
1,46
1,49
1,49
1,48
1,49
1,5
1,5
1,5
1,47
1,49
1,49
1,5
1,52
1,52
1,52
1,52
1,53
1,54
1,51
1,49
1,49
1,49
1,48
1,49
1,49
1,47
1,49
1,49

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=232281&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	7 seconds
R Server	'Sir Maurice George Kendall' @ kendall.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	1.31	NA	NA	0.006	NA
2	1.32	NA	NA	0.0055	NA
3	1.32	NA	NA	0.00075	NA
4	1.33	NA	NA	-0.002	NA
5	1.33	NA	NA	-0.00683333	NA
6	1.33	NA	NA	-0.00166667	NA
7	1.34	1.32642	1.32458	0.00183333	0.0135833
8	1.33	1.32642	1.32625	0.000166667	0.00358333
9	1.32	1.32383	1.32708	-0.00325	-0.00383333
10	1.31	1.32775	1.32792	-0.000166667	-0.01775
11	1.31	1.32592	1.32875	-0.00283333	-0.0159167
12	1.33	1.33208	1.32958	0.0025	-0.00208333
13	1.34	1.33642	1.33042	0.006	0.00358333
14	1.33	1.33717	1.33167	0.0055	-0.00716667
15	1.33	1.3345	1.33375	0.00075	-0.0045
16	1.34	1.33425	1.33625	-0.002	0.00575
17	1.34	1.33233	1.33917	-0.00683333	0.00766667
18	1.34	1.34042	1.34208	-0.00166667	-0.000416667
19	1.35	1.34558	1.34375	0.00183333	0.00441667
20	1.35	1.34558	1.34542	0.000166667	0.00441667
21	1.35	1.34467	1.34792	-0.00325	0.00533333
22	1.34	1.34983	1.35	-0.000166667	-0.00983333
23	1.35	1.34925	1.35208	-0.00283333	0.00075
24	1.36	1.35792	1.35542	0.0025	0.00208333
25	1.35	1.36517	1.35917	0.006	-0.0151667
26	1.36	1.36758	1.36208	0.0055	-0.00758333
27	1.36	1.36492	1.36417	0.00075	-0.00491667
28	1.36	1.36508	1.36708	-0.002	-0.00508333
29	1.37	1.36358	1.37042	-0.00683333	0.00641667
30	1.39	1.37167	1.37333	-0.00166667	0.0183333
31	1.39	1.37933	1.3775	0.00183333	0.0106667
32	1.38	1.38183	1.38167	0.000166667	-0.00183333
33	1.37	1.38258	1.38583	-0.00325	-0.0125833
34	1.39	1.39108	1.39125	-0.000166667	-0.00108333
35	1.38	1.39425	1.39708	-0.00283333	-0.01425
36	1.4	1.40458	1.40208	0.0025	-0.00458333
37	1.41	1.41225	1.40625	0.006	-0.00225
38	1.4	1.41717	1.41167	0.0055	-0.0171667
39	1.42	1.4195	1.41875	0.00075	5e-04
40	1.43	1.42467	1.42667	-0.002	0.00533333
41	1.44	1.42858	1.43542	-0.00683333	0.0114167
42	1.44	1.44167	1.44333	-0.00166667	-0.00166667
43	1.44	1.45183	1.45	0.00183333	-0.0118333
44	1.46	1.45767	1.4575	0.000166667	0.00233333
45	1.46	1.46175	1.465	-0.00325	-0.00175
46	1.49	1.47108	1.47125	-0.000166667	0.0189167
47	1.49	1.47258	1.47542	-0.00283333	0.0174167
48	1.48	1.48125	1.47875	0.0025	-0.00125
49	1.49	1.48892	1.48292	0.006	0.00108333
50	1.5	1.49217	1.48667	0.0055	0.00783333
51	1.5	1.49158	1.49083	0.00075	0.00841667
52	1.5	1.49258	1.49458	-0.002	0.00741667
53	1.47	1.49025	1.49708	-0.00683333	-0.02025
54	1.49	1.49833	1.5	-0.00166667	-0.00833333
55	1.49	1.50517	1.50333	0.00183333	-0.0151667
56	1.5	1.50683	1.50667	0.000166667	-0.00683333
57	1.52	1.5055	1.50875	-0.00325	0.0145
58	1.52	1.50858	1.50875	-0.000166667	0.0114167
59	1.52	1.50633	1.50917	-0.00283333	0.0136667
60	1.52	1.5125	1.51	0.0025	0.0075
61	1.53	1.51558	1.50958	0.006	0.0144167
62	1.54	1.51425	1.50875	0.0055	0.02575
63	1.51	1.50783	1.50708	0.00075	0.00216667
64	1.49	1.50175	1.50375	-0.002	-0.01175
65	1.49	1.49358	1.50042	-0.00683333	-0.00358333
66	1.49	1.49625	1.49792	-0.00166667	-0.00625
67	1.48	NA	NA	0.00183333	NA
68	1.49	NA	NA	0.000166667	NA
69	1.49	NA	NA	-0.00325	NA
70	1.47	NA	NA	-0.000166667	NA
71	1.49	NA	NA	-0.00283333	NA
72	1.49	NA	NA	0.0025	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 1.31 & NA & NA & 0.006 & NA \tabularnewline
2 & 1.32 & NA & NA & 0.0055 & NA \tabularnewline
3 & 1.32 & NA & NA & 0.00075 & NA \tabularnewline
4 & 1.33 & NA & NA & -0.002 & NA \tabularnewline
5 & 1.33 & NA & NA & -0.00683333 & NA \tabularnewline
6 & 1.33 & NA & NA & -0.00166667 & NA \tabularnewline
7 & 1.34 & 1.32642 & 1.32458 & 0.00183333 & 0.0135833 \tabularnewline
8 & 1.33 & 1.32642 & 1.32625 & 0.000166667 & 0.00358333 \tabularnewline
9 & 1.32 & 1.32383 & 1.32708 & -0.00325 & -0.00383333 \tabularnewline
10 & 1.31 & 1.32775 & 1.32792 & -0.000166667 & -0.01775 \tabularnewline
11 & 1.31 & 1.32592 & 1.32875 & -0.00283333 & -0.0159167 \tabularnewline
12 & 1.33 & 1.33208 & 1.32958 & 0.0025 & -0.00208333 \tabularnewline
13 & 1.34 & 1.33642 & 1.33042 & 0.006 & 0.00358333 \tabularnewline
14 & 1.33 & 1.33717 & 1.33167 & 0.0055 & -0.00716667 \tabularnewline
15 & 1.33 & 1.3345 & 1.33375 & 0.00075 & -0.0045 \tabularnewline
16 & 1.34 & 1.33425 & 1.33625 & -0.002 & 0.00575 \tabularnewline
17 & 1.34 & 1.33233 & 1.33917 & -0.00683333 & 0.00766667 \tabularnewline
18 & 1.34 & 1.34042 & 1.34208 & -0.00166667 & -0.000416667 \tabularnewline
19 & 1.35 & 1.34558 & 1.34375 & 0.00183333 & 0.00441667 \tabularnewline
20 & 1.35 & 1.34558 & 1.34542 & 0.000166667 & 0.00441667 \tabularnewline
21 & 1.35 & 1.34467 & 1.34792 & -0.00325 & 0.00533333 \tabularnewline
22 & 1.34 & 1.34983 & 1.35 & -0.000166667 & -0.00983333 \tabularnewline
23 & 1.35 & 1.34925 & 1.35208 & -0.00283333 & 0.00075 \tabularnewline
24 & 1.36 & 1.35792 & 1.35542 & 0.0025 & 0.00208333 \tabularnewline
25 & 1.35 & 1.36517 & 1.35917 & 0.006 & -0.0151667 \tabularnewline
26 & 1.36 & 1.36758 & 1.36208 & 0.0055 & -0.00758333 \tabularnewline
27 & 1.36 & 1.36492 & 1.36417 & 0.00075 & -0.00491667 \tabularnewline
28 & 1.36 & 1.36508 & 1.36708 & -0.002 & -0.00508333 \tabularnewline
29 & 1.37 & 1.36358 & 1.37042 & -0.00683333 & 0.00641667 \tabularnewline
30 & 1.39 & 1.37167 & 1.37333 & -0.00166667 & 0.0183333 \tabularnewline
31 & 1.39 & 1.37933 & 1.3775 & 0.00183333 & 0.0106667 \tabularnewline
32 & 1.38 & 1.38183 & 1.38167 & 0.000166667 & -0.00183333 \tabularnewline
33 & 1.37 & 1.38258 & 1.38583 & -0.00325 & -0.0125833 \tabularnewline
34 & 1.39 & 1.39108 & 1.39125 & -0.000166667 & -0.00108333 \tabularnewline
35 & 1.38 & 1.39425 & 1.39708 & -0.00283333 & -0.01425 \tabularnewline
36 & 1.4 & 1.40458 & 1.40208 & 0.0025 & -0.00458333 \tabularnewline
37 & 1.41 & 1.41225 & 1.40625 & 0.006 & -0.00225 \tabularnewline
38 & 1.4 & 1.41717 & 1.41167 & 0.0055 & -0.0171667 \tabularnewline
39 & 1.42 & 1.4195 & 1.41875 & 0.00075 & 5e-04 \tabularnewline
40 & 1.43 & 1.42467 & 1.42667 & -0.002 & 0.00533333 \tabularnewline
41 & 1.44 & 1.42858 & 1.43542 & -0.00683333 & 0.0114167 \tabularnewline
42 & 1.44 & 1.44167 & 1.44333 & -0.00166667 & -0.00166667 \tabularnewline
43 & 1.44 & 1.45183 & 1.45 & 0.00183333 & -0.0118333 \tabularnewline
44 & 1.46 & 1.45767 & 1.4575 & 0.000166667 & 0.00233333 \tabularnewline
45 & 1.46 & 1.46175 & 1.465 & -0.00325 & -0.00175 \tabularnewline
46 & 1.49 & 1.47108 & 1.47125 & -0.000166667 & 0.0189167 \tabularnewline
47 & 1.49 & 1.47258 & 1.47542 & -0.00283333 & 0.0174167 \tabularnewline
48 & 1.48 & 1.48125 & 1.47875 & 0.0025 & -0.00125 \tabularnewline
49 & 1.49 & 1.48892 & 1.48292 & 0.006 & 0.00108333 \tabularnewline
50 & 1.5 & 1.49217 & 1.48667 & 0.0055 & 0.00783333 \tabularnewline
51 & 1.5 & 1.49158 & 1.49083 & 0.00075 & 0.00841667 \tabularnewline
52 & 1.5 & 1.49258 & 1.49458 & -0.002 & 0.00741667 \tabularnewline
53 & 1.47 & 1.49025 & 1.49708 & -0.00683333 & -0.02025 \tabularnewline
54 & 1.49 & 1.49833 & 1.5 & -0.00166667 & -0.00833333 \tabularnewline
55 & 1.49 & 1.50517 & 1.50333 & 0.00183333 & -0.0151667 \tabularnewline
56 & 1.5 & 1.50683 & 1.50667 & 0.000166667 & -0.00683333 \tabularnewline
57 & 1.52 & 1.5055 & 1.50875 & -0.00325 & 0.0145 \tabularnewline
58 & 1.52 & 1.50858 & 1.50875 & -0.000166667 & 0.0114167 \tabularnewline
59 & 1.52 & 1.50633 & 1.50917 & -0.00283333 & 0.0136667 \tabularnewline
60 & 1.52 & 1.5125 & 1.51 & 0.0025 & 0.0075 \tabularnewline
61 & 1.53 & 1.51558 & 1.50958 & 0.006 & 0.0144167 \tabularnewline
62 & 1.54 & 1.51425 & 1.50875 & 0.0055 & 0.02575 \tabularnewline
63 & 1.51 & 1.50783 & 1.50708 & 0.00075 & 0.00216667 \tabularnewline
64 & 1.49 & 1.50175 & 1.50375 & -0.002 & -0.01175 \tabularnewline
65 & 1.49 & 1.49358 & 1.50042 & -0.00683333 & -0.00358333 \tabularnewline
66 & 1.49 & 1.49625 & 1.49792 & -0.00166667 & -0.00625 \tabularnewline
67 & 1.48 & NA & NA & 0.00183333 & NA \tabularnewline
68 & 1.49 & NA & NA & 0.000166667 & NA \tabularnewline
69 & 1.49 & NA & NA & -0.00325 & NA \tabularnewline
70 & 1.47 & NA & NA & -0.000166667 & NA \tabularnewline
71 & 1.49 & NA & NA & -0.00283333 & NA \tabularnewline
72 & 1.49 & NA & NA & 0.0025 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=232281&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]1.31[/C][C]NA[/C][C]NA[/C][C]0.006[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]1.32[/C][C]NA[/C][C]NA[/C][C]0.0055[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]1.32[/C][C]NA[/C][C]NA[/C][C]0.00075[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]1.33[/C][C]NA[/C][C]NA[/C][C]-0.002[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]1.33[/C][C]NA[/C][C]NA[/C][C]-0.00683333[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]1.33[/C][C]NA[/C][C]NA[/C][C]-0.00166667[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]1.34[/C][C]1.32642[/C][C]1.32458[/C][C]0.00183333[/C][C]0.0135833[/C][/ROW]
[ROW][C]8[/C][C]1.33[/C][C]1.32642[/C][C]1.32625[/C][C]0.000166667[/C][C]0.00358333[/C][/ROW]
[ROW][C]9[/C][C]1.32[/C][C]1.32383[/C][C]1.32708[/C][C]-0.00325[/C][C]-0.00383333[/C][/ROW]
[ROW][C]10[/C][C]1.31[/C][C]1.32775[/C][C]1.32792[/C][C]-0.000166667[/C][C]-0.01775[/C][/ROW]
[ROW][C]11[/C][C]1.31[/C][C]1.32592[/C][C]1.32875[/C][C]-0.00283333[/C][C]-0.0159167[/C][/ROW]
[ROW][C]12[/C][C]1.33[/C][C]1.33208[/C][C]1.32958[/C][C]0.0025[/C][C]-0.00208333[/C][/ROW]
[ROW][C]13[/C][C]1.34[/C][C]1.33642[/C][C]1.33042[/C][C]0.006[/C][C]0.00358333[/C][/ROW]
[ROW][C]14[/C][C]1.33[/C][C]1.33717[/C][C]1.33167[/C][C]0.0055[/C][C]-0.00716667[/C][/ROW]
[ROW][C]15[/C][C]1.33[/C][C]1.3345[/C][C]1.33375[/C][C]0.00075[/C][C]-0.0045[/C][/ROW]
[ROW][C]16[/C][C]1.34[/C][C]1.33425[/C][C]1.33625[/C][C]-0.002[/C][C]0.00575[/C][/ROW]
[ROW][C]17[/C][C]1.34[/C][C]1.33233[/C][C]1.33917[/C][C]-0.00683333[/C][C]0.00766667[/C][/ROW]
[ROW][C]18[/C][C]1.34[/C][C]1.34042[/C][C]1.34208[/C][C]-0.00166667[/C][C]-0.000416667[/C][/ROW]
[ROW][C]19[/C][C]1.35[/C][C]1.34558[/C][C]1.34375[/C][C]0.00183333[/C][C]0.00441667[/C][/ROW]
[ROW][C]20[/C][C]1.35[/C][C]1.34558[/C][C]1.34542[/C][C]0.000166667[/C][C]0.00441667[/C][/ROW]
[ROW][C]21[/C][C]1.35[/C][C]1.34467[/C][C]1.34792[/C][C]-0.00325[/C][C]0.00533333[/C][/ROW]
[ROW][C]22[/C][C]1.34[/C][C]1.34983[/C][C]1.35[/C][C]-0.000166667[/C][C]-0.00983333[/C][/ROW]
[ROW][C]23[/C][C]1.35[/C][C]1.34925[/C][C]1.35208[/C][C]-0.00283333[/C][C]0.00075[/C][/ROW]
[ROW][C]24[/C][C]1.36[/C][C]1.35792[/C][C]1.35542[/C][C]0.0025[/C][C]0.00208333[/C][/ROW]
[ROW][C]25[/C][C]1.35[/C][C]1.36517[/C][C]1.35917[/C][C]0.006[/C][C]-0.0151667[/C][/ROW]
[ROW][C]26[/C][C]1.36[/C][C]1.36758[/C][C]1.36208[/C][C]0.0055[/C][C]-0.00758333[/C][/ROW]
[ROW][C]27[/C][C]1.36[/C][C]1.36492[/C][C]1.36417[/C][C]0.00075[/C][C]-0.00491667[/C][/ROW]
[ROW][C]28[/C][C]1.36[/C][C]1.36508[/C][C]1.36708[/C][C]-0.002[/C][C]-0.00508333[/C][/ROW]
[ROW][C]29[/C][C]1.37[/C][C]1.36358[/C][C]1.37042[/C][C]-0.00683333[/C][C]0.00641667[/C][/ROW]
[ROW][C]30[/C][C]1.39[/C][C]1.37167[/C][C]1.37333[/C][C]-0.00166667[/C][C]0.0183333[/C][/ROW]
[ROW][C]31[/C][C]1.39[/C][C]1.37933[/C][C]1.3775[/C][C]0.00183333[/C][C]0.0106667[/C][/ROW]
[ROW][C]32[/C][C]1.38[/C][C]1.38183[/C][C]1.38167[/C][C]0.000166667[/C][C]-0.00183333[/C][/ROW]
[ROW][C]33[/C][C]1.37[/C][C]1.38258[/C][C]1.38583[/C][C]-0.00325[/C][C]-0.0125833[/C][/ROW]
[ROW][C]34[/C][C]1.39[/C][C]1.39108[/C][C]1.39125[/C][C]-0.000166667[/C][C]-0.00108333[/C][/ROW]
[ROW][C]35[/C][C]1.38[/C][C]1.39425[/C][C]1.39708[/C][C]-0.00283333[/C][C]-0.01425[/C][/ROW]
[ROW][C]36[/C][C]1.4[/C][C]1.40458[/C][C]1.40208[/C][C]0.0025[/C][C]-0.00458333[/C][/ROW]
[ROW][C]37[/C][C]1.41[/C][C]1.41225[/C][C]1.40625[/C][C]0.006[/C][C]-0.00225[/C][/ROW]
[ROW][C]38[/C][C]1.4[/C][C]1.41717[/C][C]1.41167[/C][C]0.0055[/C][C]-0.0171667[/C][/ROW]
[ROW][C]39[/C][C]1.42[/C][C]1.4195[/C][C]1.41875[/C][C]0.00075[/C][C]5e-04[/C][/ROW]
[ROW][C]40[/C][C]1.43[/C][C]1.42467[/C][C]1.42667[/C][C]-0.002[/C][C]0.00533333[/C][/ROW]
[ROW][C]41[/C][C]1.44[/C][C]1.42858[/C][C]1.43542[/C][C]-0.00683333[/C][C]0.0114167[/C][/ROW]
[ROW][C]42[/C][C]1.44[/C][C]1.44167[/C][C]1.44333[/C][C]-0.00166667[/C][C]-0.00166667[/C][/ROW]
[ROW][C]43[/C][C]1.44[/C][C]1.45183[/C][C]1.45[/C][C]0.00183333[/C][C]-0.0118333[/C][/ROW]
[ROW][C]44[/C][C]1.46[/C][C]1.45767[/C][C]1.4575[/C][C]0.000166667[/C][C]0.00233333[/C][/ROW]
[ROW][C]45[/C][C]1.46[/C][C]1.46175[/C][C]1.465[/C][C]-0.00325[/C][C]-0.00175[/C][/ROW]
[ROW][C]46[/C][C]1.49[/C][C]1.47108[/C][C]1.47125[/C][C]-0.000166667[/C][C]0.0189167[/C][/ROW]
[ROW][C]47[/C][C]1.49[/C][C]1.47258[/C][C]1.47542[/C][C]-0.00283333[/C][C]0.0174167[/C][/ROW]
[ROW][C]48[/C][C]1.48[/C][C]1.48125[/C][C]1.47875[/C][C]0.0025[/C][C]-0.00125[/C][/ROW]
[ROW][C]49[/C][C]1.49[/C][C]1.48892[/C][C]1.48292[/C][C]0.006[/C][C]0.00108333[/C][/ROW]
[ROW][C]50[/C][C]1.5[/C][C]1.49217[/C][C]1.48667[/C][C]0.0055[/C][C]0.00783333[/C][/ROW]
[ROW][C]51[/C][C]1.5[/C][C]1.49158[/C][C]1.49083[/C][C]0.00075[/C][C]0.00841667[/C][/ROW]
[ROW][C]52[/C][C]1.5[/C][C]1.49258[/C][C]1.49458[/C][C]-0.002[/C][C]0.00741667[/C][/ROW]
[ROW][C]53[/C][C]1.47[/C][C]1.49025[/C][C]1.49708[/C][C]-0.00683333[/C][C]-0.02025[/C][/ROW]
[ROW][C]54[/C][C]1.49[/C][C]1.49833[/C][C]1.5[/C][C]-0.00166667[/C][C]-0.00833333[/C][/ROW]
[ROW][C]55[/C][C]1.49[/C][C]1.50517[/C][C]1.50333[/C][C]0.00183333[/C][C]-0.0151667[/C][/ROW]
[ROW][C]56[/C][C]1.5[/C][C]1.50683[/C][C]1.50667[/C][C]0.000166667[/C][C]-0.00683333[/C][/ROW]
[ROW][C]57[/C][C]1.52[/C][C]1.5055[/C][C]1.50875[/C][C]-0.00325[/C][C]0.0145[/C][/ROW]
[ROW][C]58[/C][C]1.52[/C][C]1.50858[/C][C]1.50875[/C][C]-0.000166667[/C][C]0.0114167[/C][/ROW]
[ROW][C]59[/C][C]1.52[/C][C]1.50633[/C][C]1.50917[/C][C]-0.00283333[/C][C]0.0136667[/C][/ROW]
[ROW][C]60[/C][C]1.52[/C][C]1.5125[/C][C]1.51[/C][C]0.0025[/C][C]0.0075[/C][/ROW]
[ROW][C]61[/C][C]1.53[/C][C]1.51558[/C][C]1.50958[/C][C]0.006[/C][C]0.0144167[/C][/ROW]
[ROW][C]62[/C][C]1.54[/C][C]1.51425[/C][C]1.50875[/C][C]0.0055[/C][C]0.02575[/C][/ROW]
[ROW][C]63[/C][C]1.51[/C][C]1.50783[/C][C]1.50708[/C][C]0.00075[/C][C]0.00216667[/C][/ROW]
[ROW][C]64[/C][C]1.49[/C][C]1.50175[/C][C]1.50375[/C][C]-0.002[/C][C]-0.01175[/C][/ROW]
[ROW][C]65[/C][C]1.49[/C][C]1.49358[/C][C]1.50042[/C][C]-0.00683333[/C][C]-0.00358333[/C][/ROW]
[ROW][C]66[/C][C]1.49[/C][C]1.49625[/C][C]1.49792[/C][C]-0.00166667[/C][C]-0.00625[/C][/ROW]
[ROW][C]67[/C][C]1.48[/C][C]NA[/C][C]NA[/C][C]0.00183333[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]1.49[/C][C]NA[/C][C]NA[/C][C]0.000166667[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]1.49[/C][C]NA[/C][C]NA[/C][C]-0.00325[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]1.47[/C][C]NA[/C][C]NA[/C][C]-0.000166667[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]1.49[/C][C]NA[/C][C]NA[/C][C]-0.00283333[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]1.49[/C][C]NA[/C][C]NA[/C][C]0.0025[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=232281&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=232281&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	1.31	NA	NA	0.006	NA
2	1.32	NA	NA	0.0055	NA
3	1.32	NA	NA	0.00075	NA
4	1.33	NA	NA	-0.002	NA
5	1.33	NA	NA	-0.00683333	NA
6	1.33	NA	NA	-0.00166667	NA
7	1.34	1.32642	1.32458	0.00183333	0.0135833
8	1.33	1.32642	1.32625	0.000166667	0.00358333
9	1.32	1.32383	1.32708	-0.00325	-0.00383333
10	1.31	1.32775	1.32792	-0.000166667	-0.01775
11	1.31	1.32592	1.32875	-0.00283333	-0.0159167
12	1.33	1.33208	1.32958	0.0025	-0.00208333
13	1.34	1.33642	1.33042	0.006	0.00358333
14	1.33	1.33717	1.33167	0.0055	-0.00716667
15	1.33	1.3345	1.33375	0.00075	-0.0045
16	1.34	1.33425	1.33625	-0.002	0.00575
17	1.34	1.33233	1.33917	-0.00683333	0.00766667
18	1.34	1.34042	1.34208	-0.00166667	-0.000416667
19	1.35	1.34558	1.34375	0.00183333	0.00441667
20	1.35	1.34558	1.34542	0.000166667	0.00441667
21	1.35	1.34467	1.34792	-0.00325	0.00533333
22	1.34	1.34983	1.35	-0.000166667	-0.00983333
23	1.35	1.34925	1.35208	-0.00283333	0.00075
24	1.36	1.35792	1.35542	0.0025	0.00208333
25	1.35	1.36517	1.35917	0.006	-0.0151667
26	1.36	1.36758	1.36208	0.0055	-0.00758333
27	1.36	1.36492	1.36417	0.00075	-0.00491667
28	1.36	1.36508	1.36708	-0.002	-0.00508333
29	1.37	1.36358	1.37042	-0.00683333	0.00641667
30	1.39	1.37167	1.37333	-0.00166667	0.0183333
31	1.39	1.37933	1.3775	0.00183333	0.0106667
32	1.38	1.38183	1.38167	0.000166667	-0.00183333
33	1.37	1.38258	1.38583	-0.00325	-0.0125833
34	1.39	1.39108	1.39125	-0.000166667	-0.00108333
35	1.38	1.39425	1.39708	-0.00283333	-0.01425
36	1.4	1.40458	1.40208	0.0025	-0.00458333
37	1.41	1.41225	1.40625	0.006	-0.00225
38	1.4	1.41717	1.41167	0.0055	-0.0171667
39	1.42	1.4195	1.41875	0.00075	5e-04
40	1.43	1.42467	1.42667	-0.002	0.00533333
41	1.44	1.42858	1.43542	-0.00683333	0.0114167
42	1.44	1.44167	1.44333	-0.00166667	-0.00166667
43	1.44	1.45183	1.45	0.00183333	-0.0118333
44	1.46	1.45767	1.4575	0.000166667	0.00233333
45	1.46	1.46175	1.465	-0.00325	-0.00175
46	1.49	1.47108	1.47125	-0.000166667	0.0189167
47	1.49	1.47258	1.47542	-0.00283333	0.0174167
48	1.48	1.48125	1.47875	0.0025	-0.00125
49	1.49	1.48892	1.48292	0.006	0.00108333
50	1.5	1.49217	1.48667	0.0055	0.00783333
51	1.5	1.49158	1.49083	0.00075	0.00841667
52	1.5	1.49258	1.49458	-0.002	0.00741667
53	1.47	1.49025	1.49708	-0.00683333	-0.02025
54	1.49	1.49833	1.5	-0.00166667	-0.00833333
55	1.49	1.50517	1.50333	0.00183333	-0.0151667
56	1.5	1.50683	1.50667	0.000166667	-0.00683333
57	1.52	1.5055	1.50875	-0.00325	0.0145
58	1.52	1.50858	1.50875	-0.000166667	0.0114167
59	1.52	1.50633	1.50917	-0.00283333	0.0136667
60	1.52	1.5125	1.51	0.0025	0.0075
61	1.53	1.51558	1.50958	0.006	0.0144167
62	1.54	1.51425	1.50875	0.0055	0.02575
63	1.51	1.50783	1.50708	0.00075	0.00216667
64	1.49	1.50175	1.50375	-0.002	-0.01175
65	1.49	1.49358	1.50042	-0.00683333	-0.00358333
66	1.49	1.49625	1.49792	-0.00166667	-0.00625
67	1.48	NA	NA	0.00183333	NA
68	1.49	NA	NA	0.000166667	NA
69	1.49	NA	NA	-0.00325	NA
70	1.47	NA	NA	-0.000166667	NA
71	1.49	NA	NA	-0.00283333	NA
72	1.49	NA	NA	0.0025	NA

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Figure 3

PNG link

Postscript link

PDF link

Figure 4

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = additive ; par2 = 12 ;

Parameters (R input):

par1 = additive ; par2 = 12 ;

R code (references can be found in the software module):

par2 <- as.numeric(par2)
x <- ts(x,freq=par2)
m <- decompose(x,type=par1)
m$figure
bitmap(file='test1.png')
plot(m)
dev.off()
mylagmax <- length(x)/2
bitmap(file='test2.png')
op <- par(mfrow = c(2,2))
acf(as.numeric(x),lag.max = mylagmax,main='Observed')
acf(as.numeric(m$trend),na.action=na.pass,lag.max = mylagmax,main='Trend')
acf(as.numeric(m$seasonal),na.action=na.pass,lag.max = mylagmax,main='Seasonal')
acf(as.numeric(m$random),na.action=na.pass,lag.max = mylagmax,main='Random')
par(op)
dev.off()
bitmap(file='test3.png')
op <- par(mfrow = c(2,2))
spectrum(as.numeric(x),main='Observed')
spectrum(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
spectrum(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
spectrum(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
bitmap(file='test4.png')
op <- par(mfrow = c(2,2))
cpgram(as.numeric(x),main='Observed')
cpgram(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
cpgram(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
cpgram(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Classical Decomposition by Moving Averages',6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Observations',header=TRUE)
a<-table.element(a,'Fit',header=TRUE)
a<-table.element(a,'Trend',header=TRUE)
a<-table.element(a,'Seasonal',header=TRUE)
a<-table.element(a,'Random',header=TRUE)
a<-table.row.end(a)
for (i in 1:length(m$trend)) {
a<-table.row.start(a)
a<-table.element(a,i,header=TRUE)
a<-table.element(a,x[i])
if (par1 == 'additive') a<-table.element(a,signif(m$trend[i]+m$seasonal[i],6)) else a<-table.element(a,signif(m$trend[i]*m$seasonal[i],6))
a<-table.element(a,signif(m$trend[i],6))
a<-table.element(a,signif(m$seasonal[i],6))
a<-table.element(a,signif(m$random[i],6))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code