Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationTue, 26 Apr 2016 17:02:21 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2016/Apr/26/t1461686568kx17cx7y2drzp3v.htm/, Retrieved Fri, 03 May 2024 20:34:23 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=294912, Retrieved Fri, 03 May 2024 20:34:23 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact63
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Classical Decomposition] [] [2016-04-26 16:02:21] [d992272e6b10691b6ed213356daa79d7] [Current]
Feedback Forum

Post a new message
Dataseries X:
92,46
91,73
91,73
91,73
91,73
91,73
91,73
91,73
91,73
91,73
91,73
91,73
91,73
86,87
86,87
86,87
86,87
86,87
86,87
86,87
86,87
86,87
86,87
86,87
86,87
89,81
89,81
89,81
89,81
89,81
89,81
89,81
89,81
89,81
89,81
89,81
89,81
94,81
94,81
94,81
94,81
94,81
94,81
94,81
94,81
94,81
94,81
94,81
94,81
95,01
95,01
95,01
95,01
95,01
95,01
95,01
95,01
95,01
95,01
95,01
95,01
95,57
95,57
95,57
95,57
95,57
95,57
95,57
95,57
95,57
95,57
95,57
95,57
98,56
98,56
98,56
98,56
98,56
98,56
98,56
98,56
98,56
98,56
98,56
98,56
100,13
100,13
100,13
100,13
100,13
100,13
100,13
100,13
100,13
100,13
100,13
100,13
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86
101,86





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ yule.wessa.net
R Framework error message
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.

\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 & 'George Udny Yule' @ yule.wessa.net \tabularnewline
R Framework error message & 
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=294912&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]'George Udny Yule' @ yule.wessa.net[/C][/ROW]
[ROW][C]R Framework error message[/C][C]
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=294912&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=294912&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'George Udny Yule' @ yule.wessa.net
R Framework error message
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.







Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
192.46NANA-0.515598NA
291.73NANA0.516161NA
391.73NANA0.422365NA
491.73NANA0.328569NA
591.73NANA0.234772NA
691.73NANA0.140976NA
791.7391.804291.76040.0438002-0.0742168
891.7391.480991.5275-0.04661650.249117
991.7390.982191.1225-0.1404130.747913
1091.7390.483390.7175-0.2342091.24671
1191.7389.984590.3125-0.3280051.74551
1291.7389.485789.9075-0.4218022.2443
1391.7388.986989.5025-0.5155982.7431
1486.8789.613789.09750.516161-2.74366
1586.8789.114988.69250.422365-2.24486
1686.8788.616188.28750.328569-1.74607
1786.8788.117387.88250.234772-1.24727
1886.8787.618587.47750.140976-0.748476
1986.8787.116387.07250.0438002-0.2463
2086.8786.945986.9925-0.0466165-0.0758835
2186.8787.097187.2375-0.140413-0.227087
2286.8787.248387.4825-0.234209-0.378291
2386.8787.399587.7275-0.328005-0.529495
2486.8787.550787.9725-0.421802-0.680698
2586.8787.701988.2175-0.515598-0.831902
2689.8188.978788.46250.5161610.831339
2789.8189.129988.70750.4223650.680135
2889.8189.281188.95250.3285690.528931
2989.8189.432389.19750.2347720.377728
3089.8189.583589.44250.1409760.226524
3189.8189.731389.68750.04380020.0786998
3289.8189.971790.0183-0.0466165-0.161717
3389.8190.294690.435-0.140413-0.484587
3489.8190.617590.8517-0.234209-0.807458
3589.8190.940391.2683-0.328005-1.13033
3689.8191.263291.685-0.421802-1.4532
3789.8191.586192.1017-0.515598-1.77607
3894.8193.034592.51830.5161611.77551
3994.8193.357492.9350.4223651.45264
4094.8193.680293.35170.3285691.12976
4194.8194.003193.76830.2347720.806894
4294.8194.32694.1850.1409760.484024
4394.8194.645594.60170.04380020.164533
4494.8194.771794.8183-0.04661650.0382832
4594.8194.694694.835-0.1404130.115413
4694.8194.617594.8517-0.2342090.192542
4794.8194.540394.8683-0.3280050.269672
4894.8194.463294.885-0.4218020.346802
4994.8194.386194.9017-0.5155980.423931
5095.0195.434594.91830.516161-0.424495
5195.0195.357494.9350.422365-0.347365
5295.0195.280294.95170.328569-0.270235
5395.0195.203194.96830.234772-0.193106
5495.0195.12694.9850.140976-0.115976
5595.0195.045595.00170.0438002-0.0354668
5695.0194.986795.0333-0.04661650.0232832
5795.0194.939695.08-0.1404130.0704128
5895.0194.892595.1267-0.2342090.117542
5995.0194.845395.1733-0.3280050.164672
6095.0194.798295.22-0.4218020.211802
6195.0194.751195.2667-0.5155980.258931
6295.5795.829595.31330.516161-0.259495
6395.5795.782495.360.422365-0.212365
6495.5795.735295.40670.328569-0.165235
6595.5795.688195.45330.234772-0.118106
6695.5795.64195.50.140976-0.0709761
6795.5795.590595.54670.0438002-0.0204668
6895.5795.64895.6946-0.0466165-0.0779668
6995.5795.803395.9438-0.140413-0.233337
7095.5795.958796.1929-0.234209-0.388708
7195.5796.114196.4421-0.328005-0.544078
7295.5796.269496.6912-0.421802-0.699448
7395.5796.424896.9404-0.515598-0.854819
7498.5697.705797.18960.5161610.854255
7598.5697.861197.43880.4223650.698885
7698.5698.016597.68790.3285690.543515
7798.5698.171997.93710.2347720.388144
7898.5698.327298.18620.1409760.232774
7998.5698.479298.43540.04380020.0807832
8098.5698.578898.6254-0.0466165-0.0188002
8198.5698.615898.7563-0.140413-0.0558372
8298.5698.652998.8871-0.234209-0.0928742
8398.5698.689999.0179-0.328005-0.129911
8498.5698.726999.1488-0.421802-0.166948
8598.5698.76499.2796-0.515598-0.203985
86100.1399.926699.41040.5161610.203422
87100.1399.963699.54130.4223650.166385
88100.13100.00199.67210.3285690.129348
89100.13100.03899.80290.2347720.092311
90100.13100.07599.93380.1409760.0552739
91100.13100.108100.0650.04380020.0216165
92100.13100.155100.202-0.0466165-0.0254668
93100.13100.206100.346-0.140413-0.0758372
94100.13100.256100.49-0.234209-0.126208
95100.13100.307100.635-0.328005-0.176578
96100.13100.357100.779-0.421802-0.226948
97100.13100.407100.923-0.515598-0.277319
98101.86101.583101.0670.5161610.276755
99101.86101.634101.2110.4223650.226385
100101.86101.684101.3550.3285690.176015
101101.86101.734101.50.2347720.125644
102101.86101.785101.6440.1409760.0752739
103101.86101.832101.7880.04380020.0282832
104101.86101.813101.86-0.04661650.0466165
105101.86101.72101.86-0.1404130.140413
106101.86101.626101.86-0.2342090.234209
107101.86101.532101.86-0.3280050.328005
108101.86101.438101.86-0.4218020.421802
109101.86101.344101.86-0.5155980.515598
110101.86102.376101.860.516161-0.516161
111101.86102.282101.860.422365-0.422365
112101.86102.189101.860.328569-0.328569
113101.86102.095101.860.234772-0.234772
114101.86102.001101.860.140976-0.140976
115101.86NANA0.0438002NA
116101.86NANA-0.0466165NA
117101.86NANA-0.140413NA
118101.86NANA-0.234209NA
119101.86NANA-0.328005NA
120101.86NANA-0.421802NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 92.46 & NA & NA & -0.515598 & NA \tabularnewline
2 & 91.73 & NA & NA & 0.516161 & NA \tabularnewline
3 & 91.73 & NA & NA & 0.422365 & NA \tabularnewline
4 & 91.73 & NA & NA & 0.328569 & NA \tabularnewline
5 & 91.73 & NA & NA & 0.234772 & NA \tabularnewline
6 & 91.73 & NA & NA & 0.140976 & NA \tabularnewline
7 & 91.73 & 91.8042 & 91.7604 & 0.0438002 & -0.0742168 \tabularnewline
8 & 91.73 & 91.4809 & 91.5275 & -0.0466165 & 0.249117 \tabularnewline
9 & 91.73 & 90.9821 & 91.1225 & -0.140413 & 0.747913 \tabularnewline
10 & 91.73 & 90.4833 & 90.7175 & -0.234209 & 1.24671 \tabularnewline
11 & 91.73 & 89.9845 & 90.3125 & -0.328005 & 1.74551 \tabularnewline
12 & 91.73 & 89.4857 & 89.9075 & -0.421802 & 2.2443 \tabularnewline
13 & 91.73 & 88.9869 & 89.5025 & -0.515598 & 2.7431 \tabularnewline
14 & 86.87 & 89.6137 & 89.0975 & 0.516161 & -2.74366 \tabularnewline
15 & 86.87 & 89.1149 & 88.6925 & 0.422365 & -2.24486 \tabularnewline
16 & 86.87 & 88.6161 & 88.2875 & 0.328569 & -1.74607 \tabularnewline
17 & 86.87 & 88.1173 & 87.8825 & 0.234772 & -1.24727 \tabularnewline
18 & 86.87 & 87.6185 & 87.4775 & 0.140976 & -0.748476 \tabularnewline
19 & 86.87 & 87.1163 & 87.0725 & 0.0438002 & -0.2463 \tabularnewline
20 & 86.87 & 86.9459 & 86.9925 & -0.0466165 & -0.0758835 \tabularnewline
21 & 86.87 & 87.0971 & 87.2375 & -0.140413 & -0.227087 \tabularnewline
22 & 86.87 & 87.2483 & 87.4825 & -0.234209 & -0.378291 \tabularnewline
23 & 86.87 & 87.3995 & 87.7275 & -0.328005 & -0.529495 \tabularnewline
24 & 86.87 & 87.5507 & 87.9725 & -0.421802 & -0.680698 \tabularnewline
25 & 86.87 & 87.7019 & 88.2175 & -0.515598 & -0.831902 \tabularnewline
26 & 89.81 & 88.9787 & 88.4625 & 0.516161 & 0.831339 \tabularnewline
27 & 89.81 & 89.1299 & 88.7075 & 0.422365 & 0.680135 \tabularnewline
28 & 89.81 & 89.2811 & 88.9525 & 0.328569 & 0.528931 \tabularnewline
29 & 89.81 & 89.4323 & 89.1975 & 0.234772 & 0.377728 \tabularnewline
30 & 89.81 & 89.5835 & 89.4425 & 0.140976 & 0.226524 \tabularnewline
31 & 89.81 & 89.7313 & 89.6875 & 0.0438002 & 0.0786998 \tabularnewline
32 & 89.81 & 89.9717 & 90.0183 & -0.0466165 & -0.161717 \tabularnewline
33 & 89.81 & 90.2946 & 90.435 & -0.140413 & -0.484587 \tabularnewline
34 & 89.81 & 90.6175 & 90.8517 & -0.234209 & -0.807458 \tabularnewline
35 & 89.81 & 90.9403 & 91.2683 & -0.328005 & -1.13033 \tabularnewline
36 & 89.81 & 91.2632 & 91.685 & -0.421802 & -1.4532 \tabularnewline
37 & 89.81 & 91.5861 & 92.1017 & -0.515598 & -1.77607 \tabularnewline
38 & 94.81 & 93.0345 & 92.5183 & 0.516161 & 1.77551 \tabularnewline
39 & 94.81 & 93.3574 & 92.935 & 0.422365 & 1.45264 \tabularnewline
40 & 94.81 & 93.6802 & 93.3517 & 0.328569 & 1.12976 \tabularnewline
41 & 94.81 & 94.0031 & 93.7683 & 0.234772 & 0.806894 \tabularnewline
42 & 94.81 & 94.326 & 94.185 & 0.140976 & 0.484024 \tabularnewline
43 & 94.81 & 94.6455 & 94.6017 & 0.0438002 & 0.164533 \tabularnewline
44 & 94.81 & 94.7717 & 94.8183 & -0.0466165 & 0.0382832 \tabularnewline
45 & 94.81 & 94.6946 & 94.835 & -0.140413 & 0.115413 \tabularnewline
46 & 94.81 & 94.6175 & 94.8517 & -0.234209 & 0.192542 \tabularnewline
47 & 94.81 & 94.5403 & 94.8683 & -0.328005 & 0.269672 \tabularnewline
48 & 94.81 & 94.4632 & 94.885 & -0.421802 & 0.346802 \tabularnewline
49 & 94.81 & 94.3861 & 94.9017 & -0.515598 & 0.423931 \tabularnewline
50 & 95.01 & 95.4345 & 94.9183 & 0.516161 & -0.424495 \tabularnewline
51 & 95.01 & 95.3574 & 94.935 & 0.422365 & -0.347365 \tabularnewline
52 & 95.01 & 95.2802 & 94.9517 & 0.328569 & -0.270235 \tabularnewline
53 & 95.01 & 95.2031 & 94.9683 & 0.234772 & -0.193106 \tabularnewline
54 & 95.01 & 95.126 & 94.985 & 0.140976 & -0.115976 \tabularnewline
55 & 95.01 & 95.0455 & 95.0017 & 0.0438002 & -0.0354668 \tabularnewline
56 & 95.01 & 94.9867 & 95.0333 & -0.0466165 & 0.0232832 \tabularnewline
57 & 95.01 & 94.9396 & 95.08 & -0.140413 & 0.0704128 \tabularnewline
58 & 95.01 & 94.8925 & 95.1267 & -0.234209 & 0.117542 \tabularnewline
59 & 95.01 & 94.8453 & 95.1733 & -0.328005 & 0.164672 \tabularnewline
60 & 95.01 & 94.7982 & 95.22 & -0.421802 & 0.211802 \tabularnewline
61 & 95.01 & 94.7511 & 95.2667 & -0.515598 & 0.258931 \tabularnewline
62 & 95.57 & 95.8295 & 95.3133 & 0.516161 & -0.259495 \tabularnewline
63 & 95.57 & 95.7824 & 95.36 & 0.422365 & -0.212365 \tabularnewline
64 & 95.57 & 95.7352 & 95.4067 & 0.328569 & -0.165235 \tabularnewline
65 & 95.57 & 95.6881 & 95.4533 & 0.234772 & -0.118106 \tabularnewline
66 & 95.57 & 95.641 & 95.5 & 0.140976 & -0.0709761 \tabularnewline
67 & 95.57 & 95.5905 & 95.5467 & 0.0438002 & -0.0204668 \tabularnewline
68 & 95.57 & 95.648 & 95.6946 & -0.0466165 & -0.0779668 \tabularnewline
69 & 95.57 & 95.8033 & 95.9438 & -0.140413 & -0.233337 \tabularnewline
70 & 95.57 & 95.9587 & 96.1929 & -0.234209 & -0.388708 \tabularnewline
71 & 95.57 & 96.1141 & 96.4421 & -0.328005 & -0.544078 \tabularnewline
72 & 95.57 & 96.2694 & 96.6912 & -0.421802 & -0.699448 \tabularnewline
73 & 95.57 & 96.4248 & 96.9404 & -0.515598 & -0.854819 \tabularnewline
74 & 98.56 & 97.7057 & 97.1896 & 0.516161 & 0.854255 \tabularnewline
75 & 98.56 & 97.8611 & 97.4388 & 0.422365 & 0.698885 \tabularnewline
76 & 98.56 & 98.0165 & 97.6879 & 0.328569 & 0.543515 \tabularnewline
77 & 98.56 & 98.1719 & 97.9371 & 0.234772 & 0.388144 \tabularnewline
78 & 98.56 & 98.3272 & 98.1862 & 0.140976 & 0.232774 \tabularnewline
79 & 98.56 & 98.4792 & 98.4354 & 0.0438002 & 0.0807832 \tabularnewline
80 & 98.56 & 98.5788 & 98.6254 & -0.0466165 & -0.0188002 \tabularnewline
81 & 98.56 & 98.6158 & 98.7563 & -0.140413 & -0.0558372 \tabularnewline
82 & 98.56 & 98.6529 & 98.8871 & -0.234209 & -0.0928742 \tabularnewline
83 & 98.56 & 98.6899 & 99.0179 & -0.328005 & -0.129911 \tabularnewline
84 & 98.56 & 98.7269 & 99.1488 & -0.421802 & -0.166948 \tabularnewline
85 & 98.56 & 98.764 & 99.2796 & -0.515598 & -0.203985 \tabularnewline
86 & 100.13 & 99.9266 & 99.4104 & 0.516161 & 0.203422 \tabularnewline
87 & 100.13 & 99.9636 & 99.5413 & 0.422365 & 0.166385 \tabularnewline
88 & 100.13 & 100.001 & 99.6721 & 0.328569 & 0.129348 \tabularnewline
89 & 100.13 & 100.038 & 99.8029 & 0.234772 & 0.092311 \tabularnewline
90 & 100.13 & 100.075 & 99.9338 & 0.140976 & 0.0552739 \tabularnewline
91 & 100.13 & 100.108 & 100.065 & 0.0438002 & 0.0216165 \tabularnewline
92 & 100.13 & 100.155 & 100.202 & -0.0466165 & -0.0254668 \tabularnewline
93 & 100.13 & 100.206 & 100.346 & -0.140413 & -0.0758372 \tabularnewline
94 & 100.13 & 100.256 & 100.49 & -0.234209 & -0.126208 \tabularnewline
95 & 100.13 & 100.307 & 100.635 & -0.328005 & -0.176578 \tabularnewline
96 & 100.13 & 100.357 & 100.779 & -0.421802 & -0.226948 \tabularnewline
97 & 100.13 & 100.407 & 100.923 & -0.515598 & -0.277319 \tabularnewline
98 & 101.86 & 101.583 & 101.067 & 0.516161 & 0.276755 \tabularnewline
99 & 101.86 & 101.634 & 101.211 & 0.422365 & 0.226385 \tabularnewline
100 & 101.86 & 101.684 & 101.355 & 0.328569 & 0.176015 \tabularnewline
101 & 101.86 & 101.734 & 101.5 & 0.234772 & 0.125644 \tabularnewline
102 & 101.86 & 101.785 & 101.644 & 0.140976 & 0.0752739 \tabularnewline
103 & 101.86 & 101.832 & 101.788 & 0.0438002 & 0.0282832 \tabularnewline
104 & 101.86 & 101.813 & 101.86 & -0.0466165 & 0.0466165 \tabularnewline
105 & 101.86 & 101.72 & 101.86 & -0.140413 & 0.140413 \tabularnewline
106 & 101.86 & 101.626 & 101.86 & -0.234209 & 0.234209 \tabularnewline
107 & 101.86 & 101.532 & 101.86 & -0.328005 & 0.328005 \tabularnewline
108 & 101.86 & 101.438 & 101.86 & -0.421802 & 0.421802 \tabularnewline
109 & 101.86 & 101.344 & 101.86 & -0.515598 & 0.515598 \tabularnewline
110 & 101.86 & 102.376 & 101.86 & 0.516161 & -0.516161 \tabularnewline
111 & 101.86 & 102.282 & 101.86 & 0.422365 & -0.422365 \tabularnewline
112 & 101.86 & 102.189 & 101.86 & 0.328569 & -0.328569 \tabularnewline
113 & 101.86 & 102.095 & 101.86 & 0.234772 & -0.234772 \tabularnewline
114 & 101.86 & 102.001 & 101.86 & 0.140976 & -0.140976 \tabularnewline
115 & 101.86 & NA & NA & 0.0438002 & NA \tabularnewline
116 & 101.86 & NA & NA & -0.0466165 & NA \tabularnewline
117 & 101.86 & NA & NA & -0.140413 & NA \tabularnewline
118 & 101.86 & NA & NA & -0.234209 & NA \tabularnewline
119 & 101.86 & NA & NA & -0.328005 & NA \tabularnewline
120 & 101.86 & NA & NA & -0.421802 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=294912&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]92.46[/C][C]NA[/C][C]NA[/C][C]-0.515598[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]91.73[/C][C]NA[/C][C]NA[/C][C]0.516161[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]91.73[/C][C]NA[/C][C]NA[/C][C]0.422365[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]91.73[/C][C]NA[/C][C]NA[/C][C]0.328569[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]91.73[/C][C]NA[/C][C]NA[/C][C]0.234772[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]91.73[/C][C]NA[/C][C]NA[/C][C]0.140976[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]91.73[/C][C]91.8042[/C][C]91.7604[/C][C]0.0438002[/C][C]-0.0742168[/C][/ROW]
[ROW][C]8[/C][C]91.73[/C][C]91.4809[/C][C]91.5275[/C][C]-0.0466165[/C][C]0.249117[/C][/ROW]
[ROW][C]9[/C][C]91.73[/C][C]90.9821[/C][C]91.1225[/C][C]-0.140413[/C][C]0.747913[/C][/ROW]
[ROW][C]10[/C][C]91.73[/C][C]90.4833[/C][C]90.7175[/C][C]-0.234209[/C][C]1.24671[/C][/ROW]
[ROW][C]11[/C][C]91.73[/C][C]89.9845[/C][C]90.3125[/C][C]-0.328005[/C][C]1.74551[/C][/ROW]
[ROW][C]12[/C][C]91.73[/C][C]89.4857[/C][C]89.9075[/C][C]-0.421802[/C][C]2.2443[/C][/ROW]
[ROW][C]13[/C][C]91.73[/C][C]88.9869[/C][C]89.5025[/C][C]-0.515598[/C][C]2.7431[/C][/ROW]
[ROW][C]14[/C][C]86.87[/C][C]89.6137[/C][C]89.0975[/C][C]0.516161[/C][C]-2.74366[/C][/ROW]
[ROW][C]15[/C][C]86.87[/C][C]89.1149[/C][C]88.6925[/C][C]0.422365[/C][C]-2.24486[/C][/ROW]
[ROW][C]16[/C][C]86.87[/C][C]88.6161[/C][C]88.2875[/C][C]0.328569[/C][C]-1.74607[/C][/ROW]
[ROW][C]17[/C][C]86.87[/C][C]88.1173[/C][C]87.8825[/C][C]0.234772[/C][C]-1.24727[/C][/ROW]
[ROW][C]18[/C][C]86.87[/C][C]87.6185[/C][C]87.4775[/C][C]0.140976[/C][C]-0.748476[/C][/ROW]
[ROW][C]19[/C][C]86.87[/C][C]87.1163[/C][C]87.0725[/C][C]0.0438002[/C][C]-0.2463[/C][/ROW]
[ROW][C]20[/C][C]86.87[/C][C]86.9459[/C][C]86.9925[/C][C]-0.0466165[/C][C]-0.0758835[/C][/ROW]
[ROW][C]21[/C][C]86.87[/C][C]87.0971[/C][C]87.2375[/C][C]-0.140413[/C][C]-0.227087[/C][/ROW]
[ROW][C]22[/C][C]86.87[/C][C]87.2483[/C][C]87.4825[/C][C]-0.234209[/C][C]-0.378291[/C][/ROW]
[ROW][C]23[/C][C]86.87[/C][C]87.3995[/C][C]87.7275[/C][C]-0.328005[/C][C]-0.529495[/C][/ROW]
[ROW][C]24[/C][C]86.87[/C][C]87.5507[/C][C]87.9725[/C][C]-0.421802[/C][C]-0.680698[/C][/ROW]
[ROW][C]25[/C][C]86.87[/C][C]87.7019[/C][C]88.2175[/C][C]-0.515598[/C][C]-0.831902[/C][/ROW]
[ROW][C]26[/C][C]89.81[/C][C]88.9787[/C][C]88.4625[/C][C]0.516161[/C][C]0.831339[/C][/ROW]
[ROW][C]27[/C][C]89.81[/C][C]89.1299[/C][C]88.7075[/C][C]0.422365[/C][C]0.680135[/C][/ROW]
[ROW][C]28[/C][C]89.81[/C][C]89.2811[/C][C]88.9525[/C][C]0.328569[/C][C]0.528931[/C][/ROW]
[ROW][C]29[/C][C]89.81[/C][C]89.4323[/C][C]89.1975[/C][C]0.234772[/C][C]0.377728[/C][/ROW]
[ROW][C]30[/C][C]89.81[/C][C]89.5835[/C][C]89.4425[/C][C]0.140976[/C][C]0.226524[/C][/ROW]
[ROW][C]31[/C][C]89.81[/C][C]89.7313[/C][C]89.6875[/C][C]0.0438002[/C][C]0.0786998[/C][/ROW]
[ROW][C]32[/C][C]89.81[/C][C]89.9717[/C][C]90.0183[/C][C]-0.0466165[/C][C]-0.161717[/C][/ROW]
[ROW][C]33[/C][C]89.81[/C][C]90.2946[/C][C]90.435[/C][C]-0.140413[/C][C]-0.484587[/C][/ROW]
[ROW][C]34[/C][C]89.81[/C][C]90.6175[/C][C]90.8517[/C][C]-0.234209[/C][C]-0.807458[/C][/ROW]
[ROW][C]35[/C][C]89.81[/C][C]90.9403[/C][C]91.2683[/C][C]-0.328005[/C][C]-1.13033[/C][/ROW]
[ROW][C]36[/C][C]89.81[/C][C]91.2632[/C][C]91.685[/C][C]-0.421802[/C][C]-1.4532[/C][/ROW]
[ROW][C]37[/C][C]89.81[/C][C]91.5861[/C][C]92.1017[/C][C]-0.515598[/C][C]-1.77607[/C][/ROW]
[ROW][C]38[/C][C]94.81[/C][C]93.0345[/C][C]92.5183[/C][C]0.516161[/C][C]1.77551[/C][/ROW]
[ROW][C]39[/C][C]94.81[/C][C]93.3574[/C][C]92.935[/C][C]0.422365[/C][C]1.45264[/C][/ROW]
[ROW][C]40[/C][C]94.81[/C][C]93.6802[/C][C]93.3517[/C][C]0.328569[/C][C]1.12976[/C][/ROW]
[ROW][C]41[/C][C]94.81[/C][C]94.0031[/C][C]93.7683[/C][C]0.234772[/C][C]0.806894[/C][/ROW]
[ROW][C]42[/C][C]94.81[/C][C]94.326[/C][C]94.185[/C][C]0.140976[/C][C]0.484024[/C][/ROW]
[ROW][C]43[/C][C]94.81[/C][C]94.6455[/C][C]94.6017[/C][C]0.0438002[/C][C]0.164533[/C][/ROW]
[ROW][C]44[/C][C]94.81[/C][C]94.7717[/C][C]94.8183[/C][C]-0.0466165[/C][C]0.0382832[/C][/ROW]
[ROW][C]45[/C][C]94.81[/C][C]94.6946[/C][C]94.835[/C][C]-0.140413[/C][C]0.115413[/C][/ROW]
[ROW][C]46[/C][C]94.81[/C][C]94.6175[/C][C]94.8517[/C][C]-0.234209[/C][C]0.192542[/C][/ROW]
[ROW][C]47[/C][C]94.81[/C][C]94.5403[/C][C]94.8683[/C][C]-0.328005[/C][C]0.269672[/C][/ROW]
[ROW][C]48[/C][C]94.81[/C][C]94.4632[/C][C]94.885[/C][C]-0.421802[/C][C]0.346802[/C][/ROW]
[ROW][C]49[/C][C]94.81[/C][C]94.3861[/C][C]94.9017[/C][C]-0.515598[/C][C]0.423931[/C][/ROW]
[ROW][C]50[/C][C]95.01[/C][C]95.4345[/C][C]94.9183[/C][C]0.516161[/C][C]-0.424495[/C][/ROW]
[ROW][C]51[/C][C]95.01[/C][C]95.3574[/C][C]94.935[/C][C]0.422365[/C][C]-0.347365[/C][/ROW]
[ROW][C]52[/C][C]95.01[/C][C]95.2802[/C][C]94.9517[/C][C]0.328569[/C][C]-0.270235[/C][/ROW]
[ROW][C]53[/C][C]95.01[/C][C]95.2031[/C][C]94.9683[/C][C]0.234772[/C][C]-0.193106[/C][/ROW]
[ROW][C]54[/C][C]95.01[/C][C]95.126[/C][C]94.985[/C][C]0.140976[/C][C]-0.115976[/C][/ROW]
[ROW][C]55[/C][C]95.01[/C][C]95.0455[/C][C]95.0017[/C][C]0.0438002[/C][C]-0.0354668[/C][/ROW]
[ROW][C]56[/C][C]95.01[/C][C]94.9867[/C][C]95.0333[/C][C]-0.0466165[/C][C]0.0232832[/C][/ROW]
[ROW][C]57[/C][C]95.01[/C][C]94.9396[/C][C]95.08[/C][C]-0.140413[/C][C]0.0704128[/C][/ROW]
[ROW][C]58[/C][C]95.01[/C][C]94.8925[/C][C]95.1267[/C][C]-0.234209[/C][C]0.117542[/C][/ROW]
[ROW][C]59[/C][C]95.01[/C][C]94.8453[/C][C]95.1733[/C][C]-0.328005[/C][C]0.164672[/C][/ROW]
[ROW][C]60[/C][C]95.01[/C][C]94.7982[/C][C]95.22[/C][C]-0.421802[/C][C]0.211802[/C][/ROW]
[ROW][C]61[/C][C]95.01[/C][C]94.7511[/C][C]95.2667[/C][C]-0.515598[/C][C]0.258931[/C][/ROW]
[ROW][C]62[/C][C]95.57[/C][C]95.8295[/C][C]95.3133[/C][C]0.516161[/C][C]-0.259495[/C][/ROW]
[ROW][C]63[/C][C]95.57[/C][C]95.7824[/C][C]95.36[/C][C]0.422365[/C][C]-0.212365[/C][/ROW]
[ROW][C]64[/C][C]95.57[/C][C]95.7352[/C][C]95.4067[/C][C]0.328569[/C][C]-0.165235[/C][/ROW]
[ROW][C]65[/C][C]95.57[/C][C]95.6881[/C][C]95.4533[/C][C]0.234772[/C][C]-0.118106[/C][/ROW]
[ROW][C]66[/C][C]95.57[/C][C]95.641[/C][C]95.5[/C][C]0.140976[/C][C]-0.0709761[/C][/ROW]
[ROW][C]67[/C][C]95.57[/C][C]95.5905[/C][C]95.5467[/C][C]0.0438002[/C][C]-0.0204668[/C][/ROW]
[ROW][C]68[/C][C]95.57[/C][C]95.648[/C][C]95.6946[/C][C]-0.0466165[/C][C]-0.0779668[/C][/ROW]
[ROW][C]69[/C][C]95.57[/C][C]95.8033[/C][C]95.9438[/C][C]-0.140413[/C][C]-0.233337[/C][/ROW]
[ROW][C]70[/C][C]95.57[/C][C]95.9587[/C][C]96.1929[/C][C]-0.234209[/C][C]-0.388708[/C][/ROW]
[ROW][C]71[/C][C]95.57[/C][C]96.1141[/C][C]96.4421[/C][C]-0.328005[/C][C]-0.544078[/C][/ROW]
[ROW][C]72[/C][C]95.57[/C][C]96.2694[/C][C]96.6912[/C][C]-0.421802[/C][C]-0.699448[/C][/ROW]
[ROW][C]73[/C][C]95.57[/C][C]96.4248[/C][C]96.9404[/C][C]-0.515598[/C][C]-0.854819[/C][/ROW]
[ROW][C]74[/C][C]98.56[/C][C]97.7057[/C][C]97.1896[/C][C]0.516161[/C][C]0.854255[/C][/ROW]
[ROW][C]75[/C][C]98.56[/C][C]97.8611[/C][C]97.4388[/C][C]0.422365[/C][C]0.698885[/C][/ROW]
[ROW][C]76[/C][C]98.56[/C][C]98.0165[/C][C]97.6879[/C][C]0.328569[/C][C]0.543515[/C][/ROW]
[ROW][C]77[/C][C]98.56[/C][C]98.1719[/C][C]97.9371[/C][C]0.234772[/C][C]0.388144[/C][/ROW]
[ROW][C]78[/C][C]98.56[/C][C]98.3272[/C][C]98.1862[/C][C]0.140976[/C][C]0.232774[/C][/ROW]
[ROW][C]79[/C][C]98.56[/C][C]98.4792[/C][C]98.4354[/C][C]0.0438002[/C][C]0.0807832[/C][/ROW]
[ROW][C]80[/C][C]98.56[/C][C]98.5788[/C][C]98.6254[/C][C]-0.0466165[/C][C]-0.0188002[/C][/ROW]
[ROW][C]81[/C][C]98.56[/C][C]98.6158[/C][C]98.7563[/C][C]-0.140413[/C][C]-0.0558372[/C][/ROW]
[ROW][C]82[/C][C]98.56[/C][C]98.6529[/C][C]98.8871[/C][C]-0.234209[/C][C]-0.0928742[/C][/ROW]
[ROW][C]83[/C][C]98.56[/C][C]98.6899[/C][C]99.0179[/C][C]-0.328005[/C][C]-0.129911[/C][/ROW]
[ROW][C]84[/C][C]98.56[/C][C]98.7269[/C][C]99.1488[/C][C]-0.421802[/C][C]-0.166948[/C][/ROW]
[ROW][C]85[/C][C]98.56[/C][C]98.764[/C][C]99.2796[/C][C]-0.515598[/C][C]-0.203985[/C][/ROW]
[ROW][C]86[/C][C]100.13[/C][C]99.9266[/C][C]99.4104[/C][C]0.516161[/C][C]0.203422[/C][/ROW]
[ROW][C]87[/C][C]100.13[/C][C]99.9636[/C][C]99.5413[/C][C]0.422365[/C][C]0.166385[/C][/ROW]
[ROW][C]88[/C][C]100.13[/C][C]100.001[/C][C]99.6721[/C][C]0.328569[/C][C]0.129348[/C][/ROW]
[ROW][C]89[/C][C]100.13[/C][C]100.038[/C][C]99.8029[/C][C]0.234772[/C][C]0.092311[/C][/ROW]
[ROW][C]90[/C][C]100.13[/C][C]100.075[/C][C]99.9338[/C][C]0.140976[/C][C]0.0552739[/C][/ROW]
[ROW][C]91[/C][C]100.13[/C][C]100.108[/C][C]100.065[/C][C]0.0438002[/C][C]0.0216165[/C][/ROW]
[ROW][C]92[/C][C]100.13[/C][C]100.155[/C][C]100.202[/C][C]-0.0466165[/C][C]-0.0254668[/C][/ROW]
[ROW][C]93[/C][C]100.13[/C][C]100.206[/C][C]100.346[/C][C]-0.140413[/C][C]-0.0758372[/C][/ROW]
[ROW][C]94[/C][C]100.13[/C][C]100.256[/C][C]100.49[/C][C]-0.234209[/C][C]-0.126208[/C][/ROW]
[ROW][C]95[/C][C]100.13[/C][C]100.307[/C][C]100.635[/C][C]-0.328005[/C][C]-0.176578[/C][/ROW]
[ROW][C]96[/C][C]100.13[/C][C]100.357[/C][C]100.779[/C][C]-0.421802[/C][C]-0.226948[/C][/ROW]
[ROW][C]97[/C][C]100.13[/C][C]100.407[/C][C]100.923[/C][C]-0.515598[/C][C]-0.277319[/C][/ROW]
[ROW][C]98[/C][C]101.86[/C][C]101.583[/C][C]101.067[/C][C]0.516161[/C][C]0.276755[/C][/ROW]
[ROW][C]99[/C][C]101.86[/C][C]101.634[/C][C]101.211[/C][C]0.422365[/C][C]0.226385[/C][/ROW]
[ROW][C]100[/C][C]101.86[/C][C]101.684[/C][C]101.355[/C][C]0.328569[/C][C]0.176015[/C][/ROW]
[ROW][C]101[/C][C]101.86[/C][C]101.734[/C][C]101.5[/C][C]0.234772[/C][C]0.125644[/C][/ROW]
[ROW][C]102[/C][C]101.86[/C][C]101.785[/C][C]101.644[/C][C]0.140976[/C][C]0.0752739[/C][/ROW]
[ROW][C]103[/C][C]101.86[/C][C]101.832[/C][C]101.788[/C][C]0.0438002[/C][C]0.0282832[/C][/ROW]
[ROW][C]104[/C][C]101.86[/C][C]101.813[/C][C]101.86[/C][C]-0.0466165[/C][C]0.0466165[/C][/ROW]
[ROW][C]105[/C][C]101.86[/C][C]101.72[/C][C]101.86[/C][C]-0.140413[/C][C]0.140413[/C][/ROW]
[ROW][C]106[/C][C]101.86[/C][C]101.626[/C][C]101.86[/C][C]-0.234209[/C][C]0.234209[/C][/ROW]
[ROW][C]107[/C][C]101.86[/C][C]101.532[/C][C]101.86[/C][C]-0.328005[/C][C]0.328005[/C][/ROW]
[ROW][C]108[/C][C]101.86[/C][C]101.438[/C][C]101.86[/C][C]-0.421802[/C][C]0.421802[/C][/ROW]
[ROW][C]109[/C][C]101.86[/C][C]101.344[/C][C]101.86[/C][C]-0.515598[/C][C]0.515598[/C][/ROW]
[ROW][C]110[/C][C]101.86[/C][C]102.376[/C][C]101.86[/C][C]0.516161[/C][C]-0.516161[/C][/ROW]
[ROW][C]111[/C][C]101.86[/C][C]102.282[/C][C]101.86[/C][C]0.422365[/C][C]-0.422365[/C][/ROW]
[ROW][C]112[/C][C]101.86[/C][C]102.189[/C][C]101.86[/C][C]0.328569[/C][C]-0.328569[/C][/ROW]
[ROW][C]113[/C][C]101.86[/C][C]102.095[/C][C]101.86[/C][C]0.234772[/C][C]-0.234772[/C][/ROW]
[ROW][C]114[/C][C]101.86[/C][C]102.001[/C][C]101.86[/C][C]0.140976[/C][C]-0.140976[/C][/ROW]
[ROW][C]115[/C][C]101.86[/C][C]NA[/C][C]NA[/C][C]0.0438002[/C][C]NA[/C][/ROW]
[ROW][C]116[/C][C]101.86[/C][C]NA[/C][C]NA[/C][C]-0.0466165[/C][C]NA[/C][/ROW]
[ROW][C]117[/C][C]101.86[/C][C]NA[/C][C]NA[/C][C]-0.140413[/C][C]NA[/C][/ROW]
[ROW][C]118[/C][C]101.86[/C][C]NA[/C][C]NA[/C][C]-0.234209[/C][C]NA[/C][/ROW]
[ROW][C]119[/C][C]101.86[/C][C]NA[/C][C]NA[/C][C]-0.328005[/C][C]NA[/C][/ROW]
[ROW][C]120[/C][C]101.86[/C][C]NA[/C][C]NA[/C][C]-0.421802[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=294912&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=294912&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
192.46NANA-0.515598NA
291.73NANA0.516161NA
391.73NANA0.422365NA
491.73NANA0.328569NA
591.73NANA0.234772NA
691.73NANA0.140976NA
791.7391.804291.76040.0438002-0.0742168
891.7391.480991.5275-0.04661650.249117
991.7390.982191.1225-0.1404130.747913
1091.7390.483390.7175-0.2342091.24671
1191.7389.984590.3125-0.3280051.74551
1291.7389.485789.9075-0.4218022.2443
1391.7388.986989.5025-0.5155982.7431
1486.8789.613789.09750.516161-2.74366
1586.8789.114988.69250.422365-2.24486
1686.8788.616188.28750.328569-1.74607
1786.8788.117387.88250.234772-1.24727
1886.8787.618587.47750.140976-0.748476
1986.8787.116387.07250.0438002-0.2463
2086.8786.945986.9925-0.0466165-0.0758835
2186.8787.097187.2375-0.140413-0.227087
2286.8787.248387.4825-0.234209-0.378291
2386.8787.399587.7275-0.328005-0.529495
2486.8787.550787.9725-0.421802-0.680698
2586.8787.701988.2175-0.515598-0.831902
2689.8188.978788.46250.5161610.831339
2789.8189.129988.70750.4223650.680135
2889.8189.281188.95250.3285690.528931
2989.8189.432389.19750.2347720.377728
3089.8189.583589.44250.1409760.226524
3189.8189.731389.68750.04380020.0786998
3289.8189.971790.0183-0.0466165-0.161717
3389.8190.294690.435-0.140413-0.484587
3489.8190.617590.8517-0.234209-0.807458
3589.8190.940391.2683-0.328005-1.13033
3689.8191.263291.685-0.421802-1.4532
3789.8191.586192.1017-0.515598-1.77607
3894.8193.034592.51830.5161611.77551
3994.8193.357492.9350.4223651.45264
4094.8193.680293.35170.3285691.12976
4194.8194.003193.76830.2347720.806894
4294.8194.32694.1850.1409760.484024
4394.8194.645594.60170.04380020.164533
4494.8194.771794.8183-0.04661650.0382832
4594.8194.694694.835-0.1404130.115413
4694.8194.617594.8517-0.2342090.192542
4794.8194.540394.8683-0.3280050.269672
4894.8194.463294.885-0.4218020.346802
4994.8194.386194.9017-0.5155980.423931
5095.0195.434594.91830.516161-0.424495
5195.0195.357494.9350.422365-0.347365
5295.0195.280294.95170.328569-0.270235
5395.0195.203194.96830.234772-0.193106
5495.0195.12694.9850.140976-0.115976
5595.0195.045595.00170.0438002-0.0354668
5695.0194.986795.0333-0.04661650.0232832
5795.0194.939695.08-0.1404130.0704128
5895.0194.892595.1267-0.2342090.117542
5995.0194.845395.1733-0.3280050.164672
6095.0194.798295.22-0.4218020.211802
6195.0194.751195.2667-0.5155980.258931
6295.5795.829595.31330.516161-0.259495
6395.5795.782495.360.422365-0.212365
6495.5795.735295.40670.328569-0.165235
6595.5795.688195.45330.234772-0.118106
6695.5795.64195.50.140976-0.0709761
6795.5795.590595.54670.0438002-0.0204668
6895.5795.64895.6946-0.0466165-0.0779668
6995.5795.803395.9438-0.140413-0.233337
7095.5795.958796.1929-0.234209-0.388708
7195.5796.114196.4421-0.328005-0.544078
7295.5796.269496.6912-0.421802-0.699448
7395.5796.424896.9404-0.515598-0.854819
7498.5697.705797.18960.5161610.854255
7598.5697.861197.43880.4223650.698885
7698.5698.016597.68790.3285690.543515
7798.5698.171997.93710.2347720.388144
7898.5698.327298.18620.1409760.232774
7998.5698.479298.43540.04380020.0807832
8098.5698.578898.6254-0.0466165-0.0188002
8198.5698.615898.7563-0.140413-0.0558372
8298.5698.652998.8871-0.234209-0.0928742
8398.5698.689999.0179-0.328005-0.129911
8498.5698.726999.1488-0.421802-0.166948
8598.5698.76499.2796-0.515598-0.203985
86100.1399.926699.41040.5161610.203422
87100.1399.963699.54130.4223650.166385
88100.13100.00199.67210.3285690.129348
89100.13100.03899.80290.2347720.092311
90100.13100.07599.93380.1409760.0552739
91100.13100.108100.0650.04380020.0216165
92100.13100.155100.202-0.0466165-0.0254668
93100.13100.206100.346-0.140413-0.0758372
94100.13100.256100.49-0.234209-0.126208
95100.13100.307100.635-0.328005-0.176578
96100.13100.357100.779-0.421802-0.226948
97100.13100.407100.923-0.515598-0.277319
98101.86101.583101.0670.5161610.276755
99101.86101.634101.2110.4223650.226385
100101.86101.684101.3550.3285690.176015
101101.86101.734101.50.2347720.125644
102101.86101.785101.6440.1409760.0752739
103101.86101.832101.7880.04380020.0282832
104101.86101.813101.86-0.04661650.0466165
105101.86101.72101.86-0.1404130.140413
106101.86101.626101.86-0.2342090.234209
107101.86101.532101.86-0.3280050.328005
108101.86101.438101.86-0.4218020.421802
109101.86101.344101.86-0.5155980.515598
110101.86102.376101.860.516161-0.516161
111101.86102.282101.860.422365-0.422365
112101.86102.189101.860.328569-0.328569
113101.86102.095101.860.234772-0.234772
114101.86102.001101.860.140976-0.140976
115101.86NANA0.0438002NA
116101.86NANA-0.0466165NA
117101.86NANA-0.140413NA
118101.86NANA-0.234209NA
119101.86NANA-0.328005NA
120101.86NANA-0.421802NA



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