Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationFri, 04 Dec 2009 09:14:37 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Dec/04/t1259943417rydtkyokoul3v3g.htm/, Retrieved Sun, 28 Apr 2024 14:01:13 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=63841, Retrieved Sun, 28 Apr 2024 14:01:13 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact124
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       [Spectral Analysis] [Identifying Integ...] [2009-11-22 12:38:17] [b98453cac15ba1066b407e146608df68]
- R PD        [Spectral Analysis] [Spectrum d=1 en D=0] [2009-11-27 14:30:30] [74be16979710d4c4e7c6647856088456]
- RMPD            [Classical Decomposition] [workshop 9] [2009-12-04 16:14:37] [aef022288383377281176d9807aba5bf] [Current]
Feedback Forum

Post a new message
Dataseries X:
102.86
102.55
102.28
102.26
102.57
103.08
102.76
102.51
102.87
103.14
103.12
103.16
102.48
102.57
102.88
102.63
102.38
101.69
101.96
102.19
101.87
101.6
101.63
101.22
101.21
101.49
101.64
101.66
101.77
101.82
101.78
101.28
101.29
101.37
101.12
101.51
102.24
102.94
103.09
103.46
103.64
104.39
104.15
105.21
105.8
105.91
105.39
105.46
104.72
103.14
102.63
102.32
101.93
100.62
100.6
99.63
98.9
98.32
99.22
98.81




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 2 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63841&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63841&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63841&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135







Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
1102.86NANA-0.0528125000000005NA
2102.55NANA-0.127812500000003NA
3102.28NANA-0.0314583333333284NA
4102.26NANA0.0176041666666732NA
5102.57NANA0.0209375000000035NA
6103.08NANA-0.193125000000004NA
7102.76102.6478125102.7475-0.0996874999999970.112187500000019
8102.51102.742291666667102.73250.00979166666666605-0.23229166666664
9102.87102.918333333333102.7583333333330.160000000000001-0.0483333333333178
10103.14103.001979166667102.798750.2032291666666610.138020833333329
11103.12102.825520833333102.806250.01927083333333830.294479166666662
12103.16102.814479166667102.7404166666670.07406249999999070.345520833333339
13102.48102.596354166667102.649166666667-0.0528125000000005-0.116354166666667
14102.57102.4746875102.6025-0.1278125000000030.0953125000000057
15102.88102.516041666667102.5475-0.03145833333332840.363958333333343
16102.63102.459270833333102.4416666666670.01760416666667320.170729166666675
17102.38102.336354166667102.3154166666670.02093750000000350.0436458333333434
18101.69101.979375102.1725-0.193125000000004-0.289374999999993
19101.96101.9390625102.03875-0.0996874999999970.0209375000000165
20102.19101.950625101.9408333333330.009791666666666050.239374999999995
21101.87102.004166666667101.8441666666670.160000000000001-0.134166666666644
22101.6101.9553125101.7520833333330.203229166666661-0.355312499999997
23101.63101.705520833333101.686250.0192708333333383-0.0755208333333286
24101.22101.7403125101.666250.0740624999999907-0.520312500000003
25101.21101.611354166667101.664166666667-0.0528125000000005-0.401354166666664
26101.49101.4909375101.61875-0.127812500000003-0.000937500000006253
27101.64101.525208333333101.556666666667-0.03145833333332840.114791666666662
28101.66101.540520833333101.5229166666670.01760416666667320.119479166666665
29101.77101.513020833333101.4920833333330.02093750000000350.256979166666667
30101.82101.289791666667101.482916666667-0.1931250000000040.530208333333334
31101.78101.438229166667101.537916666667-0.0996874999999970.341770833333342
32101.28101.651041666667101.641250.00979166666666605-0.37104166666667
33101.29101.922083333333101.7620833333330.160000000000001-0.632083333333327
34101.37102.100729166667101.89750.203229166666661-0.730729166666649
35101.12102.0696875102.0504166666670.0192708333333383-0.949687499999996
36101.51102.309479166667102.2354166666670.0740624999999907-0.799479166666671
37102.24102.3884375102.44125-0.0528125000000005-0.148437499999986
38102.94102.5759375102.70375-0.1278125000000030.364062500000017
39103.09103.023958333333103.055416666667-0.03145833333332840.0660416666666777
40103.46103.450104166667103.43250.01760416666667320.00989583333333144
41103.64103.820520833333103.7995833333330.0209375000000035-0.180520833333333
42104.39103.948958333333104.142083333333-0.1931250000000040.441041666666678
43104.15104.3103125104.41-0.099687499999997-0.160312500000003
44105.21104.531458333333104.5216666666670.009791666666666050.678541666666646
45105.8104.670833333333104.5108333333330.1600000000000011.12916666666666
46105.91104.647395833333104.4441666666670.2032291666666611.26260416666668
47105.39104.3446875104.3254166666670.01927083333333831.04531250000002
48105.46104.171145833333104.0970833333330.07406249999999071.28885416666667
49104.72103.739270833333103.792083333333-0.05281250000000050.980729166666677
50103.14103.283854166667103.411666666667-0.127812500000003-0.143854166666657
51102.63102.860208333333102.891666666667-0.0314583333333284-0.230208333333309
52102.32102.305520833333102.2879166666670.01760416666667320.0144791666666890
53101.93101.735520833333101.7145833333330.02093750000000350.194479166666682
54100.62100.987291666667101.180416666667-0.193125000000004-0.367291666666645
55100.6NANA-0.099687499999997NA
5699.63NANA0.00979166666666605NA
5798.9NANA0.160000000000001NA
5898.32NANA0.203229166666661NA
5999.22NANA0.0192708333333383NA
6098.81NANA0.0740624999999907NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 102.86 & NA & NA & -0.0528125000000005 & NA \tabularnewline
2 & 102.55 & NA & NA & -0.127812500000003 & NA \tabularnewline
3 & 102.28 & NA & NA & -0.0314583333333284 & NA \tabularnewline
4 & 102.26 & NA & NA & 0.0176041666666732 & NA \tabularnewline
5 & 102.57 & NA & NA & 0.0209375000000035 & NA \tabularnewline
6 & 103.08 & NA & NA & -0.193125000000004 & NA \tabularnewline
7 & 102.76 & 102.6478125 & 102.7475 & -0.099687499999997 & 0.112187500000019 \tabularnewline
8 & 102.51 & 102.742291666667 & 102.7325 & 0.00979166666666605 & -0.23229166666664 \tabularnewline
9 & 102.87 & 102.918333333333 & 102.758333333333 & 0.160000000000001 & -0.0483333333333178 \tabularnewline
10 & 103.14 & 103.001979166667 & 102.79875 & 0.203229166666661 & 0.138020833333329 \tabularnewline
11 & 103.12 & 102.825520833333 & 102.80625 & 0.0192708333333383 & 0.294479166666662 \tabularnewline
12 & 103.16 & 102.814479166667 & 102.740416666667 & 0.0740624999999907 & 0.345520833333339 \tabularnewline
13 & 102.48 & 102.596354166667 & 102.649166666667 & -0.0528125000000005 & -0.116354166666667 \tabularnewline
14 & 102.57 & 102.4746875 & 102.6025 & -0.127812500000003 & 0.0953125000000057 \tabularnewline
15 & 102.88 & 102.516041666667 & 102.5475 & -0.0314583333333284 & 0.363958333333343 \tabularnewline
16 & 102.63 & 102.459270833333 & 102.441666666667 & 0.0176041666666732 & 0.170729166666675 \tabularnewline
17 & 102.38 & 102.336354166667 & 102.315416666667 & 0.0209375000000035 & 0.0436458333333434 \tabularnewline
18 & 101.69 & 101.979375 & 102.1725 & -0.193125000000004 & -0.289374999999993 \tabularnewline
19 & 101.96 & 101.9390625 & 102.03875 & -0.099687499999997 & 0.0209375000000165 \tabularnewline
20 & 102.19 & 101.950625 & 101.940833333333 & 0.00979166666666605 & 0.239374999999995 \tabularnewline
21 & 101.87 & 102.004166666667 & 101.844166666667 & 0.160000000000001 & -0.134166666666644 \tabularnewline
22 & 101.6 & 101.9553125 & 101.752083333333 & 0.203229166666661 & -0.355312499999997 \tabularnewline
23 & 101.63 & 101.705520833333 & 101.68625 & 0.0192708333333383 & -0.0755208333333286 \tabularnewline
24 & 101.22 & 101.7403125 & 101.66625 & 0.0740624999999907 & -0.520312500000003 \tabularnewline
25 & 101.21 & 101.611354166667 & 101.664166666667 & -0.0528125000000005 & -0.401354166666664 \tabularnewline
26 & 101.49 & 101.4909375 & 101.61875 & -0.127812500000003 & -0.000937500000006253 \tabularnewline
27 & 101.64 & 101.525208333333 & 101.556666666667 & -0.0314583333333284 & 0.114791666666662 \tabularnewline
28 & 101.66 & 101.540520833333 & 101.522916666667 & 0.0176041666666732 & 0.119479166666665 \tabularnewline
29 & 101.77 & 101.513020833333 & 101.492083333333 & 0.0209375000000035 & 0.256979166666667 \tabularnewline
30 & 101.82 & 101.289791666667 & 101.482916666667 & -0.193125000000004 & 0.530208333333334 \tabularnewline
31 & 101.78 & 101.438229166667 & 101.537916666667 & -0.099687499999997 & 0.341770833333342 \tabularnewline
32 & 101.28 & 101.651041666667 & 101.64125 & 0.00979166666666605 & -0.37104166666667 \tabularnewline
33 & 101.29 & 101.922083333333 & 101.762083333333 & 0.160000000000001 & -0.632083333333327 \tabularnewline
34 & 101.37 & 102.100729166667 & 101.8975 & 0.203229166666661 & -0.730729166666649 \tabularnewline
35 & 101.12 & 102.0696875 & 102.050416666667 & 0.0192708333333383 & -0.949687499999996 \tabularnewline
36 & 101.51 & 102.309479166667 & 102.235416666667 & 0.0740624999999907 & -0.799479166666671 \tabularnewline
37 & 102.24 & 102.3884375 & 102.44125 & -0.0528125000000005 & -0.148437499999986 \tabularnewline
38 & 102.94 & 102.5759375 & 102.70375 & -0.127812500000003 & 0.364062500000017 \tabularnewline
39 & 103.09 & 103.023958333333 & 103.055416666667 & -0.0314583333333284 & 0.0660416666666777 \tabularnewline
40 & 103.46 & 103.450104166667 & 103.4325 & 0.0176041666666732 & 0.00989583333333144 \tabularnewline
41 & 103.64 & 103.820520833333 & 103.799583333333 & 0.0209375000000035 & -0.180520833333333 \tabularnewline
42 & 104.39 & 103.948958333333 & 104.142083333333 & -0.193125000000004 & 0.441041666666678 \tabularnewline
43 & 104.15 & 104.3103125 & 104.41 & -0.099687499999997 & -0.160312500000003 \tabularnewline
44 & 105.21 & 104.531458333333 & 104.521666666667 & 0.00979166666666605 & 0.678541666666646 \tabularnewline
45 & 105.8 & 104.670833333333 & 104.510833333333 & 0.160000000000001 & 1.12916666666666 \tabularnewline
46 & 105.91 & 104.647395833333 & 104.444166666667 & 0.203229166666661 & 1.26260416666668 \tabularnewline
47 & 105.39 & 104.3446875 & 104.325416666667 & 0.0192708333333383 & 1.04531250000002 \tabularnewline
48 & 105.46 & 104.171145833333 & 104.097083333333 & 0.0740624999999907 & 1.28885416666667 \tabularnewline
49 & 104.72 & 103.739270833333 & 103.792083333333 & -0.0528125000000005 & 0.980729166666677 \tabularnewline
50 & 103.14 & 103.283854166667 & 103.411666666667 & -0.127812500000003 & -0.143854166666657 \tabularnewline
51 & 102.63 & 102.860208333333 & 102.891666666667 & -0.0314583333333284 & -0.230208333333309 \tabularnewline
52 & 102.32 & 102.305520833333 & 102.287916666667 & 0.0176041666666732 & 0.0144791666666890 \tabularnewline
53 & 101.93 & 101.735520833333 & 101.714583333333 & 0.0209375000000035 & 0.194479166666682 \tabularnewline
54 & 100.62 & 100.987291666667 & 101.180416666667 & -0.193125000000004 & -0.367291666666645 \tabularnewline
55 & 100.6 & NA & NA & -0.099687499999997 & NA \tabularnewline
56 & 99.63 & NA & NA & 0.00979166666666605 & NA \tabularnewline
57 & 98.9 & NA & NA & 0.160000000000001 & NA \tabularnewline
58 & 98.32 & NA & NA & 0.203229166666661 & NA \tabularnewline
59 & 99.22 & NA & NA & 0.0192708333333383 & NA \tabularnewline
60 & 98.81 & NA & NA & 0.0740624999999907 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63841&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]102.86[/C][C]NA[/C][C]NA[/C][C]-0.0528125000000005[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]102.55[/C][C]NA[/C][C]NA[/C][C]-0.127812500000003[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]102.28[/C][C]NA[/C][C]NA[/C][C]-0.0314583333333284[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]102.26[/C][C]NA[/C][C]NA[/C][C]0.0176041666666732[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]102.57[/C][C]NA[/C][C]NA[/C][C]0.0209375000000035[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]103.08[/C][C]NA[/C][C]NA[/C][C]-0.193125000000004[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]102.76[/C][C]102.6478125[/C][C]102.7475[/C][C]-0.099687499999997[/C][C]0.112187500000019[/C][/ROW]
[ROW][C]8[/C][C]102.51[/C][C]102.742291666667[/C][C]102.7325[/C][C]0.00979166666666605[/C][C]-0.23229166666664[/C][/ROW]
[ROW][C]9[/C][C]102.87[/C][C]102.918333333333[/C][C]102.758333333333[/C][C]0.160000000000001[/C][C]-0.0483333333333178[/C][/ROW]
[ROW][C]10[/C][C]103.14[/C][C]103.001979166667[/C][C]102.79875[/C][C]0.203229166666661[/C][C]0.138020833333329[/C][/ROW]
[ROW][C]11[/C][C]103.12[/C][C]102.825520833333[/C][C]102.80625[/C][C]0.0192708333333383[/C][C]0.294479166666662[/C][/ROW]
[ROW][C]12[/C][C]103.16[/C][C]102.814479166667[/C][C]102.740416666667[/C][C]0.0740624999999907[/C][C]0.345520833333339[/C][/ROW]
[ROW][C]13[/C][C]102.48[/C][C]102.596354166667[/C][C]102.649166666667[/C][C]-0.0528125000000005[/C][C]-0.116354166666667[/C][/ROW]
[ROW][C]14[/C][C]102.57[/C][C]102.4746875[/C][C]102.6025[/C][C]-0.127812500000003[/C][C]0.0953125000000057[/C][/ROW]
[ROW][C]15[/C][C]102.88[/C][C]102.516041666667[/C][C]102.5475[/C][C]-0.0314583333333284[/C][C]0.363958333333343[/C][/ROW]
[ROW][C]16[/C][C]102.63[/C][C]102.459270833333[/C][C]102.441666666667[/C][C]0.0176041666666732[/C][C]0.170729166666675[/C][/ROW]
[ROW][C]17[/C][C]102.38[/C][C]102.336354166667[/C][C]102.315416666667[/C][C]0.0209375000000035[/C][C]0.0436458333333434[/C][/ROW]
[ROW][C]18[/C][C]101.69[/C][C]101.979375[/C][C]102.1725[/C][C]-0.193125000000004[/C][C]-0.289374999999993[/C][/ROW]
[ROW][C]19[/C][C]101.96[/C][C]101.9390625[/C][C]102.03875[/C][C]-0.099687499999997[/C][C]0.0209375000000165[/C][/ROW]
[ROW][C]20[/C][C]102.19[/C][C]101.950625[/C][C]101.940833333333[/C][C]0.00979166666666605[/C][C]0.239374999999995[/C][/ROW]
[ROW][C]21[/C][C]101.87[/C][C]102.004166666667[/C][C]101.844166666667[/C][C]0.160000000000001[/C][C]-0.134166666666644[/C][/ROW]
[ROW][C]22[/C][C]101.6[/C][C]101.9553125[/C][C]101.752083333333[/C][C]0.203229166666661[/C][C]-0.355312499999997[/C][/ROW]
[ROW][C]23[/C][C]101.63[/C][C]101.705520833333[/C][C]101.68625[/C][C]0.0192708333333383[/C][C]-0.0755208333333286[/C][/ROW]
[ROW][C]24[/C][C]101.22[/C][C]101.7403125[/C][C]101.66625[/C][C]0.0740624999999907[/C][C]-0.520312500000003[/C][/ROW]
[ROW][C]25[/C][C]101.21[/C][C]101.611354166667[/C][C]101.664166666667[/C][C]-0.0528125000000005[/C][C]-0.401354166666664[/C][/ROW]
[ROW][C]26[/C][C]101.49[/C][C]101.4909375[/C][C]101.61875[/C][C]-0.127812500000003[/C][C]-0.000937500000006253[/C][/ROW]
[ROW][C]27[/C][C]101.64[/C][C]101.525208333333[/C][C]101.556666666667[/C][C]-0.0314583333333284[/C][C]0.114791666666662[/C][/ROW]
[ROW][C]28[/C][C]101.66[/C][C]101.540520833333[/C][C]101.522916666667[/C][C]0.0176041666666732[/C][C]0.119479166666665[/C][/ROW]
[ROW][C]29[/C][C]101.77[/C][C]101.513020833333[/C][C]101.492083333333[/C][C]0.0209375000000035[/C][C]0.256979166666667[/C][/ROW]
[ROW][C]30[/C][C]101.82[/C][C]101.289791666667[/C][C]101.482916666667[/C][C]-0.193125000000004[/C][C]0.530208333333334[/C][/ROW]
[ROW][C]31[/C][C]101.78[/C][C]101.438229166667[/C][C]101.537916666667[/C][C]-0.099687499999997[/C][C]0.341770833333342[/C][/ROW]
[ROW][C]32[/C][C]101.28[/C][C]101.651041666667[/C][C]101.64125[/C][C]0.00979166666666605[/C][C]-0.37104166666667[/C][/ROW]
[ROW][C]33[/C][C]101.29[/C][C]101.922083333333[/C][C]101.762083333333[/C][C]0.160000000000001[/C][C]-0.632083333333327[/C][/ROW]
[ROW][C]34[/C][C]101.37[/C][C]102.100729166667[/C][C]101.8975[/C][C]0.203229166666661[/C][C]-0.730729166666649[/C][/ROW]
[ROW][C]35[/C][C]101.12[/C][C]102.0696875[/C][C]102.050416666667[/C][C]0.0192708333333383[/C][C]-0.949687499999996[/C][/ROW]
[ROW][C]36[/C][C]101.51[/C][C]102.309479166667[/C][C]102.235416666667[/C][C]0.0740624999999907[/C][C]-0.799479166666671[/C][/ROW]
[ROW][C]37[/C][C]102.24[/C][C]102.3884375[/C][C]102.44125[/C][C]-0.0528125000000005[/C][C]-0.148437499999986[/C][/ROW]
[ROW][C]38[/C][C]102.94[/C][C]102.5759375[/C][C]102.70375[/C][C]-0.127812500000003[/C][C]0.364062500000017[/C][/ROW]
[ROW][C]39[/C][C]103.09[/C][C]103.023958333333[/C][C]103.055416666667[/C][C]-0.0314583333333284[/C][C]0.0660416666666777[/C][/ROW]
[ROW][C]40[/C][C]103.46[/C][C]103.450104166667[/C][C]103.4325[/C][C]0.0176041666666732[/C][C]0.00989583333333144[/C][/ROW]
[ROW][C]41[/C][C]103.64[/C][C]103.820520833333[/C][C]103.799583333333[/C][C]0.0209375000000035[/C][C]-0.180520833333333[/C][/ROW]
[ROW][C]42[/C][C]104.39[/C][C]103.948958333333[/C][C]104.142083333333[/C][C]-0.193125000000004[/C][C]0.441041666666678[/C][/ROW]
[ROW][C]43[/C][C]104.15[/C][C]104.3103125[/C][C]104.41[/C][C]-0.099687499999997[/C][C]-0.160312500000003[/C][/ROW]
[ROW][C]44[/C][C]105.21[/C][C]104.531458333333[/C][C]104.521666666667[/C][C]0.00979166666666605[/C][C]0.678541666666646[/C][/ROW]
[ROW][C]45[/C][C]105.8[/C][C]104.670833333333[/C][C]104.510833333333[/C][C]0.160000000000001[/C][C]1.12916666666666[/C][/ROW]
[ROW][C]46[/C][C]105.91[/C][C]104.647395833333[/C][C]104.444166666667[/C][C]0.203229166666661[/C][C]1.26260416666668[/C][/ROW]
[ROW][C]47[/C][C]105.39[/C][C]104.3446875[/C][C]104.325416666667[/C][C]0.0192708333333383[/C][C]1.04531250000002[/C][/ROW]
[ROW][C]48[/C][C]105.46[/C][C]104.171145833333[/C][C]104.097083333333[/C][C]0.0740624999999907[/C][C]1.28885416666667[/C][/ROW]
[ROW][C]49[/C][C]104.72[/C][C]103.739270833333[/C][C]103.792083333333[/C][C]-0.0528125000000005[/C][C]0.980729166666677[/C][/ROW]
[ROW][C]50[/C][C]103.14[/C][C]103.283854166667[/C][C]103.411666666667[/C][C]-0.127812500000003[/C][C]-0.143854166666657[/C][/ROW]
[ROW][C]51[/C][C]102.63[/C][C]102.860208333333[/C][C]102.891666666667[/C][C]-0.0314583333333284[/C][C]-0.230208333333309[/C][/ROW]
[ROW][C]52[/C][C]102.32[/C][C]102.305520833333[/C][C]102.287916666667[/C][C]0.0176041666666732[/C][C]0.0144791666666890[/C][/ROW]
[ROW][C]53[/C][C]101.93[/C][C]101.735520833333[/C][C]101.714583333333[/C][C]0.0209375000000035[/C][C]0.194479166666682[/C][/ROW]
[ROW][C]54[/C][C]100.62[/C][C]100.987291666667[/C][C]101.180416666667[/C][C]-0.193125000000004[/C][C]-0.367291666666645[/C][/ROW]
[ROW][C]55[/C][C]100.6[/C][C]NA[/C][C]NA[/C][C]-0.099687499999997[/C][C]NA[/C][/ROW]
[ROW][C]56[/C][C]99.63[/C][C]NA[/C][C]NA[/C][C]0.00979166666666605[/C][C]NA[/C][/ROW]
[ROW][C]57[/C][C]98.9[/C][C]NA[/C][C]NA[/C][C]0.160000000000001[/C][C]NA[/C][/ROW]
[ROW][C]58[/C][C]98.32[/C][C]NA[/C][C]NA[/C][C]0.203229166666661[/C][C]NA[/C][/ROW]
[ROW][C]59[/C][C]99.22[/C][C]NA[/C][C]NA[/C][C]0.0192708333333383[/C][C]NA[/C][/ROW]
[ROW][C]60[/C][C]98.81[/C][C]NA[/C][C]NA[/C][C]0.0740624999999907[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63841&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=63841&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
tObservationsFitTrendSeasonalRandom
1102.86NANA-0.0528125000000005NA
2102.55NANA-0.127812500000003NA
3102.28NANA-0.0314583333333284NA
4102.26NANA0.0176041666666732NA
5102.57NANA0.0209375000000035NA
6103.08NANA-0.193125000000004NA
7102.76102.6478125102.7475-0.0996874999999970.112187500000019
8102.51102.742291666667102.73250.00979166666666605-0.23229166666664
9102.87102.918333333333102.7583333333330.160000000000001-0.0483333333333178
10103.14103.001979166667102.798750.2032291666666610.138020833333329
11103.12102.825520833333102.806250.01927083333333830.294479166666662
12103.16102.814479166667102.7404166666670.07406249999999070.345520833333339
13102.48102.596354166667102.649166666667-0.0528125000000005-0.116354166666667
14102.57102.4746875102.6025-0.1278125000000030.0953125000000057
15102.88102.516041666667102.5475-0.03145833333332840.363958333333343
16102.63102.459270833333102.4416666666670.01760416666667320.170729166666675
17102.38102.336354166667102.3154166666670.02093750000000350.0436458333333434
18101.69101.979375102.1725-0.193125000000004-0.289374999999993
19101.96101.9390625102.03875-0.0996874999999970.0209375000000165
20102.19101.950625101.9408333333330.009791666666666050.239374999999995
21101.87102.004166666667101.8441666666670.160000000000001-0.134166666666644
22101.6101.9553125101.7520833333330.203229166666661-0.355312499999997
23101.63101.705520833333101.686250.0192708333333383-0.0755208333333286
24101.22101.7403125101.666250.0740624999999907-0.520312500000003
25101.21101.611354166667101.664166666667-0.0528125000000005-0.401354166666664
26101.49101.4909375101.61875-0.127812500000003-0.000937500000006253
27101.64101.525208333333101.556666666667-0.03145833333332840.114791666666662
28101.66101.540520833333101.5229166666670.01760416666667320.119479166666665
29101.77101.513020833333101.4920833333330.02093750000000350.256979166666667
30101.82101.289791666667101.482916666667-0.1931250000000040.530208333333334
31101.78101.438229166667101.537916666667-0.0996874999999970.341770833333342
32101.28101.651041666667101.641250.00979166666666605-0.37104166666667
33101.29101.922083333333101.7620833333330.160000000000001-0.632083333333327
34101.37102.100729166667101.89750.203229166666661-0.730729166666649
35101.12102.0696875102.0504166666670.0192708333333383-0.949687499999996
36101.51102.309479166667102.2354166666670.0740624999999907-0.799479166666671
37102.24102.3884375102.44125-0.0528125000000005-0.148437499999986
38102.94102.5759375102.70375-0.1278125000000030.364062500000017
39103.09103.023958333333103.055416666667-0.03145833333332840.0660416666666777
40103.46103.450104166667103.43250.01760416666667320.00989583333333144
41103.64103.820520833333103.7995833333330.0209375000000035-0.180520833333333
42104.39103.948958333333104.142083333333-0.1931250000000040.441041666666678
43104.15104.3103125104.41-0.099687499999997-0.160312500000003
44105.21104.531458333333104.5216666666670.009791666666666050.678541666666646
45105.8104.670833333333104.5108333333330.1600000000000011.12916666666666
46105.91104.647395833333104.4441666666670.2032291666666611.26260416666668
47105.39104.3446875104.3254166666670.01927083333333831.04531250000002
48105.46104.171145833333104.0970833333330.07406249999999071.28885416666667
49104.72103.739270833333103.792083333333-0.05281250000000050.980729166666677
50103.14103.283854166667103.411666666667-0.127812500000003-0.143854166666657
51102.63102.860208333333102.891666666667-0.0314583333333284-0.230208333333309
52102.32102.305520833333102.2879166666670.01760416666667320.0144791666666890
53101.93101.735520833333101.7145833333330.02093750000000350.194479166666682
54100.62100.987291666667101.180416666667-0.193125000000004-0.367291666666645
55100.6NANA-0.099687499999997NA
5699.63NANA0.00979166666666605NA
5798.9NANA0.160000000000001NA
5898.32NANA0.203229166666661NA
5999.22NANA0.0192708333333383NA
6098.81NANA0.0740624999999907NA



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,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')