Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationSat, 13 Aug 2016 12:36:43 +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/Aug/13/t1471088288wqhw6jpggu7jspj.htm/, Retrieved Wed, 01 May 2024 14:30:59 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=296507, Retrieved Wed, 01 May 2024 14:30:59 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact153
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Mean versus Median] [mean vs median va...] [2016-08-11 11:22:45] [4c392b130fccc63297597dd6ffb6df17]
- RMP   [Mean Plot] [mean en meadian p...] [2016-08-11 22:10:26] [4c392b130fccc63297597dd6ffb6df17]
- RMP     [(Partial) Autocorrelation Function] [autocorrelation a...] [2016-08-11 22:42:14] [4c392b130fccc63297597dd6ffb6df17]
- RMPD        [Classical Decomposition] [additive decompos...] [2016-08-13 11:36:43] [d7adcc7732e5b057da1b42af54844e1a] [Current]
Feedback Forum

Post a new message
Dataseries X:
2421,21
2378,63
2336,00
2250,79
3113,00
3070,38
2421,21
1990,13
2032,71
2032,71
2075,33
2165,17
1904,92
1644,25
1430,79
1430,79
2250,79
2336,00
1686,83
952,46
1340,96
1340,96
1644,25
1819,29
1776,67
1340,96
1559,04
1473,42
2207,79
2032,71
1340,96
824,25
1298,33
1430,79
1559,04
1729,46
1383,54
1084,92
1213,17
1255,75
2378,63
2378,63
1729,46
1644,25
1904,92
1776,67
2122,58
2553,67
2639,29
2032,71
1861,88
1686,83
2856,96
2942,58
2724,50
2942,58
2899,54
2553,67
2942,58
3373,67
3548,71
3027,79
2681,88
2942,58
4065,42
4411,33
4326,13
4496,50
4453,92
4022,83
4757,21
4932,25
5188,29
4411,33
4108,04
4453,92
5278,13
6012,50
5837,46
5837,46
5923,08
5624,00
6401,42
6401,42
6268,96
5534,17
5666,63
5752,25
6315,79
7050,17
6529,21
6789,92
6571,83
6444,00
7439,08
7221,00
6917,71
6486,63
6917,71
7135,79
7396,04
7741,92
7396,04
7609,50
7349,21
7306,63
8386,88
8476,71
8130,83
7524,29
8041,00
8258,67
8519,33
8907,83
8519,33
8822,63
8690,17
8216,04
9211,08
9211,08




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

\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
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296507&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]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296507&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296507&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







Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
12421.21NANA167.783NA
22378.63NANA-411.178NA
32336NANA-429.955NA
42250.79NANA-388.307NA
53113NANA314.35NA
63070.38NANA531.449NA
72421.212399.852335.7664.08621.3636
81990.132196.952283.65-86.6977-206.821
92032.712154.782215.33-60.5489-122.074
102032.711890.652143.45-252.802142.063
112075.332300.612073.36227.256-225.283
122165.172331.42006.83324.564-166.227
131904.922113.421945.63167.783-208.497
141644.251460.621871.8-411.178183.629
151430.791369.781799.74-429.95561.0051
161430.791353.791742.09-388.30777.0035
172250.792009.661695.31314.35241.131
1823362194.381662.94531.449141.615
191686.831707.271643.1864.086-20.4364
20952.461538.51625.2-86.6977-586.042
211340.961557.361617.91-60.5489-216.397
221340.961372.221625.03-252.802-31.2644
231644.251852.271625.01227.256-208.017
241819.291935.151610.58324.564-115.857
251776.671751.321583.53167.78325.3535
261340.961152.61563.78-411.178188.357
271559.041126.711556.66-429.955432.333
281473.421170.321558.63-388.307303.099
292207.791873.171558.82314.35334.618
302032.712082.981551.53531.449-50.2669
311340.961595.491531.464.086-254.531
32824.251417.661504.36-86.6977-593.408
331298.331418.731479.28-60.5489-120.397
341430.791202.991455.8-252.802227.796
351559.041681.11453.84227.256-122.06
361729.461799.941475.38324.564-70.4803
371383.541673.761505.98167.783-290.219
381084.921145.151556.33-411.178-60.233
391213.171185.821615.77-429.95527.3526
401255.751267.151655.46-388.307-11.4011
412378.632007.71693.35314.35370.929
422378.632282.621751.17531.44996.0073
431729.461901.921837.8464.086-172.465
441644.251842.961929.65-86.6977-198.705
451904.921935.621996.17-60.5489-30.7049
461776.671788.362041.17-252.802-11.6932
472122.582306.312079.06227.256-183.733
482553.672447.052122.49324.564106.62
492639.292355.232187.44167.783284.064
502032.711871.822283-411.178160.887
511861.881948.592378.54-429.955-86.7053
521686.832064.052452.36-388.307-377.22
532856.962833.252518.9314.3523.7105
542942.583118.682587.23531.449-176.101
552724.52723.382659.2964.0861.12231
562942.582651.952738.65-86.6977290.632
572899.542753.732814.27-60.5489145.815
582553.672647.962900.76-252.802-94.2919
592942.583230.693003.44227.256-288.115
603373.673439.553114.99324.564-65.8841
613548.713410.73242.92167.783138.005
623027.792963.233374.4-411.17864.5645
632681.883073.963503.92-429.955-392.081
642942.583241.593629.9-388.307-299.009
654065.424081.073766.72314.35-15.6516
664411.334438.723907.27531.449-27.3906
674326.134104.614040.5364.086221.516
684496.54079.794166.49-86.6977416.706
694453.924223.014283.56-60.5489230.906
704022.834153.164405.96-252.802-130.326
714757.214746.724519.46227.25610.4939
724932.254961.274636.71324.564-29.0199
735188.294934.184766.39167.783254.114
744411.334474.064885.24-411.178-62.7305
754108.044572.375002.33-429.955-464.332
764453.924741.955130.26-388.307-288.03
775278.135579.835265.48314.35-301.702
786012.55926.655395.21531.44985.8456
795837.465565.535501.4564.086271.925
805837.465506.565593.26-86.6977330.896
815923.085644.445704.99-60.5489278.641
8256245571.225824.03-252.80252.7756
836401.426148.615921.36227.256252.805
846401.426332.46007.83324.56469.0243
856268.966247.676079.89167.78321.2868
865534.175737.226148.4-411.178-203.051
875666.635785.166215.12-429.955-118.532
885752.255888.016276.31-388.307-135.757
896315.796668.076353.72314.35-352.277
907050.176962.556431.1531.44987.6194
916529.216556.376492.2864.086-27.1581
926789.926472.36559-86.6977317.619
936571.836590.266650.81-60.5489-18.4344
9464446507.796760.59-252.802-63.7873
957439.087090.56863.25227.256348.577
9672217261.646937.08324.564-40.6449
976917.717169.87002.02167.783-252.094
986486.636661.117072.29-411.178-174.48
996917.716708.877138.83-429.955208.836
1007135.796818.857207.16-388.307316.935
1017396.047596.957282.6314.35-200.907
1027741.927905.867374.41531.449-163.939
1037396.047541.367477.2864.086-145.324
1047609.57484.367571.06-86.6977125.138
1057349.217600.557661.1-60.5489-251.341
1067306.637501.897754.69-252.802-195.258
1078386.888075.547848.28227.256311.344
1088476.718268.237943.66324.564208.482
1098130.838206.838039.05167.783-75.9999
1107524.297725.228136.4-411.178-200.93
11180417812.868242.82-429.955228.136
1128258.677948.288336.58-388.307310.394
1138519.338723.178408.82314.35-203.838
1148907.839005.218473.76531.449-97.3769
1158519.33NANA64.086NA
1168822.63NANA-86.6977NA
1178690.17NANA-60.5489NA
1188216.04NANA-252.802NA
1199211.08NANA227.256NA
1209211.08NANA324.564NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 2421.21 & NA & NA & 167.783 & NA \tabularnewline
2 & 2378.63 & NA & NA & -411.178 & NA \tabularnewline
3 & 2336 & NA & NA & -429.955 & NA \tabularnewline
4 & 2250.79 & NA & NA & -388.307 & NA \tabularnewline
5 & 3113 & NA & NA & 314.35 & NA \tabularnewline
6 & 3070.38 & NA & NA & 531.449 & NA \tabularnewline
7 & 2421.21 & 2399.85 & 2335.76 & 64.086 & 21.3636 \tabularnewline
8 & 1990.13 & 2196.95 & 2283.65 & -86.6977 & -206.821 \tabularnewline
9 & 2032.71 & 2154.78 & 2215.33 & -60.5489 & -122.074 \tabularnewline
10 & 2032.71 & 1890.65 & 2143.45 & -252.802 & 142.063 \tabularnewline
11 & 2075.33 & 2300.61 & 2073.36 & 227.256 & -225.283 \tabularnewline
12 & 2165.17 & 2331.4 & 2006.83 & 324.564 & -166.227 \tabularnewline
13 & 1904.92 & 2113.42 & 1945.63 & 167.783 & -208.497 \tabularnewline
14 & 1644.25 & 1460.62 & 1871.8 & -411.178 & 183.629 \tabularnewline
15 & 1430.79 & 1369.78 & 1799.74 & -429.955 & 61.0051 \tabularnewline
16 & 1430.79 & 1353.79 & 1742.09 & -388.307 & 77.0035 \tabularnewline
17 & 2250.79 & 2009.66 & 1695.31 & 314.35 & 241.131 \tabularnewline
18 & 2336 & 2194.38 & 1662.94 & 531.449 & 141.615 \tabularnewline
19 & 1686.83 & 1707.27 & 1643.18 & 64.086 & -20.4364 \tabularnewline
20 & 952.46 & 1538.5 & 1625.2 & -86.6977 & -586.042 \tabularnewline
21 & 1340.96 & 1557.36 & 1617.91 & -60.5489 & -216.397 \tabularnewline
22 & 1340.96 & 1372.22 & 1625.03 & -252.802 & -31.2644 \tabularnewline
23 & 1644.25 & 1852.27 & 1625.01 & 227.256 & -208.017 \tabularnewline
24 & 1819.29 & 1935.15 & 1610.58 & 324.564 & -115.857 \tabularnewline
25 & 1776.67 & 1751.32 & 1583.53 & 167.783 & 25.3535 \tabularnewline
26 & 1340.96 & 1152.6 & 1563.78 & -411.178 & 188.357 \tabularnewline
27 & 1559.04 & 1126.71 & 1556.66 & -429.955 & 432.333 \tabularnewline
28 & 1473.42 & 1170.32 & 1558.63 & -388.307 & 303.099 \tabularnewline
29 & 2207.79 & 1873.17 & 1558.82 & 314.35 & 334.618 \tabularnewline
30 & 2032.71 & 2082.98 & 1551.53 & 531.449 & -50.2669 \tabularnewline
31 & 1340.96 & 1595.49 & 1531.4 & 64.086 & -254.531 \tabularnewline
32 & 824.25 & 1417.66 & 1504.36 & -86.6977 & -593.408 \tabularnewline
33 & 1298.33 & 1418.73 & 1479.28 & -60.5489 & -120.397 \tabularnewline
34 & 1430.79 & 1202.99 & 1455.8 & -252.802 & 227.796 \tabularnewline
35 & 1559.04 & 1681.1 & 1453.84 & 227.256 & -122.06 \tabularnewline
36 & 1729.46 & 1799.94 & 1475.38 & 324.564 & -70.4803 \tabularnewline
37 & 1383.54 & 1673.76 & 1505.98 & 167.783 & -290.219 \tabularnewline
38 & 1084.92 & 1145.15 & 1556.33 & -411.178 & -60.233 \tabularnewline
39 & 1213.17 & 1185.82 & 1615.77 & -429.955 & 27.3526 \tabularnewline
40 & 1255.75 & 1267.15 & 1655.46 & -388.307 & -11.4011 \tabularnewline
41 & 2378.63 & 2007.7 & 1693.35 & 314.35 & 370.929 \tabularnewline
42 & 2378.63 & 2282.62 & 1751.17 & 531.449 & 96.0073 \tabularnewline
43 & 1729.46 & 1901.92 & 1837.84 & 64.086 & -172.465 \tabularnewline
44 & 1644.25 & 1842.96 & 1929.65 & -86.6977 & -198.705 \tabularnewline
45 & 1904.92 & 1935.62 & 1996.17 & -60.5489 & -30.7049 \tabularnewline
46 & 1776.67 & 1788.36 & 2041.17 & -252.802 & -11.6932 \tabularnewline
47 & 2122.58 & 2306.31 & 2079.06 & 227.256 & -183.733 \tabularnewline
48 & 2553.67 & 2447.05 & 2122.49 & 324.564 & 106.62 \tabularnewline
49 & 2639.29 & 2355.23 & 2187.44 & 167.783 & 284.064 \tabularnewline
50 & 2032.71 & 1871.82 & 2283 & -411.178 & 160.887 \tabularnewline
51 & 1861.88 & 1948.59 & 2378.54 & -429.955 & -86.7053 \tabularnewline
52 & 1686.83 & 2064.05 & 2452.36 & -388.307 & -377.22 \tabularnewline
53 & 2856.96 & 2833.25 & 2518.9 & 314.35 & 23.7105 \tabularnewline
54 & 2942.58 & 3118.68 & 2587.23 & 531.449 & -176.101 \tabularnewline
55 & 2724.5 & 2723.38 & 2659.29 & 64.086 & 1.12231 \tabularnewline
56 & 2942.58 & 2651.95 & 2738.65 & -86.6977 & 290.632 \tabularnewline
57 & 2899.54 & 2753.73 & 2814.27 & -60.5489 & 145.815 \tabularnewline
58 & 2553.67 & 2647.96 & 2900.76 & -252.802 & -94.2919 \tabularnewline
59 & 2942.58 & 3230.69 & 3003.44 & 227.256 & -288.115 \tabularnewline
60 & 3373.67 & 3439.55 & 3114.99 & 324.564 & -65.8841 \tabularnewline
61 & 3548.71 & 3410.7 & 3242.92 & 167.783 & 138.005 \tabularnewline
62 & 3027.79 & 2963.23 & 3374.4 & -411.178 & 64.5645 \tabularnewline
63 & 2681.88 & 3073.96 & 3503.92 & -429.955 & -392.081 \tabularnewline
64 & 2942.58 & 3241.59 & 3629.9 & -388.307 & -299.009 \tabularnewline
65 & 4065.42 & 4081.07 & 3766.72 & 314.35 & -15.6516 \tabularnewline
66 & 4411.33 & 4438.72 & 3907.27 & 531.449 & -27.3906 \tabularnewline
67 & 4326.13 & 4104.61 & 4040.53 & 64.086 & 221.516 \tabularnewline
68 & 4496.5 & 4079.79 & 4166.49 & -86.6977 & 416.706 \tabularnewline
69 & 4453.92 & 4223.01 & 4283.56 & -60.5489 & 230.906 \tabularnewline
70 & 4022.83 & 4153.16 & 4405.96 & -252.802 & -130.326 \tabularnewline
71 & 4757.21 & 4746.72 & 4519.46 & 227.256 & 10.4939 \tabularnewline
72 & 4932.25 & 4961.27 & 4636.71 & 324.564 & -29.0199 \tabularnewline
73 & 5188.29 & 4934.18 & 4766.39 & 167.783 & 254.114 \tabularnewline
74 & 4411.33 & 4474.06 & 4885.24 & -411.178 & -62.7305 \tabularnewline
75 & 4108.04 & 4572.37 & 5002.33 & -429.955 & -464.332 \tabularnewline
76 & 4453.92 & 4741.95 & 5130.26 & -388.307 & -288.03 \tabularnewline
77 & 5278.13 & 5579.83 & 5265.48 & 314.35 & -301.702 \tabularnewline
78 & 6012.5 & 5926.65 & 5395.21 & 531.449 & 85.8456 \tabularnewline
79 & 5837.46 & 5565.53 & 5501.45 & 64.086 & 271.925 \tabularnewline
80 & 5837.46 & 5506.56 & 5593.26 & -86.6977 & 330.896 \tabularnewline
81 & 5923.08 & 5644.44 & 5704.99 & -60.5489 & 278.641 \tabularnewline
82 & 5624 & 5571.22 & 5824.03 & -252.802 & 52.7756 \tabularnewline
83 & 6401.42 & 6148.61 & 5921.36 & 227.256 & 252.805 \tabularnewline
84 & 6401.42 & 6332.4 & 6007.83 & 324.564 & 69.0243 \tabularnewline
85 & 6268.96 & 6247.67 & 6079.89 & 167.783 & 21.2868 \tabularnewline
86 & 5534.17 & 5737.22 & 6148.4 & -411.178 & -203.051 \tabularnewline
87 & 5666.63 & 5785.16 & 6215.12 & -429.955 & -118.532 \tabularnewline
88 & 5752.25 & 5888.01 & 6276.31 & -388.307 & -135.757 \tabularnewline
89 & 6315.79 & 6668.07 & 6353.72 & 314.35 & -352.277 \tabularnewline
90 & 7050.17 & 6962.55 & 6431.1 & 531.449 & 87.6194 \tabularnewline
91 & 6529.21 & 6556.37 & 6492.28 & 64.086 & -27.1581 \tabularnewline
92 & 6789.92 & 6472.3 & 6559 & -86.6977 & 317.619 \tabularnewline
93 & 6571.83 & 6590.26 & 6650.81 & -60.5489 & -18.4344 \tabularnewline
94 & 6444 & 6507.79 & 6760.59 & -252.802 & -63.7873 \tabularnewline
95 & 7439.08 & 7090.5 & 6863.25 & 227.256 & 348.577 \tabularnewline
96 & 7221 & 7261.64 & 6937.08 & 324.564 & -40.6449 \tabularnewline
97 & 6917.71 & 7169.8 & 7002.02 & 167.783 & -252.094 \tabularnewline
98 & 6486.63 & 6661.11 & 7072.29 & -411.178 & -174.48 \tabularnewline
99 & 6917.71 & 6708.87 & 7138.83 & -429.955 & 208.836 \tabularnewline
100 & 7135.79 & 6818.85 & 7207.16 & -388.307 & 316.935 \tabularnewline
101 & 7396.04 & 7596.95 & 7282.6 & 314.35 & -200.907 \tabularnewline
102 & 7741.92 & 7905.86 & 7374.41 & 531.449 & -163.939 \tabularnewline
103 & 7396.04 & 7541.36 & 7477.28 & 64.086 & -145.324 \tabularnewline
104 & 7609.5 & 7484.36 & 7571.06 & -86.6977 & 125.138 \tabularnewline
105 & 7349.21 & 7600.55 & 7661.1 & -60.5489 & -251.341 \tabularnewline
106 & 7306.63 & 7501.89 & 7754.69 & -252.802 & -195.258 \tabularnewline
107 & 8386.88 & 8075.54 & 7848.28 & 227.256 & 311.344 \tabularnewline
108 & 8476.71 & 8268.23 & 7943.66 & 324.564 & 208.482 \tabularnewline
109 & 8130.83 & 8206.83 & 8039.05 & 167.783 & -75.9999 \tabularnewline
110 & 7524.29 & 7725.22 & 8136.4 & -411.178 & -200.93 \tabularnewline
111 & 8041 & 7812.86 & 8242.82 & -429.955 & 228.136 \tabularnewline
112 & 8258.67 & 7948.28 & 8336.58 & -388.307 & 310.394 \tabularnewline
113 & 8519.33 & 8723.17 & 8408.82 & 314.35 & -203.838 \tabularnewline
114 & 8907.83 & 9005.21 & 8473.76 & 531.449 & -97.3769 \tabularnewline
115 & 8519.33 & NA & NA & 64.086 & NA \tabularnewline
116 & 8822.63 & NA & NA & -86.6977 & NA \tabularnewline
117 & 8690.17 & NA & NA & -60.5489 & NA \tabularnewline
118 & 8216.04 & NA & NA & -252.802 & NA \tabularnewline
119 & 9211.08 & NA & NA & 227.256 & NA \tabularnewline
120 & 9211.08 & NA & NA & 324.564 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296507&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]2421.21[/C][C]NA[/C][C]NA[/C][C]167.783[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]2378.63[/C][C]NA[/C][C]NA[/C][C]-411.178[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]2336[/C][C]NA[/C][C]NA[/C][C]-429.955[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]2250.79[/C][C]NA[/C][C]NA[/C][C]-388.307[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]3113[/C][C]NA[/C][C]NA[/C][C]314.35[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]3070.38[/C][C]NA[/C][C]NA[/C][C]531.449[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]2421.21[/C][C]2399.85[/C][C]2335.76[/C][C]64.086[/C][C]21.3636[/C][/ROW]
[ROW][C]8[/C][C]1990.13[/C][C]2196.95[/C][C]2283.65[/C][C]-86.6977[/C][C]-206.821[/C][/ROW]
[ROW][C]9[/C][C]2032.71[/C][C]2154.78[/C][C]2215.33[/C][C]-60.5489[/C][C]-122.074[/C][/ROW]
[ROW][C]10[/C][C]2032.71[/C][C]1890.65[/C][C]2143.45[/C][C]-252.802[/C][C]142.063[/C][/ROW]
[ROW][C]11[/C][C]2075.33[/C][C]2300.61[/C][C]2073.36[/C][C]227.256[/C][C]-225.283[/C][/ROW]
[ROW][C]12[/C][C]2165.17[/C][C]2331.4[/C][C]2006.83[/C][C]324.564[/C][C]-166.227[/C][/ROW]
[ROW][C]13[/C][C]1904.92[/C][C]2113.42[/C][C]1945.63[/C][C]167.783[/C][C]-208.497[/C][/ROW]
[ROW][C]14[/C][C]1644.25[/C][C]1460.62[/C][C]1871.8[/C][C]-411.178[/C][C]183.629[/C][/ROW]
[ROW][C]15[/C][C]1430.79[/C][C]1369.78[/C][C]1799.74[/C][C]-429.955[/C][C]61.0051[/C][/ROW]
[ROW][C]16[/C][C]1430.79[/C][C]1353.79[/C][C]1742.09[/C][C]-388.307[/C][C]77.0035[/C][/ROW]
[ROW][C]17[/C][C]2250.79[/C][C]2009.66[/C][C]1695.31[/C][C]314.35[/C][C]241.131[/C][/ROW]
[ROW][C]18[/C][C]2336[/C][C]2194.38[/C][C]1662.94[/C][C]531.449[/C][C]141.615[/C][/ROW]
[ROW][C]19[/C][C]1686.83[/C][C]1707.27[/C][C]1643.18[/C][C]64.086[/C][C]-20.4364[/C][/ROW]
[ROW][C]20[/C][C]952.46[/C][C]1538.5[/C][C]1625.2[/C][C]-86.6977[/C][C]-586.042[/C][/ROW]
[ROW][C]21[/C][C]1340.96[/C][C]1557.36[/C][C]1617.91[/C][C]-60.5489[/C][C]-216.397[/C][/ROW]
[ROW][C]22[/C][C]1340.96[/C][C]1372.22[/C][C]1625.03[/C][C]-252.802[/C][C]-31.2644[/C][/ROW]
[ROW][C]23[/C][C]1644.25[/C][C]1852.27[/C][C]1625.01[/C][C]227.256[/C][C]-208.017[/C][/ROW]
[ROW][C]24[/C][C]1819.29[/C][C]1935.15[/C][C]1610.58[/C][C]324.564[/C][C]-115.857[/C][/ROW]
[ROW][C]25[/C][C]1776.67[/C][C]1751.32[/C][C]1583.53[/C][C]167.783[/C][C]25.3535[/C][/ROW]
[ROW][C]26[/C][C]1340.96[/C][C]1152.6[/C][C]1563.78[/C][C]-411.178[/C][C]188.357[/C][/ROW]
[ROW][C]27[/C][C]1559.04[/C][C]1126.71[/C][C]1556.66[/C][C]-429.955[/C][C]432.333[/C][/ROW]
[ROW][C]28[/C][C]1473.42[/C][C]1170.32[/C][C]1558.63[/C][C]-388.307[/C][C]303.099[/C][/ROW]
[ROW][C]29[/C][C]2207.79[/C][C]1873.17[/C][C]1558.82[/C][C]314.35[/C][C]334.618[/C][/ROW]
[ROW][C]30[/C][C]2032.71[/C][C]2082.98[/C][C]1551.53[/C][C]531.449[/C][C]-50.2669[/C][/ROW]
[ROW][C]31[/C][C]1340.96[/C][C]1595.49[/C][C]1531.4[/C][C]64.086[/C][C]-254.531[/C][/ROW]
[ROW][C]32[/C][C]824.25[/C][C]1417.66[/C][C]1504.36[/C][C]-86.6977[/C][C]-593.408[/C][/ROW]
[ROW][C]33[/C][C]1298.33[/C][C]1418.73[/C][C]1479.28[/C][C]-60.5489[/C][C]-120.397[/C][/ROW]
[ROW][C]34[/C][C]1430.79[/C][C]1202.99[/C][C]1455.8[/C][C]-252.802[/C][C]227.796[/C][/ROW]
[ROW][C]35[/C][C]1559.04[/C][C]1681.1[/C][C]1453.84[/C][C]227.256[/C][C]-122.06[/C][/ROW]
[ROW][C]36[/C][C]1729.46[/C][C]1799.94[/C][C]1475.38[/C][C]324.564[/C][C]-70.4803[/C][/ROW]
[ROW][C]37[/C][C]1383.54[/C][C]1673.76[/C][C]1505.98[/C][C]167.783[/C][C]-290.219[/C][/ROW]
[ROW][C]38[/C][C]1084.92[/C][C]1145.15[/C][C]1556.33[/C][C]-411.178[/C][C]-60.233[/C][/ROW]
[ROW][C]39[/C][C]1213.17[/C][C]1185.82[/C][C]1615.77[/C][C]-429.955[/C][C]27.3526[/C][/ROW]
[ROW][C]40[/C][C]1255.75[/C][C]1267.15[/C][C]1655.46[/C][C]-388.307[/C][C]-11.4011[/C][/ROW]
[ROW][C]41[/C][C]2378.63[/C][C]2007.7[/C][C]1693.35[/C][C]314.35[/C][C]370.929[/C][/ROW]
[ROW][C]42[/C][C]2378.63[/C][C]2282.62[/C][C]1751.17[/C][C]531.449[/C][C]96.0073[/C][/ROW]
[ROW][C]43[/C][C]1729.46[/C][C]1901.92[/C][C]1837.84[/C][C]64.086[/C][C]-172.465[/C][/ROW]
[ROW][C]44[/C][C]1644.25[/C][C]1842.96[/C][C]1929.65[/C][C]-86.6977[/C][C]-198.705[/C][/ROW]
[ROW][C]45[/C][C]1904.92[/C][C]1935.62[/C][C]1996.17[/C][C]-60.5489[/C][C]-30.7049[/C][/ROW]
[ROW][C]46[/C][C]1776.67[/C][C]1788.36[/C][C]2041.17[/C][C]-252.802[/C][C]-11.6932[/C][/ROW]
[ROW][C]47[/C][C]2122.58[/C][C]2306.31[/C][C]2079.06[/C][C]227.256[/C][C]-183.733[/C][/ROW]
[ROW][C]48[/C][C]2553.67[/C][C]2447.05[/C][C]2122.49[/C][C]324.564[/C][C]106.62[/C][/ROW]
[ROW][C]49[/C][C]2639.29[/C][C]2355.23[/C][C]2187.44[/C][C]167.783[/C][C]284.064[/C][/ROW]
[ROW][C]50[/C][C]2032.71[/C][C]1871.82[/C][C]2283[/C][C]-411.178[/C][C]160.887[/C][/ROW]
[ROW][C]51[/C][C]1861.88[/C][C]1948.59[/C][C]2378.54[/C][C]-429.955[/C][C]-86.7053[/C][/ROW]
[ROW][C]52[/C][C]1686.83[/C][C]2064.05[/C][C]2452.36[/C][C]-388.307[/C][C]-377.22[/C][/ROW]
[ROW][C]53[/C][C]2856.96[/C][C]2833.25[/C][C]2518.9[/C][C]314.35[/C][C]23.7105[/C][/ROW]
[ROW][C]54[/C][C]2942.58[/C][C]3118.68[/C][C]2587.23[/C][C]531.449[/C][C]-176.101[/C][/ROW]
[ROW][C]55[/C][C]2724.5[/C][C]2723.38[/C][C]2659.29[/C][C]64.086[/C][C]1.12231[/C][/ROW]
[ROW][C]56[/C][C]2942.58[/C][C]2651.95[/C][C]2738.65[/C][C]-86.6977[/C][C]290.632[/C][/ROW]
[ROW][C]57[/C][C]2899.54[/C][C]2753.73[/C][C]2814.27[/C][C]-60.5489[/C][C]145.815[/C][/ROW]
[ROW][C]58[/C][C]2553.67[/C][C]2647.96[/C][C]2900.76[/C][C]-252.802[/C][C]-94.2919[/C][/ROW]
[ROW][C]59[/C][C]2942.58[/C][C]3230.69[/C][C]3003.44[/C][C]227.256[/C][C]-288.115[/C][/ROW]
[ROW][C]60[/C][C]3373.67[/C][C]3439.55[/C][C]3114.99[/C][C]324.564[/C][C]-65.8841[/C][/ROW]
[ROW][C]61[/C][C]3548.71[/C][C]3410.7[/C][C]3242.92[/C][C]167.783[/C][C]138.005[/C][/ROW]
[ROW][C]62[/C][C]3027.79[/C][C]2963.23[/C][C]3374.4[/C][C]-411.178[/C][C]64.5645[/C][/ROW]
[ROW][C]63[/C][C]2681.88[/C][C]3073.96[/C][C]3503.92[/C][C]-429.955[/C][C]-392.081[/C][/ROW]
[ROW][C]64[/C][C]2942.58[/C][C]3241.59[/C][C]3629.9[/C][C]-388.307[/C][C]-299.009[/C][/ROW]
[ROW][C]65[/C][C]4065.42[/C][C]4081.07[/C][C]3766.72[/C][C]314.35[/C][C]-15.6516[/C][/ROW]
[ROW][C]66[/C][C]4411.33[/C][C]4438.72[/C][C]3907.27[/C][C]531.449[/C][C]-27.3906[/C][/ROW]
[ROW][C]67[/C][C]4326.13[/C][C]4104.61[/C][C]4040.53[/C][C]64.086[/C][C]221.516[/C][/ROW]
[ROW][C]68[/C][C]4496.5[/C][C]4079.79[/C][C]4166.49[/C][C]-86.6977[/C][C]416.706[/C][/ROW]
[ROW][C]69[/C][C]4453.92[/C][C]4223.01[/C][C]4283.56[/C][C]-60.5489[/C][C]230.906[/C][/ROW]
[ROW][C]70[/C][C]4022.83[/C][C]4153.16[/C][C]4405.96[/C][C]-252.802[/C][C]-130.326[/C][/ROW]
[ROW][C]71[/C][C]4757.21[/C][C]4746.72[/C][C]4519.46[/C][C]227.256[/C][C]10.4939[/C][/ROW]
[ROW][C]72[/C][C]4932.25[/C][C]4961.27[/C][C]4636.71[/C][C]324.564[/C][C]-29.0199[/C][/ROW]
[ROW][C]73[/C][C]5188.29[/C][C]4934.18[/C][C]4766.39[/C][C]167.783[/C][C]254.114[/C][/ROW]
[ROW][C]74[/C][C]4411.33[/C][C]4474.06[/C][C]4885.24[/C][C]-411.178[/C][C]-62.7305[/C][/ROW]
[ROW][C]75[/C][C]4108.04[/C][C]4572.37[/C][C]5002.33[/C][C]-429.955[/C][C]-464.332[/C][/ROW]
[ROW][C]76[/C][C]4453.92[/C][C]4741.95[/C][C]5130.26[/C][C]-388.307[/C][C]-288.03[/C][/ROW]
[ROW][C]77[/C][C]5278.13[/C][C]5579.83[/C][C]5265.48[/C][C]314.35[/C][C]-301.702[/C][/ROW]
[ROW][C]78[/C][C]6012.5[/C][C]5926.65[/C][C]5395.21[/C][C]531.449[/C][C]85.8456[/C][/ROW]
[ROW][C]79[/C][C]5837.46[/C][C]5565.53[/C][C]5501.45[/C][C]64.086[/C][C]271.925[/C][/ROW]
[ROW][C]80[/C][C]5837.46[/C][C]5506.56[/C][C]5593.26[/C][C]-86.6977[/C][C]330.896[/C][/ROW]
[ROW][C]81[/C][C]5923.08[/C][C]5644.44[/C][C]5704.99[/C][C]-60.5489[/C][C]278.641[/C][/ROW]
[ROW][C]82[/C][C]5624[/C][C]5571.22[/C][C]5824.03[/C][C]-252.802[/C][C]52.7756[/C][/ROW]
[ROW][C]83[/C][C]6401.42[/C][C]6148.61[/C][C]5921.36[/C][C]227.256[/C][C]252.805[/C][/ROW]
[ROW][C]84[/C][C]6401.42[/C][C]6332.4[/C][C]6007.83[/C][C]324.564[/C][C]69.0243[/C][/ROW]
[ROW][C]85[/C][C]6268.96[/C][C]6247.67[/C][C]6079.89[/C][C]167.783[/C][C]21.2868[/C][/ROW]
[ROW][C]86[/C][C]5534.17[/C][C]5737.22[/C][C]6148.4[/C][C]-411.178[/C][C]-203.051[/C][/ROW]
[ROW][C]87[/C][C]5666.63[/C][C]5785.16[/C][C]6215.12[/C][C]-429.955[/C][C]-118.532[/C][/ROW]
[ROW][C]88[/C][C]5752.25[/C][C]5888.01[/C][C]6276.31[/C][C]-388.307[/C][C]-135.757[/C][/ROW]
[ROW][C]89[/C][C]6315.79[/C][C]6668.07[/C][C]6353.72[/C][C]314.35[/C][C]-352.277[/C][/ROW]
[ROW][C]90[/C][C]7050.17[/C][C]6962.55[/C][C]6431.1[/C][C]531.449[/C][C]87.6194[/C][/ROW]
[ROW][C]91[/C][C]6529.21[/C][C]6556.37[/C][C]6492.28[/C][C]64.086[/C][C]-27.1581[/C][/ROW]
[ROW][C]92[/C][C]6789.92[/C][C]6472.3[/C][C]6559[/C][C]-86.6977[/C][C]317.619[/C][/ROW]
[ROW][C]93[/C][C]6571.83[/C][C]6590.26[/C][C]6650.81[/C][C]-60.5489[/C][C]-18.4344[/C][/ROW]
[ROW][C]94[/C][C]6444[/C][C]6507.79[/C][C]6760.59[/C][C]-252.802[/C][C]-63.7873[/C][/ROW]
[ROW][C]95[/C][C]7439.08[/C][C]7090.5[/C][C]6863.25[/C][C]227.256[/C][C]348.577[/C][/ROW]
[ROW][C]96[/C][C]7221[/C][C]7261.64[/C][C]6937.08[/C][C]324.564[/C][C]-40.6449[/C][/ROW]
[ROW][C]97[/C][C]6917.71[/C][C]7169.8[/C][C]7002.02[/C][C]167.783[/C][C]-252.094[/C][/ROW]
[ROW][C]98[/C][C]6486.63[/C][C]6661.11[/C][C]7072.29[/C][C]-411.178[/C][C]-174.48[/C][/ROW]
[ROW][C]99[/C][C]6917.71[/C][C]6708.87[/C][C]7138.83[/C][C]-429.955[/C][C]208.836[/C][/ROW]
[ROW][C]100[/C][C]7135.79[/C][C]6818.85[/C][C]7207.16[/C][C]-388.307[/C][C]316.935[/C][/ROW]
[ROW][C]101[/C][C]7396.04[/C][C]7596.95[/C][C]7282.6[/C][C]314.35[/C][C]-200.907[/C][/ROW]
[ROW][C]102[/C][C]7741.92[/C][C]7905.86[/C][C]7374.41[/C][C]531.449[/C][C]-163.939[/C][/ROW]
[ROW][C]103[/C][C]7396.04[/C][C]7541.36[/C][C]7477.28[/C][C]64.086[/C][C]-145.324[/C][/ROW]
[ROW][C]104[/C][C]7609.5[/C][C]7484.36[/C][C]7571.06[/C][C]-86.6977[/C][C]125.138[/C][/ROW]
[ROW][C]105[/C][C]7349.21[/C][C]7600.55[/C][C]7661.1[/C][C]-60.5489[/C][C]-251.341[/C][/ROW]
[ROW][C]106[/C][C]7306.63[/C][C]7501.89[/C][C]7754.69[/C][C]-252.802[/C][C]-195.258[/C][/ROW]
[ROW][C]107[/C][C]8386.88[/C][C]8075.54[/C][C]7848.28[/C][C]227.256[/C][C]311.344[/C][/ROW]
[ROW][C]108[/C][C]8476.71[/C][C]8268.23[/C][C]7943.66[/C][C]324.564[/C][C]208.482[/C][/ROW]
[ROW][C]109[/C][C]8130.83[/C][C]8206.83[/C][C]8039.05[/C][C]167.783[/C][C]-75.9999[/C][/ROW]
[ROW][C]110[/C][C]7524.29[/C][C]7725.22[/C][C]8136.4[/C][C]-411.178[/C][C]-200.93[/C][/ROW]
[ROW][C]111[/C][C]8041[/C][C]7812.86[/C][C]8242.82[/C][C]-429.955[/C][C]228.136[/C][/ROW]
[ROW][C]112[/C][C]8258.67[/C][C]7948.28[/C][C]8336.58[/C][C]-388.307[/C][C]310.394[/C][/ROW]
[ROW][C]113[/C][C]8519.33[/C][C]8723.17[/C][C]8408.82[/C][C]314.35[/C][C]-203.838[/C][/ROW]
[ROW][C]114[/C][C]8907.83[/C][C]9005.21[/C][C]8473.76[/C][C]531.449[/C][C]-97.3769[/C][/ROW]
[ROW][C]115[/C][C]8519.33[/C][C]NA[/C][C]NA[/C][C]64.086[/C][C]NA[/C][/ROW]
[ROW][C]116[/C][C]8822.63[/C][C]NA[/C][C]NA[/C][C]-86.6977[/C][C]NA[/C][/ROW]
[ROW][C]117[/C][C]8690.17[/C][C]NA[/C][C]NA[/C][C]-60.5489[/C][C]NA[/C][/ROW]
[ROW][C]118[/C][C]8216.04[/C][C]NA[/C][C]NA[/C][C]-252.802[/C][C]NA[/C][/ROW]
[ROW][C]119[/C][C]9211.08[/C][C]NA[/C][C]NA[/C][C]227.256[/C][C]NA[/C][/ROW]
[ROW][C]120[/C][C]9211.08[/C][C]NA[/C][C]NA[/C][C]324.564[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296507&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296507&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
12421.21NANA167.783NA
22378.63NANA-411.178NA
32336NANA-429.955NA
42250.79NANA-388.307NA
53113NANA314.35NA
63070.38NANA531.449NA
72421.212399.852335.7664.08621.3636
81990.132196.952283.65-86.6977-206.821
92032.712154.782215.33-60.5489-122.074
102032.711890.652143.45-252.802142.063
112075.332300.612073.36227.256-225.283
122165.172331.42006.83324.564-166.227
131904.922113.421945.63167.783-208.497
141644.251460.621871.8-411.178183.629
151430.791369.781799.74-429.95561.0051
161430.791353.791742.09-388.30777.0035
172250.792009.661695.31314.35241.131
1823362194.381662.94531.449141.615
191686.831707.271643.1864.086-20.4364
20952.461538.51625.2-86.6977-586.042
211340.961557.361617.91-60.5489-216.397
221340.961372.221625.03-252.802-31.2644
231644.251852.271625.01227.256-208.017
241819.291935.151610.58324.564-115.857
251776.671751.321583.53167.78325.3535
261340.961152.61563.78-411.178188.357
271559.041126.711556.66-429.955432.333
281473.421170.321558.63-388.307303.099
292207.791873.171558.82314.35334.618
302032.712082.981551.53531.449-50.2669
311340.961595.491531.464.086-254.531
32824.251417.661504.36-86.6977-593.408
331298.331418.731479.28-60.5489-120.397
341430.791202.991455.8-252.802227.796
351559.041681.11453.84227.256-122.06
361729.461799.941475.38324.564-70.4803
371383.541673.761505.98167.783-290.219
381084.921145.151556.33-411.178-60.233
391213.171185.821615.77-429.95527.3526
401255.751267.151655.46-388.307-11.4011
412378.632007.71693.35314.35370.929
422378.632282.621751.17531.44996.0073
431729.461901.921837.8464.086-172.465
441644.251842.961929.65-86.6977-198.705
451904.921935.621996.17-60.5489-30.7049
461776.671788.362041.17-252.802-11.6932
472122.582306.312079.06227.256-183.733
482553.672447.052122.49324.564106.62
492639.292355.232187.44167.783284.064
502032.711871.822283-411.178160.887
511861.881948.592378.54-429.955-86.7053
521686.832064.052452.36-388.307-377.22
532856.962833.252518.9314.3523.7105
542942.583118.682587.23531.449-176.101
552724.52723.382659.2964.0861.12231
562942.582651.952738.65-86.6977290.632
572899.542753.732814.27-60.5489145.815
582553.672647.962900.76-252.802-94.2919
592942.583230.693003.44227.256-288.115
603373.673439.553114.99324.564-65.8841
613548.713410.73242.92167.783138.005
623027.792963.233374.4-411.17864.5645
632681.883073.963503.92-429.955-392.081
642942.583241.593629.9-388.307-299.009
654065.424081.073766.72314.35-15.6516
664411.334438.723907.27531.449-27.3906
674326.134104.614040.5364.086221.516
684496.54079.794166.49-86.6977416.706
694453.924223.014283.56-60.5489230.906
704022.834153.164405.96-252.802-130.326
714757.214746.724519.46227.25610.4939
724932.254961.274636.71324.564-29.0199
735188.294934.184766.39167.783254.114
744411.334474.064885.24-411.178-62.7305
754108.044572.375002.33-429.955-464.332
764453.924741.955130.26-388.307-288.03
775278.135579.835265.48314.35-301.702
786012.55926.655395.21531.44985.8456
795837.465565.535501.4564.086271.925
805837.465506.565593.26-86.6977330.896
815923.085644.445704.99-60.5489278.641
8256245571.225824.03-252.80252.7756
836401.426148.615921.36227.256252.805
846401.426332.46007.83324.56469.0243
856268.966247.676079.89167.78321.2868
865534.175737.226148.4-411.178-203.051
875666.635785.166215.12-429.955-118.532
885752.255888.016276.31-388.307-135.757
896315.796668.076353.72314.35-352.277
907050.176962.556431.1531.44987.6194
916529.216556.376492.2864.086-27.1581
926789.926472.36559-86.6977317.619
936571.836590.266650.81-60.5489-18.4344
9464446507.796760.59-252.802-63.7873
957439.087090.56863.25227.256348.577
9672217261.646937.08324.564-40.6449
976917.717169.87002.02167.783-252.094
986486.636661.117072.29-411.178-174.48
996917.716708.877138.83-429.955208.836
1007135.796818.857207.16-388.307316.935
1017396.047596.957282.6314.35-200.907
1027741.927905.867374.41531.449-163.939
1037396.047541.367477.2864.086-145.324
1047609.57484.367571.06-86.6977125.138
1057349.217600.557661.1-60.5489-251.341
1067306.637501.897754.69-252.802-195.258
1078386.888075.547848.28227.256311.344
1088476.718268.237943.66324.564208.482
1098130.838206.838039.05167.783-75.9999
1107524.297725.228136.4-411.178-200.93
11180417812.868242.82-429.955228.136
1128258.677948.288336.58-388.307310.394
1138519.338723.178408.82314.35-203.838
1148907.839005.218473.76531.449-97.3769
1158519.33NANA64.086NA
1168822.63NANA-86.6977NA
1178690.17NANA-60.5489NA
1188216.04NANA-252.802NA
1199211.08NANA227.256NA
1209211.08NANA324.564NA



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