Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationThu, 15 Jan 2009 15:26:39 -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/Jan/15/t1232058578lv53lhg3o4mbdqx.htm/, Retrieved Tue, 07 May 2024 20:06:00 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=36903, Retrieved Tue, 07 May 2024 20:06:00 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact231
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Harrell-Davis Quantiles] [Harrel davis deci...] [2008-10-18 16:19:32] [ea79f99c5895b39ae8bb6e8c563d0f54]
-   PD  [Harrell-Davis Quantiles] [Harrel davis deci...] [2008-10-18 17:17:36] [ea79f99c5895b39ae8bb6e8c563d0f54]
- RMPD    [(Partial) Autocorrelation Function] [OEF 2 deel 1 De L...] [2008-12-11 08:24:21] [ea79f99c5895b39ae8bb6e8c563d0f54]
- RMP       [Bootstrap Plot - Central Tendency] [Oef 2 opg. 7 De L...] [2008-12-18 22:45:41] [ea79f99c5895b39ae8bb6e8c563d0f54]
- RMP         [Blocked Bootstrap Plot - Central Tendency] [VERbetering Block...] [2009-01-04 16:07:05] [ea79f99c5895b39ae8bb6e8c563d0f54]
- RMP           [Variability] [SDL OPG 8 OEF3 va...] [2009-01-06 10:22:38] [ea79f99c5895b39ae8bb6e8c563d0f54]
- RMP               [Classical Decomposition] [SDL OPG 9 OEF2] [2009-01-15 22:26:39] [d41d8cd98f00b204e9800998ecf8427e] [Current]
- RMP                 [Exponential Smoothing] [SDL OPG 10 OEF2] [2009-01-17 11:19:26] [74be16979710d4c4e7c6647856088456]
Feedback Forum

Post a new message
Dataseries X:
102.9
102.9
102.9
102.9
104.2
104.7
104.7
104.7
104.7
104.7
104.7
104.7
104.7
104.7
104.7
104.7
106
107
107
107
107
107
107
107
107
107
107
107
107.6
109.9
109.9
109.9
109.9
109.9
109.9
109.9
109.9
109.9
109.9
109.9
110.6
114.3
114.3
114.3
114.3
114.3
114.3
114.3
114.3
114.3
114.3
114.3
114.3
119.01
119.01
119.01
119.01
119.01
119.01
119.01
119.01
119.01
119.01
119.01
121.27
123.54
123.54
123.54
123.54
123.54
123.54
123.54
123.54
123.54
123.54
123.54
123.54
125.24
125.24
125.24
125.24
125.24
125.24
125.24
125.24
125.24
125.24
125.24
125.24
128.35
128.35
128.35
128.35
128.35
128.35
128.35




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=36903&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=36903&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=36903&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.9NANA-0.458129960317457NA
2102.9NANA-0.73967757936508NA
3102.9NANA-1.02122519841270NA
4102.9NANA-1.30277281746032NA
5104.2NANA-0.890034722222228NA
6104.7NANA1.51270337301587NA
7104.7105.278834325397104.1333333333331.14550099206349-0.578834325396826
8104.7105.162881944444104.2833333333330.879548611111114-0.462881944444447
9104.7105.046929563492104.4333333333330.613596230158731-0.346929563492054
10104.7104.930977182540104.5833333333330.347643849206353-0.230977182539661
11104.7104.822762896825104.7333333333330.0894295634920622-0.122762896825378
12104.7104.727584325397104.904166666667-0.176582341269842-0.027584325396802
13104.7104.637703373016105.095833333333-0.4581299603174570.0622966269841498
14104.7104.547822420635105.2875-0.739677579365080.152177579365116
15104.7104.457941468254105.479166666667-1.021225198412700.242058531746068
16104.7104.368060515873105.670833333333-1.302772817460320.331939484127020
17106104.972465277778105.8625-0.8900347222222281.02753472222227
18107107.566870039682106.0541666666671.51270337301587-0.566870039682499
19107107.391334325397106.2458333333331.14550099206349-0.391334325396784
20107107.317048611111106.43750.879548611111114-0.317048611111090
21107107.242762896825106.6291666666670.613596230158731-0.242762896825383
22107107.168477182540106.8208333333330.347643849206353-0.168477182539675
23107107.072762896825106.9833333333330.0894295634920622-0.0727628968254095
24107106.994250992063107.170833333333-0.1765823412698420.00574900793650102
25107106.954370039683107.4125-0.4581299603174570.0456299603174415
26107106.914489087302107.654166666667-0.739677579365080.0855109126983962
27107106.874608134921107.895833333333-1.021225198412700.125391865079351
28107106.834727182540108.1375-1.302772817460320.165272817460320
29107.6107.489131944444108.379166666667-0.8900347222222280.110868055555542
30109.9110.133536706349108.6208333333331.51270337301587-0.233536706349199
31109.9110.008000992064108.86251.14550099206349-0.108000992063495
32109.9109.983715277778109.1041666666670.879548611111114-0.0837152777777845
33109.9109.959429563492109.3458333333330.613596230158731-0.0594295634920599
34109.9109.935143849206109.58750.347643849206353-0.0351438492063352
35109.9109.922762896825109.8333333333330.0894295634920622-0.0227628968253697
36109.9109.965084325397110.141666666667-0.176582341269842-0.0650843253968105
37109.9110.050203373016110.508333333333-0.458129960317457-0.150203373015856
38109.9110.135322420635110.875-0.73967757936508-0.235322420634901
39109.9110.220441468254111.241666666667-1.02122519841270-0.320441468253946
40109.9110.305560515873111.608333333333-1.30277281746032-0.405560515872978
41110.6111.084965277778111.975-0.890034722222228-0.484965277777761
42114.3113.854370039683112.3416666666671.512703373015870.44562996031749
43114.3113.853834325397112.7083333333331.145500992063490.446165674603193
44114.3113.954548611111113.0750.8795486111111140.345451388888904
45114.3114.055262896825113.4416666666670.6135962301587310.244737103174614
46114.3114.155977182540113.8083333333330.3476438492063530.144022817460325
47114.3114.235262896825114.1458333333330.08942956349206220.0647371031746076
48114.3114.319667658730114.49625-0.176582341269842-0.0196676587301852
49114.3114.430620039683114.88875-0.458129960317457-0.130620039682555
50114.3114.541572420635115.28125-0.73967757936508-0.241572420634938
51114.3114.652524801587115.67375-1.02122519841270-0.352524801587336
52114.3114.763477182540116.06625-1.30277281746032-0.463477182539719
53114.3115.568715277778116.45875-0.890034722222228-1.26871527777783
54119.01118.363953373016116.851251.512703373015870.646046626984102
55119.01118.389250992064117.243751.145500992063490.620749007936467
56119.01118.515798611111117.636250.8795486111111140.494201388888854
57119.01118.642346230159118.028750.6135962301587310.367653769841226
58119.01118.768893849206118.421250.3476438492063530.241106150793627
59119.01118.997346230159118.9079166666670.08942956349206220.0126537698412363
60119.01119.210500992064119.387083333333-0.176582341269842-0.200500992063525
61119.01119.306453373016119.764583333333-0.458129960317457-0.296453373015908
62119.01119.402405753968120.142083333333-0.73967757936508-0.392405753968276
63119.01119.498358134921120.519583333333-1.02122519841270-0.488358134920659
64119.01119.594310515873120.897083333333-1.30277281746032-0.584310515873028
65121.27120.384548611111121.274583333333-0.8900347222222280.885451388888868
66123.54123.164786706349121.6520833333331.512703373015870.375213293650788
67123.54123.175084325397122.0295833333331.145500992063490.364915674603168
68123.54123.286631944444122.4070833333330.8795486111111140.253368055555541
69123.54123.398179563492122.7845833333330.6135962301587310.141820436507928
70123.54123.509727182540123.1620833333330.3476438492063530.0302728174603146
71123.54123.534846230159123.4454166666670.08942956349206220.00515376984127158
72123.54123.434250992063123.610833333333-0.1765823412698420.105749007936510
73123.54123.294370039683123.7525-0.4581299603174570.245629960317459
74123.54123.154489087302123.894166666667-0.739677579365080.385510912698422
75123.54123.014608134921124.035833333333-1.021225198412700.525391865079371
76123.54122.874727182540124.1775-1.302772817460320.665272817460334
77123.54123.429131944444124.319166666667-0.8900347222222280.110868055555571
78125.24125.973536706349124.4608333333331.51270337301587-0.733536706349199
79125.24125.748000992063124.60251.14550099206349-0.508000992063486
80125.24125.623715277778124.7441666666670.879548611111114-0.383715277777782
81125.24125.499429563492124.8858333333330.613596230158731-0.259429563492063
82125.24125.375143849206125.02750.347643849206353-0.135143849206344
83125.24125.258596230159125.1691666666670.0894295634920622-0.0185962301587210
84125.24125.193000992064125.369583333333-0.1765823412698420.0469990079364919
85125.24125.170620039683125.62875-0.4581299603174570.0693799603174483
86125.24125.148239087302125.887916666667-0.739677579365080.0917609126984047
87125.24125.125858134921126.147083333333-1.021225198412700.114141865079347
88125.24125.103477182540126.40625-1.302772817460320.136522817460317
89125.24125.775381944444126.665416666667-0.890034722222228-0.535381944444453
90128.35128.437286706349126.9245833333331.51270337301587-0.087286706349218
91128.35NANA1.14550099206349NA
92128.35NANA0.879548611111114NA
93128.35NANA0.613596230158731NA
94128.35NANA0.347643849206353NA
95128.35NANA0.0894295634920622NA
96128.35NANA-0.176582341269842NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 102.9 & NA & NA & -0.458129960317457 & NA \tabularnewline
2 & 102.9 & NA & NA & -0.73967757936508 & NA \tabularnewline
3 & 102.9 & NA & NA & -1.02122519841270 & NA \tabularnewline
4 & 102.9 & NA & NA & -1.30277281746032 & NA \tabularnewline
5 & 104.2 & NA & NA & -0.890034722222228 & NA \tabularnewline
6 & 104.7 & NA & NA & 1.51270337301587 & NA \tabularnewline
7 & 104.7 & 105.278834325397 & 104.133333333333 & 1.14550099206349 & -0.578834325396826 \tabularnewline
8 & 104.7 & 105.162881944444 & 104.283333333333 & 0.879548611111114 & -0.462881944444447 \tabularnewline
9 & 104.7 & 105.046929563492 & 104.433333333333 & 0.613596230158731 & -0.346929563492054 \tabularnewline
10 & 104.7 & 104.930977182540 & 104.583333333333 & 0.347643849206353 & -0.230977182539661 \tabularnewline
11 & 104.7 & 104.822762896825 & 104.733333333333 & 0.0894295634920622 & -0.122762896825378 \tabularnewline
12 & 104.7 & 104.727584325397 & 104.904166666667 & -0.176582341269842 & -0.027584325396802 \tabularnewline
13 & 104.7 & 104.637703373016 & 105.095833333333 & -0.458129960317457 & 0.0622966269841498 \tabularnewline
14 & 104.7 & 104.547822420635 & 105.2875 & -0.73967757936508 & 0.152177579365116 \tabularnewline
15 & 104.7 & 104.457941468254 & 105.479166666667 & -1.02122519841270 & 0.242058531746068 \tabularnewline
16 & 104.7 & 104.368060515873 & 105.670833333333 & -1.30277281746032 & 0.331939484127020 \tabularnewline
17 & 106 & 104.972465277778 & 105.8625 & -0.890034722222228 & 1.02753472222227 \tabularnewline
18 & 107 & 107.566870039682 & 106.054166666667 & 1.51270337301587 & -0.566870039682499 \tabularnewline
19 & 107 & 107.391334325397 & 106.245833333333 & 1.14550099206349 & -0.391334325396784 \tabularnewline
20 & 107 & 107.317048611111 & 106.4375 & 0.879548611111114 & -0.317048611111090 \tabularnewline
21 & 107 & 107.242762896825 & 106.629166666667 & 0.613596230158731 & -0.242762896825383 \tabularnewline
22 & 107 & 107.168477182540 & 106.820833333333 & 0.347643849206353 & -0.168477182539675 \tabularnewline
23 & 107 & 107.072762896825 & 106.983333333333 & 0.0894295634920622 & -0.0727628968254095 \tabularnewline
24 & 107 & 106.994250992063 & 107.170833333333 & -0.176582341269842 & 0.00574900793650102 \tabularnewline
25 & 107 & 106.954370039683 & 107.4125 & -0.458129960317457 & 0.0456299603174415 \tabularnewline
26 & 107 & 106.914489087302 & 107.654166666667 & -0.73967757936508 & 0.0855109126983962 \tabularnewline
27 & 107 & 106.874608134921 & 107.895833333333 & -1.02122519841270 & 0.125391865079351 \tabularnewline
28 & 107 & 106.834727182540 & 108.1375 & -1.30277281746032 & 0.165272817460320 \tabularnewline
29 & 107.6 & 107.489131944444 & 108.379166666667 & -0.890034722222228 & 0.110868055555542 \tabularnewline
30 & 109.9 & 110.133536706349 & 108.620833333333 & 1.51270337301587 & -0.233536706349199 \tabularnewline
31 & 109.9 & 110.008000992064 & 108.8625 & 1.14550099206349 & -0.108000992063495 \tabularnewline
32 & 109.9 & 109.983715277778 & 109.104166666667 & 0.879548611111114 & -0.0837152777777845 \tabularnewline
33 & 109.9 & 109.959429563492 & 109.345833333333 & 0.613596230158731 & -0.0594295634920599 \tabularnewline
34 & 109.9 & 109.935143849206 & 109.5875 & 0.347643849206353 & -0.0351438492063352 \tabularnewline
35 & 109.9 & 109.922762896825 & 109.833333333333 & 0.0894295634920622 & -0.0227628968253697 \tabularnewline
36 & 109.9 & 109.965084325397 & 110.141666666667 & -0.176582341269842 & -0.0650843253968105 \tabularnewline
37 & 109.9 & 110.050203373016 & 110.508333333333 & -0.458129960317457 & -0.150203373015856 \tabularnewline
38 & 109.9 & 110.135322420635 & 110.875 & -0.73967757936508 & -0.235322420634901 \tabularnewline
39 & 109.9 & 110.220441468254 & 111.241666666667 & -1.02122519841270 & -0.320441468253946 \tabularnewline
40 & 109.9 & 110.305560515873 & 111.608333333333 & -1.30277281746032 & -0.405560515872978 \tabularnewline
41 & 110.6 & 111.084965277778 & 111.975 & -0.890034722222228 & -0.484965277777761 \tabularnewline
42 & 114.3 & 113.854370039683 & 112.341666666667 & 1.51270337301587 & 0.44562996031749 \tabularnewline
43 & 114.3 & 113.853834325397 & 112.708333333333 & 1.14550099206349 & 0.446165674603193 \tabularnewline
44 & 114.3 & 113.954548611111 & 113.075 & 0.879548611111114 & 0.345451388888904 \tabularnewline
45 & 114.3 & 114.055262896825 & 113.441666666667 & 0.613596230158731 & 0.244737103174614 \tabularnewline
46 & 114.3 & 114.155977182540 & 113.808333333333 & 0.347643849206353 & 0.144022817460325 \tabularnewline
47 & 114.3 & 114.235262896825 & 114.145833333333 & 0.0894295634920622 & 0.0647371031746076 \tabularnewline
48 & 114.3 & 114.319667658730 & 114.49625 & -0.176582341269842 & -0.0196676587301852 \tabularnewline
49 & 114.3 & 114.430620039683 & 114.88875 & -0.458129960317457 & -0.130620039682555 \tabularnewline
50 & 114.3 & 114.541572420635 & 115.28125 & -0.73967757936508 & -0.241572420634938 \tabularnewline
51 & 114.3 & 114.652524801587 & 115.67375 & -1.02122519841270 & -0.352524801587336 \tabularnewline
52 & 114.3 & 114.763477182540 & 116.06625 & -1.30277281746032 & -0.463477182539719 \tabularnewline
53 & 114.3 & 115.568715277778 & 116.45875 & -0.890034722222228 & -1.26871527777783 \tabularnewline
54 & 119.01 & 118.363953373016 & 116.85125 & 1.51270337301587 & 0.646046626984102 \tabularnewline
55 & 119.01 & 118.389250992064 & 117.24375 & 1.14550099206349 & 0.620749007936467 \tabularnewline
56 & 119.01 & 118.515798611111 & 117.63625 & 0.879548611111114 & 0.494201388888854 \tabularnewline
57 & 119.01 & 118.642346230159 & 118.02875 & 0.613596230158731 & 0.367653769841226 \tabularnewline
58 & 119.01 & 118.768893849206 & 118.42125 & 0.347643849206353 & 0.241106150793627 \tabularnewline
59 & 119.01 & 118.997346230159 & 118.907916666667 & 0.0894295634920622 & 0.0126537698412363 \tabularnewline
60 & 119.01 & 119.210500992064 & 119.387083333333 & -0.176582341269842 & -0.200500992063525 \tabularnewline
61 & 119.01 & 119.306453373016 & 119.764583333333 & -0.458129960317457 & -0.296453373015908 \tabularnewline
62 & 119.01 & 119.402405753968 & 120.142083333333 & -0.73967757936508 & -0.392405753968276 \tabularnewline
63 & 119.01 & 119.498358134921 & 120.519583333333 & -1.02122519841270 & -0.488358134920659 \tabularnewline
64 & 119.01 & 119.594310515873 & 120.897083333333 & -1.30277281746032 & -0.584310515873028 \tabularnewline
65 & 121.27 & 120.384548611111 & 121.274583333333 & -0.890034722222228 & 0.885451388888868 \tabularnewline
66 & 123.54 & 123.164786706349 & 121.652083333333 & 1.51270337301587 & 0.375213293650788 \tabularnewline
67 & 123.54 & 123.175084325397 & 122.029583333333 & 1.14550099206349 & 0.364915674603168 \tabularnewline
68 & 123.54 & 123.286631944444 & 122.407083333333 & 0.879548611111114 & 0.253368055555541 \tabularnewline
69 & 123.54 & 123.398179563492 & 122.784583333333 & 0.613596230158731 & 0.141820436507928 \tabularnewline
70 & 123.54 & 123.509727182540 & 123.162083333333 & 0.347643849206353 & 0.0302728174603146 \tabularnewline
71 & 123.54 & 123.534846230159 & 123.445416666667 & 0.0894295634920622 & 0.00515376984127158 \tabularnewline
72 & 123.54 & 123.434250992063 & 123.610833333333 & -0.176582341269842 & 0.105749007936510 \tabularnewline
73 & 123.54 & 123.294370039683 & 123.7525 & -0.458129960317457 & 0.245629960317459 \tabularnewline
74 & 123.54 & 123.154489087302 & 123.894166666667 & -0.73967757936508 & 0.385510912698422 \tabularnewline
75 & 123.54 & 123.014608134921 & 124.035833333333 & -1.02122519841270 & 0.525391865079371 \tabularnewline
76 & 123.54 & 122.874727182540 & 124.1775 & -1.30277281746032 & 0.665272817460334 \tabularnewline
77 & 123.54 & 123.429131944444 & 124.319166666667 & -0.890034722222228 & 0.110868055555571 \tabularnewline
78 & 125.24 & 125.973536706349 & 124.460833333333 & 1.51270337301587 & -0.733536706349199 \tabularnewline
79 & 125.24 & 125.748000992063 & 124.6025 & 1.14550099206349 & -0.508000992063486 \tabularnewline
80 & 125.24 & 125.623715277778 & 124.744166666667 & 0.879548611111114 & -0.383715277777782 \tabularnewline
81 & 125.24 & 125.499429563492 & 124.885833333333 & 0.613596230158731 & -0.259429563492063 \tabularnewline
82 & 125.24 & 125.375143849206 & 125.0275 & 0.347643849206353 & -0.135143849206344 \tabularnewline
83 & 125.24 & 125.258596230159 & 125.169166666667 & 0.0894295634920622 & -0.0185962301587210 \tabularnewline
84 & 125.24 & 125.193000992064 & 125.369583333333 & -0.176582341269842 & 0.0469990079364919 \tabularnewline
85 & 125.24 & 125.170620039683 & 125.62875 & -0.458129960317457 & 0.0693799603174483 \tabularnewline
86 & 125.24 & 125.148239087302 & 125.887916666667 & -0.73967757936508 & 0.0917609126984047 \tabularnewline
87 & 125.24 & 125.125858134921 & 126.147083333333 & -1.02122519841270 & 0.114141865079347 \tabularnewline
88 & 125.24 & 125.103477182540 & 126.40625 & -1.30277281746032 & 0.136522817460317 \tabularnewline
89 & 125.24 & 125.775381944444 & 126.665416666667 & -0.890034722222228 & -0.535381944444453 \tabularnewline
90 & 128.35 & 128.437286706349 & 126.924583333333 & 1.51270337301587 & -0.087286706349218 \tabularnewline
91 & 128.35 & NA & NA & 1.14550099206349 & NA \tabularnewline
92 & 128.35 & NA & NA & 0.879548611111114 & NA \tabularnewline
93 & 128.35 & NA & NA & 0.613596230158731 & NA \tabularnewline
94 & 128.35 & NA & NA & 0.347643849206353 & NA \tabularnewline
95 & 128.35 & NA & NA & 0.0894295634920622 & NA \tabularnewline
96 & 128.35 & NA & NA & -0.176582341269842 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=36903&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.9[/C][C]NA[/C][C]NA[/C][C]-0.458129960317457[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]102.9[/C][C]NA[/C][C]NA[/C][C]-0.73967757936508[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]102.9[/C][C]NA[/C][C]NA[/C][C]-1.02122519841270[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]102.9[/C][C]NA[/C][C]NA[/C][C]-1.30277281746032[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]104.2[/C][C]NA[/C][C]NA[/C][C]-0.890034722222228[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]104.7[/C][C]NA[/C][C]NA[/C][C]1.51270337301587[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]104.7[/C][C]105.278834325397[/C][C]104.133333333333[/C][C]1.14550099206349[/C][C]-0.578834325396826[/C][/ROW]
[ROW][C]8[/C][C]104.7[/C][C]105.162881944444[/C][C]104.283333333333[/C][C]0.879548611111114[/C][C]-0.462881944444447[/C][/ROW]
[ROW][C]9[/C][C]104.7[/C][C]105.046929563492[/C][C]104.433333333333[/C][C]0.613596230158731[/C][C]-0.346929563492054[/C][/ROW]
[ROW][C]10[/C][C]104.7[/C][C]104.930977182540[/C][C]104.583333333333[/C][C]0.347643849206353[/C][C]-0.230977182539661[/C][/ROW]
[ROW][C]11[/C][C]104.7[/C][C]104.822762896825[/C][C]104.733333333333[/C][C]0.0894295634920622[/C][C]-0.122762896825378[/C][/ROW]
[ROW][C]12[/C][C]104.7[/C][C]104.727584325397[/C][C]104.904166666667[/C][C]-0.176582341269842[/C][C]-0.027584325396802[/C][/ROW]
[ROW][C]13[/C][C]104.7[/C][C]104.637703373016[/C][C]105.095833333333[/C][C]-0.458129960317457[/C][C]0.0622966269841498[/C][/ROW]
[ROW][C]14[/C][C]104.7[/C][C]104.547822420635[/C][C]105.2875[/C][C]-0.73967757936508[/C][C]0.152177579365116[/C][/ROW]
[ROW][C]15[/C][C]104.7[/C][C]104.457941468254[/C][C]105.479166666667[/C][C]-1.02122519841270[/C][C]0.242058531746068[/C][/ROW]
[ROW][C]16[/C][C]104.7[/C][C]104.368060515873[/C][C]105.670833333333[/C][C]-1.30277281746032[/C][C]0.331939484127020[/C][/ROW]
[ROW][C]17[/C][C]106[/C][C]104.972465277778[/C][C]105.8625[/C][C]-0.890034722222228[/C][C]1.02753472222227[/C][/ROW]
[ROW][C]18[/C][C]107[/C][C]107.566870039682[/C][C]106.054166666667[/C][C]1.51270337301587[/C][C]-0.566870039682499[/C][/ROW]
[ROW][C]19[/C][C]107[/C][C]107.391334325397[/C][C]106.245833333333[/C][C]1.14550099206349[/C][C]-0.391334325396784[/C][/ROW]
[ROW][C]20[/C][C]107[/C][C]107.317048611111[/C][C]106.4375[/C][C]0.879548611111114[/C][C]-0.317048611111090[/C][/ROW]
[ROW][C]21[/C][C]107[/C][C]107.242762896825[/C][C]106.629166666667[/C][C]0.613596230158731[/C][C]-0.242762896825383[/C][/ROW]
[ROW][C]22[/C][C]107[/C][C]107.168477182540[/C][C]106.820833333333[/C][C]0.347643849206353[/C][C]-0.168477182539675[/C][/ROW]
[ROW][C]23[/C][C]107[/C][C]107.072762896825[/C][C]106.983333333333[/C][C]0.0894295634920622[/C][C]-0.0727628968254095[/C][/ROW]
[ROW][C]24[/C][C]107[/C][C]106.994250992063[/C][C]107.170833333333[/C][C]-0.176582341269842[/C][C]0.00574900793650102[/C][/ROW]
[ROW][C]25[/C][C]107[/C][C]106.954370039683[/C][C]107.4125[/C][C]-0.458129960317457[/C][C]0.0456299603174415[/C][/ROW]
[ROW][C]26[/C][C]107[/C][C]106.914489087302[/C][C]107.654166666667[/C][C]-0.73967757936508[/C][C]0.0855109126983962[/C][/ROW]
[ROW][C]27[/C][C]107[/C][C]106.874608134921[/C][C]107.895833333333[/C][C]-1.02122519841270[/C][C]0.125391865079351[/C][/ROW]
[ROW][C]28[/C][C]107[/C][C]106.834727182540[/C][C]108.1375[/C][C]-1.30277281746032[/C][C]0.165272817460320[/C][/ROW]
[ROW][C]29[/C][C]107.6[/C][C]107.489131944444[/C][C]108.379166666667[/C][C]-0.890034722222228[/C][C]0.110868055555542[/C][/ROW]
[ROW][C]30[/C][C]109.9[/C][C]110.133536706349[/C][C]108.620833333333[/C][C]1.51270337301587[/C][C]-0.233536706349199[/C][/ROW]
[ROW][C]31[/C][C]109.9[/C][C]110.008000992064[/C][C]108.8625[/C][C]1.14550099206349[/C][C]-0.108000992063495[/C][/ROW]
[ROW][C]32[/C][C]109.9[/C][C]109.983715277778[/C][C]109.104166666667[/C][C]0.879548611111114[/C][C]-0.0837152777777845[/C][/ROW]
[ROW][C]33[/C][C]109.9[/C][C]109.959429563492[/C][C]109.345833333333[/C][C]0.613596230158731[/C][C]-0.0594295634920599[/C][/ROW]
[ROW][C]34[/C][C]109.9[/C][C]109.935143849206[/C][C]109.5875[/C][C]0.347643849206353[/C][C]-0.0351438492063352[/C][/ROW]
[ROW][C]35[/C][C]109.9[/C][C]109.922762896825[/C][C]109.833333333333[/C][C]0.0894295634920622[/C][C]-0.0227628968253697[/C][/ROW]
[ROW][C]36[/C][C]109.9[/C][C]109.965084325397[/C][C]110.141666666667[/C][C]-0.176582341269842[/C][C]-0.0650843253968105[/C][/ROW]
[ROW][C]37[/C][C]109.9[/C][C]110.050203373016[/C][C]110.508333333333[/C][C]-0.458129960317457[/C][C]-0.150203373015856[/C][/ROW]
[ROW][C]38[/C][C]109.9[/C][C]110.135322420635[/C][C]110.875[/C][C]-0.73967757936508[/C][C]-0.235322420634901[/C][/ROW]
[ROW][C]39[/C][C]109.9[/C][C]110.220441468254[/C][C]111.241666666667[/C][C]-1.02122519841270[/C][C]-0.320441468253946[/C][/ROW]
[ROW][C]40[/C][C]109.9[/C][C]110.305560515873[/C][C]111.608333333333[/C][C]-1.30277281746032[/C][C]-0.405560515872978[/C][/ROW]
[ROW][C]41[/C][C]110.6[/C][C]111.084965277778[/C][C]111.975[/C][C]-0.890034722222228[/C][C]-0.484965277777761[/C][/ROW]
[ROW][C]42[/C][C]114.3[/C][C]113.854370039683[/C][C]112.341666666667[/C][C]1.51270337301587[/C][C]0.44562996031749[/C][/ROW]
[ROW][C]43[/C][C]114.3[/C][C]113.853834325397[/C][C]112.708333333333[/C][C]1.14550099206349[/C][C]0.446165674603193[/C][/ROW]
[ROW][C]44[/C][C]114.3[/C][C]113.954548611111[/C][C]113.075[/C][C]0.879548611111114[/C][C]0.345451388888904[/C][/ROW]
[ROW][C]45[/C][C]114.3[/C][C]114.055262896825[/C][C]113.441666666667[/C][C]0.613596230158731[/C][C]0.244737103174614[/C][/ROW]
[ROW][C]46[/C][C]114.3[/C][C]114.155977182540[/C][C]113.808333333333[/C][C]0.347643849206353[/C][C]0.144022817460325[/C][/ROW]
[ROW][C]47[/C][C]114.3[/C][C]114.235262896825[/C][C]114.145833333333[/C][C]0.0894295634920622[/C][C]0.0647371031746076[/C][/ROW]
[ROW][C]48[/C][C]114.3[/C][C]114.319667658730[/C][C]114.49625[/C][C]-0.176582341269842[/C][C]-0.0196676587301852[/C][/ROW]
[ROW][C]49[/C][C]114.3[/C][C]114.430620039683[/C][C]114.88875[/C][C]-0.458129960317457[/C][C]-0.130620039682555[/C][/ROW]
[ROW][C]50[/C][C]114.3[/C][C]114.541572420635[/C][C]115.28125[/C][C]-0.73967757936508[/C][C]-0.241572420634938[/C][/ROW]
[ROW][C]51[/C][C]114.3[/C][C]114.652524801587[/C][C]115.67375[/C][C]-1.02122519841270[/C][C]-0.352524801587336[/C][/ROW]
[ROW][C]52[/C][C]114.3[/C][C]114.763477182540[/C][C]116.06625[/C][C]-1.30277281746032[/C][C]-0.463477182539719[/C][/ROW]
[ROW][C]53[/C][C]114.3[/C][C]115.568715277778[/C][C]116.45875[/C][C]-0.890034722222228[/C][C]-1.26871527777783[/C][/ROW]
[ROW][C]54[/C][C]119.01[/C][C]118.363953373016[/C][C]116.85125[/C][C]1.51270337301587[/C][C]0.646046626984102[/C][/ROW]
[ROW][C]55[/C][C]119.01[/C][C]118.389250992064[/C][C]117.24375[/C][C]1.14550099206349[/C][C]0.620749007936467[/C][/ROW]
[ROW][C]56[/C][C]119.01[/C][C]118.515798611111[/C][C]117.63625[/C][C]0.879548611111114[/C][C]0.494201388888854[/C][/ROW]
[ROW][C]57[/C][C]119.01[/C][C]118.642346230159[/C][C]118.02875[/C][C]0.613596230158731[/C][C]0.367653769841226[/C][/ROW]
[ROW][C]58[/C][C]119.01[/C][C]118.768893849206[/C][C]118.42125[/C][C]0.347643849206353[/C][C]0.241106150793627[/C][/ROW]
[ROW][C]59[/C][C]119.01[/C][C]118.997346230159[/C][C]118.907916666667[/C][C]0.0894295634920622[/C][C]0.0126537698412363[/C][/ROW]
[ROW][C]60[/C][C]119.01[/C][C]119.210500992064[/C][C]119.387083333333[/C][C]-0.176582341269842[/C][C]-0.200500992063525[/C][/ROW]
[ROW][C]61[/C][C]119.01[/C][C]119.306453373016[/C][C]119.764583333333[/C][C]-0.458129960317457[/C][C]-0.296453373015908[/C][/ROW]
[ROW][C]62[/C][C]119.01[/C][C]119.402405753968[/C][C]120.142083333333[/C][C]-0.73967757936508[/C][C]-0.392405753968276[/C][/ROW]
[ROW][C]63[/C][C]119.01[/C][C]119.498358134921[/C][C]120.519583333333[/C][C]-1.02122519841270[/C][C]-0.488358134920659[/C][/ROW]
[ROW][C]64[/C][C]119.01[/C][C]119.594310515873[/C][C]120.897083333333[/C][C]-1.30277281746032[/C][C]-0.584310515873028[/C][/ROW]
[ROW][C]65[/C][C]121.27[/C][C]120.384548611111[/C][C]121.274583333333[/C][C]-0.890034722222228[/C][C]0.885451388888868[/C][/ROW]
[ROW][C]66[/C][C]123.54[/C][C]123.164786706349[/C][C]121.652083333333[/C][C]1.51270337301587[/C][C]0.375213293650788[/C][/ROW]
[ROW][C]67[/C][C]123.54[/C][C]123.175084325397[/C][C]122.029583333333[/C][C]1.14550099206349[/C][C]0.364915674603168[/C][/ROW]
[ROW][C]68[/C][C]123.54[/C][C]123.286631944444[/C][C]122.407083333333[/C][C]0.879548611111114[/C][C]0.253368055555541[/C][/ROW]
[ROW][C]69[/C][C]123.54[/C][C]123.398179563492[/C][C]122.784583333333[/C][C]0.613596230158731[/C][C]0.141820436507928[/C][/ROW]
[ROW][C]70[/C][C]123.54[/C][C]123.509727182540[/C][C]123.162083333333[/C][C]0.347643849206353[/C][C]0.0302728174603146[/C][/ROW]
[ROW][C]71[/C][C]123.54[/C][C]123.534846230159[/C][C]123.445416666667[/C][C]0.0894295634920622[/C][C]0.00515376984127158[/C][/ROW]
[ROW][C]72[/C][C]123.54[/C][C]123.434250992063[/C][C]123.610833333333[/C][C]-0.176582341269842[/C][C]0.105749007936510[/C][/ROW]
[ROW][C]73[/C][C]123.54[/C][C]123.294370039683[/C][C]123.7525[/C][C]-0.458129960317457[/C][C]0.245629960317459[/C][/ROW]
[ROW][C]74[/C][C]123.54[/C][C]123.154489087302[/C][C]123.894166666667[/C][C]-0.73967757936508[/C][C]0.385510912698422[/C][/ROW]
[ROW][C]75[/C][C]123.54[/C][C]123.014608134921[/C][C]124.035833333333[/C][C]-1.02122519841270[/C][C]0.525391865079371[/C][/ROW]
[ROW][C]76[/C][C]123.54[/C][C]122.874727182540[/C][C]124.1775[/C][C]-1.30277281746032[/C][C]0.665272817460334[/C][/ROW]
[ROW][C]77[/C][C]123.54[/C][C]123.429131944444[/C][C]124.319166666667[/C][C]-0.890034722222228[/C][C]0.110868055555571[/C][/ROW]
[ROW][C]78[/C][C]125.24[/C][C]125.973536706349[/C][C]124.460833333333[/C][C]1.51270337301587[/C][C]-0.733536706349199[/C][/ROW]
[ROW][C]79[/C][C]125.24[/C][C]125.748000992063[/C][C]124.6025[/C][C]1.14550099206349[/C][C]-0.508000992063486[/C][/ROW]
[ROW][C]80[/C][C]125.24[/C][C]125.623715277778[/C][C]124.744166666667[/C][C]0.879548611111114[/C][C]-0.383715277777782[/C][/ROW]
[ROW][C]81[/C][C]125.24[/C][C]125.499429563492[/C][C]124.885833333333[/C][C]0.613596230158731[/C][C]-0.259429563492063[/C][/ROW]
[ROW][C]82[/C][C]125.24[/C][C]125.375143849206[/C][C]125.0275[/C][C]0.347643849206353[/C][C]-0.135143849206344[/C][/ROW]
[ROW][C]83[/C][C]125.24[/C][C]125.258596230159[/C][C]125.169166666667[/C][C]0.0894295634920622[/C][C]-0.0185962301587210[/C][/ROW]
[ROW][C]84[/C][C]125.24[/C][C]125.193000992064[/C][C]125.369583333333[/C][C]-0.176582341269842[/C][C]0.0469990079364919[/C][/ROW]
[ROW][C]85[/C][C]125.24[/C][C]125.170620039683[/C][C]125.62875[/C][C]-0.458129960317457[/C][C]0.0693799603174483[/C][/ROW]
[ROW][C]86[/C][C]125.24[/C][C]125.148239087302[/C][C]125.887916666667[/C][C]-0.73967757936508[/C][C]0.0917609126984047[/C][/ROW]
[ROW][C]87[/C][C]125.24[/C][C]125.125858134921[/C][C]126.147083333333[/C][C]-1.02122519841270[/C][C]0.114141865079347[/C][/ROW]
[ROW][C]88[/C][C]125.24[/C][C]125.103477182540[/C][C]126.40625[/C][C]-1.30277281746032[/C][C]0.136522817460317[/C][/ROW]
[ROW][C]89[/C][C]125.24[/C][C]125.775381944444[/C][C]126.665416666667[/C][C]-0.890034722222228[/C][C]-0.535381944444453[/C][/ROW]
[ROW][C]90[/C][C]128.35[/C][C]128.437286706349[/C][C]126.924583333333[/C][C]1.51270337301587[/C][C]-0.087286706349218[/C][/ROW]
[ROW][C]91[/C][C]128.35[/C][C]NA[/C][C]NA[/C][C]1.14550099206349[/C][C]NA[/C][/ROW]
[ROW][C]92[/C][C]128.35[/C][C]NA[/C][C]NA[/C][C]0.879548611111114[/C][C]NA[/C][/ROW]
[ROW][C]93[/C][C]128.35[/C][C]NA[/C][C]NA[/C][C]0.613596230158731[/C][C]NA[/C][/ROW]
[ROW][C]94[/C][C]128.35[/C][C]NA[/C][C]NA[/C][C]0.347643849206353[/C][C]NA[/C][/ROW]
[ROW][C]95[/C][C]128.35[/C][C]NA[/C][C]NA[/C][C]0.0894295634920622[/C][C]NA[/C][/ROW]
[ROW][C]96[/C][C]128.35[/C][C]NA[/C][C]NA[/C][C]-0.176582341269842[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=36903&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=36903&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.9NANA-0.458129960317457NA
2102.9NANA-0.73967757936508NA
3102.9NANA-1.02122519841270NA
4102.9NANA-1.30277281746032NA
5104.2NANA-0.890034722222228NA
6104.7NANA1.51270337301587NA
7104.7105.278834325397104.1333333333331.14550099206349-0.578834325396826
8104.7105.162881944444104.2833333333330.879548611111114-0.462881944444447
9104.7105.046929563492104.4333333333330.613596230158731-0.346929563492054
10104.7104.930977182540104.5833333333330.347643849206353-0.230977182539661
11104.7104.822762896825104.7333333333330.0894295634920622-0.122762896825378
12104.7104.727584325397104.904166666667-0.176582341269842-0.027584325396802
13104.7104.637703373016105.095833333333-0.4581299603174570.0622966269841498
14104.7104.547822420635105.2875-0.739677579365080.152177579365116
15104.7104.457941468254105.479166666667-1.021225198412700.242058531746068
16104.7104.368060515873105.670833333333-1.302772817460320.331939484127020
17106104.972465277778105.8625-0.8900347222222281.02753472222227
18107107.566870039682106.0541666666671.51270337301587-0.566870039682499
19107107.391334325397106.2458333333331.14550099206349-0.391334325396784
20107107.317048611111106.43750.879548611111114-0.317048611111090
21107107.242762896825106.6291666666670.613596230158731-0.242762896825383
22107107.168477182540106.8208333333330.347643849206353-0.168477182539675
23107107.072762896825106.9833333333330.0894295634920622-0.0727628968254095
24107106.994250992063107.170833333333-0.1765823412698420.00574900793650102
25107106.954370039683107.4125-0.4581299603174570.0456299603174415
26107106.914489087302107.654166666667-0.739677579365080.0855109126983962
27107106.874608134921107.895833333333-1.021225198412700.125391865079351
28107106.834727182540108.1375-1.302772817460320.165272817460320
29107.6107.489131944444108.379166666667-0.8900347222222280.110868055555542
30109.9110.133536706349108.6208333333331.51270337301587-0.233536706349199
31109.9110.008000992064108.86251.14550099206349-0.108000992063495
32109.9109.983715277778109.1041666666670.879548611111114-0.0837152777777845
33109.9109.959429563492109.3458333333330.613596230158731-0.0594295634920599
34109.9109.935143849206109.58750.347643849206353-0.0351438492063352
35109.9109.922762896825109.8333333333330.0894295634920622-0.0227628968253697
36109.9109.965084325397110.141666666667-0.176582341269842-0.0650843253968105
37109.9110.050203373016110.508333333333-0.458129960317457-0.150203373015856
38109.9110.135322420635110.875-0.73967757936508-0.235322420634901
39109.9110.220441468254111.241666666667-1.02122519841270-0.320441468253946
40109.9110.305560515873111.608333333333-1.30277281746032-0.405560515872978
41110.6111.084965277778111.975-0.890034722222228-0.484965277777761
42114.3113.854370039683112.3416666666671.512703373015870.44562996031749
43114.3113.853834325397112.7083333333331.145500992063490.446165674603193
44114.3113.954548611111113.0750.8795486111111140.345451388888904
45114.3114.055262896825113.4416666666670.6135962301587310.244737103174614
46114.3114.155977182540113.8083333333330.3476438492063530.144022817460325
47114.3114.235262896825114.1458333333330.08942956349206220.0647371031746076
48114.3114.319667658730114.49625-0.176582341269842-0.0196676587301852
49114.3114.430620039683114.88875-0.458129960317457-0.130620039682555
50114.3114.541572420635115.28125-0.73967757936508-0.241572420634938
51114.3114.652524801587115.67375-1.02122519841270-0.352524801587336
52114.3114.763477182540116.06625-1.30277281746032-0.463477182539719
53114.3115.568715277778116.45875-0.890034722222228-1.26871527777783
54119.01118.363953373016116.851251.512703373015870.646046626984102
55119.01118.389250992064117.243751.145500992063490.620749007936467
56119.01118.515798611111117.636250.8795486111111140.494201388888854
57119.01118.642346230159118.028750.6135962301587310.367653769841226
58119.01118.768893849206118.421250.3476438492063530.241106150793627
59119.01118.997346230159118.9079166666670.08942956349206220.0126537698412363
60119.01119.210500992064119.387083333333-0.176582341269842-0.200500992063525
61119.01119.306453373016119.764583333333-0.458129960317457-0.296453373015908
62119.01119.402405753968120.142083333333-0.73967757936508-0.392405753968276
63119.01119.498358134921120.519583333333-1.02122519841270-0.488358134920659
64119.01119.594310515873120.897083333333-1.30277281746032-0.584310515873028
65121.27120.384548611111121.274583333333-0.8900347222222280.885451388888868
66123.54123.164786706349121.6520833333331.512703373015870.375213293650788
67123.54123.175084325397122.0295833333331.145500992063490.364915674603168
68123.54123.286631944444122.4070833333330.8795486111111140.253368055555541
69123.54123.398179563492122.7845833333330.6135962301587310.141820436507928
70123.54123.509727182540123.1620833333330.3476438492063530.0302728174603146
71123.54123.534846230159123.4454166666670.08942956349206220.00515376984127158
72123.54123.434250992063123.610833333333-0.1765823412698420.105749007936510
73123.54123.294370039683123.7525-0.4581299603174570.245629960317459
74123.54123.154489087302123.894166666667-0.739677579365080.385510912698422
75123.54123.014608134921124.035833333333-1.021225198412700.525391865079371
76123.54122.874727182540124.1775-1.302772817460320.665272817460334
77123.54123.429131944444124.319166666667-0.8900347222222280.110868055555571
78125.24125.973536706349124.4608333333331.51270337301587-0.733536706349199
79125.24125.748000992063124.60251.14550099206349-0.508000992063486
80125.24125.623715277778124.7441666666670.879548611111114-0.383715277777782
81125.24125.499429563492124.8858333333330.613596230158731-0.259429563492063
82125.24125.375143849206125.02750.347643849206353-0.135143849206344
83125.24125.258596230159125.1691666666670.0894295634920622-0.0185962301587210
84125.24125.193000992064125.369583333333-0.1765823412698420.0469990079364919
85125.24125.170620039683125.62875-0.4581299603174570.0693799603174483
86125.24125.148239087302125.887916666667-0.739677579365080.0917609126984047
87125.24125.125858134921126.147083333333-1.021225198412700.114141865079347
88125.24125.103477182540126.40625-1.302772817460320.136522817460317
89125.24125.775381944444126.665416666667-0.890034722222228-0.535381944444453
90128.35128.437286706349126.9245833333331.51270337301587-0.087286706349218
91128.35NANA1.14550099206349NA
92128.35NANA0.879548611111114NA
93128.35NANA0.613596230158731NA
94128.35NANA0.347643849206353NA
95128.35NANA0.0894295634920622NA
96128.35NANA-0.176582341269842NA



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