Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationFri, 12 Aug 2016 20:49:08 +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/12/t1471031408y8m8whw24s5m9k1.htm/, Retrieved Sun, 05 May 2024 11:41:38 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=296471, Retrieved Sun, 05 May 2024 11:41:38 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact108
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [Omzet Mentos Aardbei] [2016-07-17 11:11:37] [74be16979710d4c4e7c6647856088456]
-   P   [Univariate Data Series] [Omzet Mentos Aardbei] [2016-08-02 12:13:56] [74be16979710d4c4e7c6647856088456]
-   P     [Univariate Data Series] [] [2016-08-12 10:07:18] [74be16979710d4c4e7c6647856088456]
- R  D      [Univariate Data Series] [] [2016-08-12 10:23:50] [74be16979710d4c4e7c6647856088456]
- RMP           [Classical Decomposition] [] [2016-08-12 19:49:08] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
425.25
417.75
410.25
395.25
546.75
539.25
425.25
349.50
357.00
357.00
364.50
380.25
334.50
288.75
251.25
251.25
395.25
410.25
296.25
167.25
235.50
235.50
288.75
319.50
312.00
235.50
273.75
258.75
387.75
357.00
235.50
144.75
228.00
251.25
273.75
303.75
243.00
190.50
213.00
220.50
417.75
417.75
303.75
288.75
334.50
312.00
372.75
448.50
463.50
357.00
327.00
296.25
501.75
516.75
478.50
516.75
509.25
448.50
516.75
592.50
623.25
531.75
471.00
516.75
714.00
774.75
759.75
789.75
782.25
706.50
835.50
866.25
911.25
774.75
721.50
782.25
927.00
1056.00
1025.25
1025.25
1040.25
987.75
1124.25
1124.25
1101.00
972.00
995.25
1010.25
1109.25
1238.25
1146.75
1192.50
1154.25
1131.75
1306.50
1268.25
1215.00
1139.25
1215.00
1253.25
1299.00
1359.75
1299.00
1336.50
1290.75
1283.25
1473.00
1488.75
1428.00
1321.50
1412.25
1450.50
1496.25
1564.50
1496.25
1549.50
1526.25
1443.00
1617.75
1617.75




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.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 & 3 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296471&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]3 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296471&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296471&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 time3 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.wessa.net







Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
1425.25NANA29.4664NA
2417.75NANA-72.2141NA
3410.25NANA-75.5162NA
4395.25NANA-68.2072NA
5546.75NANA55.213NA
6539.25NANA93.3484NA
7425.25421.487410.21911.26853.76273
8349.5385.838401.062-15.2245-36.338
9357378.432389.062-10.6308-21.4317
10357332.032376.438-44.405124.9676
11364.5404.022364.12539.897-39.522
12380.25409.442352.43857.0046-29.1921
13334.5371.154341.68829.4664-36.6539
14288.75256.505328.719-72.214132.2454
15251.25240.546316.062-75.516210.7037
16251.25237.73305.938-68.207213.5197
17395.25352.932297.71955.21342.3183
18410.25385.38292.03193.348424.8704
19296.25299.831288.56211.2685-3.58102
20167.25270.182285.406-15.2245-102.932
21235.5273.494284.125-10.6308-37.9942
22235.5240.97285.375-44.4051-5.46991
23288.75325.272285.37539.897-36.522
24319.5339.848282.84457.0046-20.3484
25312307.56278.09429.46644.43981
26235.5202.411274.625-72.214133.0891
27273.75197.859273.375-75.516275.8912
28258.75205.512273.719-68.207253.2384
29387.75328.963273.7555.21358.787
30357365.817272.46993.3484-8.81713
31235.5280.206268.93811.2685-44.706
32144.75248.963264.188-15.2245-104.213
33228249.15259.781-10.6308-21.1505
34251.25211.251255.656-44.405139.9988
35273.75295.209255.31239.897-21.4595
36303.75316.098259.09457.0046-12.3484
37243293.935264.46929.4664-50.9352
38190.5201.098273.312-72.2141-10.5984
39213208.234283.75-75.51624.7662
40220.5222.512290.719-68.2072-2.01157
41417.75352.588297.37555.21365.162
42417.75400.88307.53193.348416.8704
43303.75334.019322.7511.2685-30.2685
44288.75323.65338.875-15.2245-34.9005
45334.5339.932350.562-10.6308-5.43171
46312314.064358.469-44.4051-2.06366
47372.75405.022365.12539.897-32.272
48448.5429.755372.7557.004618.7454
49463.5413.623384.15629.466449.8773
50357328.723400.938-72.214128.2766
51327342.203417.719-75.5162-15.2025
52296.25362.48430.688-68.2072-66.2303
53501.75497.588442.37555.2134.16204
54516.75547.723454.37593.3484-30.9734
55478.5478.3467.03111.26850.200231
56516.75465.744480.969-15.224551.0058
57509.25483.619494.25-10.630825.6308
58448.5465.032509.438-44.4051-16.5324
59516.75567.366527.46939.897-50.6157
60592.5604.067547.06257.0046-11.5671
61623.25598.998569.53129.466424.2523
62531.75520.411592.625-72.214111.3391
63471539.859615.375-75.5162-68.8588
64516.75569.293637.5-68.2072-52.5428
65714716.744661.53155.213-2.74421
66774.75779.567686.21993.3484-4.81713
67759.75720.894709.62511.268538.8565
68789.75716.525731.75-15.224573.2245
69782.25741.682752.312-10.630840.5683
70706.5729.407773.812-44.4051-22.9074
71835.5833.647793.7539.8971.85301
72866.25871.348814.34457.0046-5.09838
73911.25866.591837.12529.466444.6586
74774.75785.786858-72.2141-11.0359
75721.5803.046878.562-75.5162-81.5463
76782.25832.824901.031-68.2072-50.5741
77927979.994924.78155.213-52.9942
7810561040.91947.56293.348415.0891
791025.25977.487966.21911.268547.7627
801025.25967.119982.344-15.224558.1308
811040.25991.3381001.97-10.630848.912
82987.75978.471022.88-44.40519.28009
831124.251079.871039.9739.89744.3843
841124.251112.161055.1657.004612.0891
8511011097.281067.8129.46643.72106
869721007.631079.84-72.2141-35.6296
87995.251016.051091.56-75.5162-20.7963
881010.251034.111102.31-68.2072-23.8553
891109.251171.121115.9155.213-61.8692
901238.251222.851129.593.348415.4016
911146.751151.521140.2511.2685-4.76852
921192.51136.741151.97-15.224555.7558
931154.251157.461168.09-10.6308-3.21296
941131.751142.971187.38-44.4051-11.2199
951306.51245.31205.4139.89761.1968
961268.251275.381218.3857.0046-7.12963
9712151259.251229.7829.4664-44.2477
981139.251169.911242.12-72.2141-30.6609
9912151178.31253.81-75.516236.7037
1001253.251197.611265.81-68.207255.6447
10112991334.281279.0655.213-35.2755
1021359.751388.541295.1993.3484-28.7859
10312991324.521313.2511.2685-25.5185
1041336.51314.491329.72-15.224522.0058
1051290.751334.91345.53-10.6308-44.1505
1061283.251317.561361.97-44.4051-34.3137
10714731418.31378.4139.89754.6968
1081488.751452.161395.1657.004636.5891
10914281441.371411.9129.4664-13.3727
1101321.51356.791429-72.2141-35.2859
1111412.251372.171447.69-75.516240.0787
1121450.51395.951464.16-68.207254.5509
1131496.251532.061476.8455.213-35.8067
1141564.51581.61488.2593.3484-17.0984
1151496.25NANA11.2685NA
1161549.5NANA-15.2245NA
1171526.25NANA-10.6308NA
1181443NANA-44.4051NA
1191617.75NANA39.897NA
1201617.75NANA57.0046NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 425.25 & NA & NA & 29.4664 & NA \tabularnewline
2 & 417.75 & NA & NA & -72.2141 & NA \tabularnewline
3 & 410.25 & NA & NA & -75.5162 & NA \tabularnewline
4 & 395.25 & NA & NA & -68.2072 & NA \tabularnewline
5 & 546.75 & NA & NA & 55.213 & NA \tabularnewline
6 & 539.25 & NA & NA & 93.3484 & NA \tabularnewline
7 & 425.25 & 421.487 & 410.219 & 11.2685 & 3.76273 \tabularnewline
8 & 349.5 & 385.838 & 401.062 & -15.2245 & -36.338 \tabularnewline
9 & 357 & 378.432 & 389.062 & -10.6308 & -21.4317 \tabularnewline
10 & 357 & 332.032 & 376.438 & -44.4051 & 24.9676 \tabularnewline
11 & 364.5 & 404.022 & 364.125 & 39.897 & -39.522 \tabularnewline
12 & 380.25 & 409.442 & 352.438 & 57.0046 & -29.1921 \tabularnewline
13 & 334.5 & 371.154 & 341.688 & 29.4664 & -36.6539 \tabularnewline
14 & 288.75 & 256.505 & 328.719 & -72.2141 & 32.2454 \tabularnewline
15 & 251.25 & 240.546 & 316.062 & -75.5162 & 10.7037 \tabularnewline
16 & 251.25 & 237.73 & 305.938 & -68.2072 & 13.5197 \tabularnewline
17 & 395.25 & 352.932 & 297.719 & 55.213 & 42.3183 \tabularnewline
18 & 410.25 & 385.38 & 292.031 & 93.3484 & 24.8704 \tabularnewline
19 & 296.25 & 299.831 & 288.562 & 11.2685 & -3.58102 \tabularnewline
20 & 167.25 & 270.182 & 285.406 & -15.2245 & -102.932 \tabularnewline
21 & 235.5 & 273.494 & 284.125 & -10.6308 & -37.9942 \tabularnewline
22 & 235.5 & 240.97 & 285.375 & -44.4051 & -5.46991 \tabularnewline
23 & 288.75 & 325.272 & 285.375 & 39.897 & -36.522 \tabularnewline
24 & 319.5 & 339.848 & 282.844 & 57.0046 & -20.3484 \tabularnewline
25 & 312 & 307.56 & 278.094 & 29.4664 & 4.43981 \tabularnewline
26 & 235.5 & 202.411 & 274.625 & -72.2141 & 33.0891 \tabularnewline
27 & 273.75 & 197.859 & 273.375 & -75.5162 & 75.8912 \tabularnewline
28 & 258.75 & 205.512 & 273.719 & -68.2072 & 53.2384 \tabularnewline
29 & 387.75 & 328.963 & 273.75 & 55.213 & 58.787 \tabularnewline
30 & 357 & 365.817 & 272.469 & 93.3484 & -8.81713 \tabularnewline
31 & 235.5 & 280.206 & 268.938 & 11.2685 & -44.706 \tabularnewline
32 & 144.75 & 248.963 & 264.188 & -15.2245 & -104.213 \tabularnewline
33 & 228 & 249.15 & 259.781 & -10.6308 & -21.1505 \tabularnewline
34 & 251.25 & 211.251 & 255.656 & -44.4051 & 39.9988 \tabularnewline
35 & 273.75 & 295.209 & 255.312 & 39.897 & -21.4595 \tabularnewline
36 & 303.75 & 316.098 & 259.094 & 57.0046 & -12.3484 \tabularnewline
37 & 243 & 293.935 & 264.469 & 29.4664 & -50.9352 \tabularnewline
38 & 190.5 & 201.098 & 273.312 & -72.2141 & -10.5984 \tabularnewline
39 & 213 & 208.234 & 283.75 & -75.5162 & 4.7662 \tabularnewline
40 & 220.5 & 222.512 & 290.719 & -68.2072 & -2.01157 \tabularnewline
41 & 417.75 & 352.588 & 297.375 & 55.213 & 65.162 \tabularnewline
42 & 417.75 & 400.88 & 307.531 & 93.3484 & 16.8704 \tabularnewline
43 & 303.75 & 334.019 & 322.75 & 11.2685 & -30.2685 \tabularnewline
44 & 288.75 & 323.65 & 338.875 & -15.2245 & -34.9005 \tabularnewline
45 & 334.5 & 339.932 & 350.562 & -10.6308 & -5.43171 \tabularnewline
46 & 312 & 314.064 & 358.469 & -44.4051 & -2.06366 \tabularnewline
47 & 372.75 & 405.022 & 365.125 & 39.897 & -32.272 \tabularnewline
48 & 448.5 & 429.755 & 372.75 & 57.0046 & 18.7454 \tabularnewline
49 & 463.5 & 413.623 & 384.156 & 29.4664 & 49.8773 \tabularnewline
50 & 357 & 328.723 & 400.938 & -72.2141 & 28.2766 \tabularnewline
51 & 327 & 342.203 & 417.719 & -75.5162 & -15.2025 \tabularnewline
52 & 296.25 & 362.48 & 430.688 & -68.2072 & -66.2303 \tabularnewline
53 & 501.75 & 497.588 & 442.375 & 55.213 & 4.16204 \tabularnewline
54 & 516.75 & 547.723 & 454.375 & 93.3484 & -30.9734 \tabularnewline
55 & 478.5 & 478.3 & 467.031 & 11.2685 & 0.200231 \tabularnewline
56 & 516.75 & 465.744 & 480.969 & -15.2245 & 51.0058 \tabularnewline
57 & 509.25 & 483.619 & 494.25 & -10.6308 & 25.6308 \tabularnewline
58 & 448.5 & 465.032 & 509.438 & -44.4051 & -16.5324 \tabularnewline
59 & 516.75 & 567.366 & 527.469 & 39.897 & -50.6157 \tabularnewline
60 & 592.5 & 604.067 & 547.062 & 57.0046 & -11.5671 \tabularnewline
61 & 623.25 & 598.998 & 569.531 & 29.4664 & 24.2523 \tabularnewline
62 & 531.75 & 520.411 & 592.625 & -72.2141 & 11.3391 \tabularnewline
63 & 471 & 539.859 & 615.375 & -75.5162 & -68.8588 \tabularnewline
64 & 516.75 & 569.293 & 637.5 & -68.2072 & -52.5428 \tabularnewline
65 & 714 & 716.744 & 661.531 & 55.213 & -2.74421 \tabularnewline
66 & 774.75 & 779.567 & 686.219 & 93.3484 & -4.81713 \tabularnewline
67 & 759.75 & 720.894 & 709.625 & 11.2685 & 38.8565 \tabularnewline
68 & 789.75 & 716.525 & 731.75 & -15.2245 & 73.2245 \tabularnewline
69 & 782.25 & 741.682 & 752.312 & -10.6308 & 40.5683 \tabularnewline
70 & 706.5 & 729.407 & 773.812 & -44.4051 & -22.9074 \tabularnewline
71 & 835.5 & 833.647 & 793.75 & 39.897 & 1.85301 \tabularnewline
72 & 866.25 & 871.348 & 814.344 & 57.0046 & -5.09838 \tabularnewline
73 & 911.25 & 866.591 & 837.125 & 29.4664 & 44.6586 \tabularnewline
74 & 774.75 & 785.786 & 858 & -72.2141 & -11.0359 \tabularnewline
75 & 721.5 & 803.046 & 878.562 & -75.5162 & -81.5463 \tabularnewline
76 & 782.25 & 832.824 & 901.031 & -68.2072 & -50.5741 \tabularnewline
77 & 927 & 979.994 & 924.781 & 55.213 & -52.9942 \tabularnewline
78 & 1056 & 1040.91 & 947.562 & 93.3484 & 15.0891 \tabularnewline
79 & 1025.25 & 977.487 & 966.219 & 11.2685 & 47.7627 \tabularnewline
80 & 1025.25 & 967.119 & 982.344 & -15.2245 & 58.1308 \tabularnewline
81 & 1040.25 & 991.338 & 1001.97 & -10.6308 & 48.912 \tabularnewline
82 & 987.75 & 978.47 & 1022.88 & -44.4051 & 9.28009 \tabularnewline
83 & 1124.25 & 1079.87 & 1039.97 & 39.897 & 44.3843 \tabularnewline
84 & 1124.25 & 1112.16 & 1055.16 & 57.0046 & 12.0891 \tabularnewline
85 & 1101 & 1097.28 & 1067.81 & 29.4664 & 3.72106 \tabularnewline
86 & 972 & 1007.63 & 1079.84 & -72.2141 & -35.6296 \tabularnewline
87 & 995.25 & 1016.05 & 1091.56 & -75.5162 & -20.7963 \tabularnewline
88 & 1010.25 & 1034.11 & 1102.31 & -68.2072 & -23.8553 \tabularnewline
89 & 1109.25 & 1171.12 & 1115.91 & 55.213 & -61.8692 \tabularnewline
90 & 1238.25 & 1222.85 & 1129.5 & 93.3484 & 15.4016 \tabularnewline
91 & 1146.75 & 1151.52 & 1140.25 & 11.2685 & -4.76852 \tabularnewline
92 & 1192.5 & 1136.74 & 1151.97 & -15.2245 & 55.7558 \tabularnewline
93 & 1154.25 & 1157.46 & 1168.09 & -10.6308 & -3.21296 \tabularnewline
94 & 1131.75 & 1142.97 & 1187.38 & -44.4051 & -11.2199 \tabularnewline
95 & 1306.5 & 1245.3 & 1205.41 & 39.897 & 61.1968 \tabularnewline
96 & 1268.25 & 1275.38 & 1218.38 & 57.0046 & -7.12963 \tabularnewline
97 & 1215 & 1259.25 & 1229.78 & 29.4664 & -44.2477 \tabularnewline
98 & 1139.25 & 1169.91 & 1242.12 & -72.2141 & -30.6609 \tabularnewline
99 & 1215 & 1178.3 & 1253.81 & -75.5162 & 36.7037 \tabularnewline
100 & 1253.25 & 1197.61 & 1265.81 & -68.2072 & 55.6447 \tabularnewline
101 & 1299 & 1334.28 & 1279.06 & 55.213 & -35.2755 \tabularnewline
102 & 1359.75 & 1388.54 & 1295.19 & 93.3484 & -28.7859 \tabularnewline
103 & 1299 & 1324.52 & 1313.25 & 11.2685 & -25.5185 \tabularnewline
104 & 1336.5 & 1314.49 & 1329.72 & -15.2245 & 22.0058 \tabularnewline
105 & 1290.75 & 1334.9 & 1345.53 & -10.6308 & -44.1505 \tabularnewline
106 & 1283.25 & 1317.56 & 1361.97 & -44.4051 & -34.3137 \tabularnewline
107 & 1473 & 1418.3 & 1378.41 & 39.897 & 54.6968 \tabularnewline
108 & 1488.75 & 1452.16 & 1395.16 & 57.0046 & 36.5891 \tabularnewline
109 & 1428 & 1441.37 & 1411.91 & 29.4664 & -13.3727 \tabularnewline
110 & 1321.5 & 1356.79 & 1429 & -72.2141 & -35.2859 \tabularnewline
111 & 1412.25 & 1372.17 & 1447.69 & -75.5162 & 40.0787 \tabularnewline
112 & 1450.5 & 1395.95 & 1464.16 & -68.2072 & 54.5509 \tabularnewline
113 & 1496.25 & 1532.06 & 1476.84 & 55.213 & -35.8067 \tabularnewline
114 & 1564.5 & 1581.6 & 1488.25 & 93.3484 & -17.0984 \tabularnewline
115 & 1496.25 & NA & NA & 11.2685 & NA \tabularnewline
116 & 1549.5 & NA & NA & -15.2245 & NA \tabularnewline
117 & 1526.25 & NA & NA & -10.6308 & NA \tabularnewline
118 & 1443 & NA & NA & -44.4051 & NA \tabularnewline
119 & 1617.75 & NA & NA & 39.897 & NA \tabularnewline
120 & 1617.75 & NA & NA & 57.0046 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296471&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]425.25[/C][C]NA[/C][C]NA[/C][C]29.4664[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]417.75[/C][C]NA[/C][C]NA[/C][C]-72.2141[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]410.25[/C][C]NA[/C][C]NA[/C][C]-75.5162[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]395.25[/C][C]NA[/C][C]NA[/C][C]-68.2072[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]546.75[/C][C]NA[/C][C]NA[/C][C]55.213[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]539.25[/C][C]NA[/C][C]NA[/C][C]93.3484[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]425.25[/C][C]421.487[/C][C]410.219[/C][C]11.2685[/C][C]3.76273[/C][/ROW]
[ROW][C]8[/C][C]349.5[/C][C]385.838[/C][C]401.062[/C][C]-15.2245[/C][C]-36.338[/C][/ROW]
[ROW][C]9[/C][C]357[/C][C]378.432[/C][C]389.062[/C][C]-10.6308[/C][C]-21.4317[/C][/ROW]
[ROW][C]10[/C][C]357[/C][C]332.032[/C][C]376.438[/C][C]-44.4051[/C][C]24.9676[/C][/ROW]
[ROW][C]11[/C][C]364.5[/C][C]404.022[/C][C]364.125[/C][C]39.897[/C][C]-39.522[/C][/ROW]
[ROW][C]12[/C][C]380.25[/C][C]409.442[/C][C]352.438[/C][C]57.0046[/C][C]-29.1921[/C][/ROW]
[ROW][C]13[/C][C]334.5[/C][C]371.154[/C][C]341.688[/C][C]29.4664[/C][C]-36.6539[/C][/ROW]
[ROW][C]14[/C][C]288.75[/C][C]256.505[/C][C]328.719[/C][C]-72.2141[/C][C]32.2454[/C][/ROW]
[ROW][C]15[/C][C]251.25[/C][C]240.546[/C][C]316.062[/C][C]-75.5162[/C][C]10.7037[/C][/ROW]
[ROW][C]16[/C][C]251.25[/C][C]237.73[/C][C]305.938[/C][C]-68.2072[/C][C]13.5197[/C][/ROW]
[ROW][C]17[/C][C]395.25[/C][C]352.932[/C][C]297.719[/C][C]55.213[/C][C]42.3183[/C][/ROW]
[ROW][C]18[/C][C]410.25[/C][C]385.38[/C][C]292.031[/C][C]93.3484[/C][C]24.8704[/C][/ROW]
[ROW][C]19[/C][C]296.25[/C][C]299.831[/C][C]288.562[/C][C]11.2685[/C][C]-3.58102[/C][/ROW]
[ROW][C]20[/C][C]167.25[/C][C]270.182[/C][C]285.406[/C][C]-15.2245[/C][C]-102.932[/C][/ROW]
[ROW][C]21[/C][C]235.5[/C][C]273.494[/C][C]284.125[/C][C]-10.6308[/C][C]-37.9942[/C][/ROW]
[ROW][C]22[/C][C]235.5[/C][C]240.97[/C][C]285.375[/C][C]-44.4051[/C][C]-5.46991[/C][/ROW]
[ROW][C]23[/C][C]288.75[/C][C]325.272[/C][C]285.375[/C][C]39.897[/C][C]-36.522[/C][/ROW]
[ROW][C]24[/C][C]319.5[/C][C]339.848[/C][C]282.844[/C][C]57.0046[/C][C]-20.3484[/C][/ROW]
[ROW][C]25[/C][C]312[/C][C]307.56[/C][C]278.094[/C][C]29.4664[/C][C]4.43981[/C][/ROW]
[ROW][C]26[/C][C]235.5[/C][C]202.411[/C][C]274.625[/C][C]-72.2141[/C][C]33.0891[/C][/ROW]
[ROW][C]27[/C][C]273.75[/C][C]197.859[/C][C]273.375[/C][C]-75.5162[/C][C]75.8912[/C][/ROW]
[ROW][C]28[/C][C]258.75[/C][C]205.512[/C][C]273.719[/C][C]-68.2072[/C][C]53.2384[/C][/ROW]
[ROW][C]29[/C][C]387.75[/C][C]328.963[/C][C]273.75[/C][C]55.213[/C][C]58.787[/C][/ROW]
[ROW][C]30[/C][C]357[/C][C]365.817[/C][C]272.469[/C][C]93.3484[/C][C]-8.81713[/C][/ROW]
[ROW][C]31[/C][C]235.5[/C][C]280.206[/C][C]268.938[/C][C]11.2685[/C][C]-44.706[/C][/ROW]
[ROW][C]32[/C][C]144.75[/C][C]248.963[/C][C]264.188[/C][C]-15.2245[/C][C]-104.213[/C][/ROW]
[ROW][C]33[/C][C]228[/C][C]249.15[/C][C]259.781[/C][C]-10.6308[/C][C]-21.1505[/C][/ROW]
[ROW][C]34[/C][C]251.25[/C][C]211.251[/C][C]255.656[/C][C]-44.4051[/C][C]39.9988[/C][/ROW]
[ROW][C]35[/C][C]273.75[/C][C]295.209[/C][C]255.312[/C][C]39.897[/C][C]-21.4595[/C][/ROW]
[ROW][C]36[/C][C]303.75[/C][C]316.098[/C][C]259.094[/C][C]57.0046[/C][C]-12.3484[/C][/ROW]
[ROW][C]37[/C][C]243[/C][C]293.935[/C][C]264.469[/C][C]29.4664[/C][C]-50.9352[/C][/ROW]
[ROW][C]38[/C][C]190.5[/C][C]201.098[/C][C]273.312[/C][C]-72.2141[/C][C]-10.5984[/C][/ROW]
[ROW][C]39[/C][C]213[/C][C]208.234[/C][C]283.75[/C][C]-75.5162[/C][C]4.7662[/C][/ROW]
[ROW][C]40[/C][C]220.5[/C][C]222.512[/C][C]290.719[/C][C]-68.2072[/C][C]-2.01157[/C][/ROW]
[ROW][C]41[/C][C]417.75[/C][C]352.588[/C][C]297.375[/C][C]55.213[/C][C]65.162[/C][/ROW]
[ROW][C]42[/C][C]417.75[/C][C]400.88[/C][C]307.531[/C][C]93.3484[/C][C]16.8704[/C][/ROW]
[ROW][C]43[/C][C]303.75[/C][C]334.019[/C][C]322.75[/C][C]11.2685[/C][C]-30.2685[/C][/ROW]
[ROW][C]44[/C][C]288.75[/C][C]323.65[/C][C]338.875[/C][C]-15.2245[/C][C]-34.9005[/C][/ROW]
[ROW][C]45[/C][C]334.5[/C][C]339.932[/C][C]350.562[/C][C]-10.6308[/C][C]-5.43171[/C][/ROW]
[ROW][C]46[/C][C]312[/C][C]314.064[/C][C]358.469[/C][C]-44.4051[/C][C]-2.06366[/C][/ROW]
[ROW][C]47[/C][C]372.75[/C][C]405.022[/C][C]365.125[/C][C]39.897[/C][C]-32.272[/C][/ROW]
[ROW][C]48[/C][C]448.5[/C][C]429.755[/C][C]372.75[/C][C]57.0046[/C][C]18.7454[/C][/ROW]
[ROW][C]49[/C][C]463.5[/C][C]413.623[/C][C]384.156[/C][C]29.4664[/C][C]49.8773[/C][/ROW]
[ROW][C]50[/C][C]357[/C][C]328.723[/C][C]400.938[/C][C]-72.2141[/C][C]28.2766[/C][/ROW]
[ROW][C]51[/C][C]327[/C][C]342.203[/C][C]417.719[/C][C]-75.5162[/C][C]-15.2025[/C][/ROW]
[ROW][C]52[/C][C]296.25[/C][C]362.48[/C][C]430.688[/C][C]-68.2072[/C][C]-66.2303[/C][/ROW]
[ROW][C]53[/C][C]501.75[/C][C]497.588[/C][C]442.375[/C][C]55.213[/C][C]4.16204[/C][/ROW]
[ROW][C]54[/C][C]516.75[/C][C]547.723[/C][C]454.375[/C][C]93.3484[/C][C]-30.9734[/C][/ROW]
[ROW][C]55[/C][C]478.5[/C][C]478.3[/C][C]467.031[/C][C]11.2685[/C][C]0.200231[/C][/ROW]
[ROW][C]56[/C][C]516.75[/C][C]465.744[/C][C]480.969[/C][C]-15.2245[/C][C]51.0058[/C][/ROW]
[ROW][C]57[/C][C]509.25[/C][C]483.619[/C][C]494.25[/C][C]-10.6308[/C][C]25.6308[/C][/ROW]
[ROW][C]58[/C][C]448.5[/C][C]465.032[/C][C]509.438[/C][C]-44.4051[/C][C]-16.5324[/C][/ROW]
[ROW][C]59[/C][C]516.75[/C][C]567.366[/C][C]527.469[/C][C]39.897[/C][C]-50.6157[/C][/ROW]
[ROW][C]60[/C][C]592.5[/C][C]604.067[/C][C]547.062[/C][C]57.0046[/C][C]-11.5671[/C][/ROW]
[ROW][C]61[/C][C]623.25[/C][C]598.998[/C][C]569.531[/C][C]29.4664[/C][C]24.2523[/C][/ROW]
[ROW][C]62[/C][C]531.75[/C][C]520.411[/C][C]592.625[/C][C]-72.2141[/C][C]11.3391[/C][/ROW]
[ROW][C]63[/C][C]471[/C][C]539.859[/C][C]615.375[/C][C]-75.5162[/C][C]-68.8588[/C][/ROW]
[ROW][C]64[/C][C]516.75[/C][C]569.293[/C][C]637.5[/C][C]-68.2072[/C][C]-52.5428[/C][/ROW]
[ROW][C]65[/C][C]714[/C][C]716.744[/C][C]661.531[/C][C]55.213[/C][C]-2.74421[/C][/ROW]
[ROW][C]66[/C][C]774.75[/C][C]779.567[/C][C]686.219[/C][C]93.3484[/C][C]-4.81713[/C][/ROW]
[ROW][C]67[/C][C]759.75[/C][C]720.894[/C][C]709.625[/C][C]11.2685[/C][C]38.8565[/C][/ROW]
[ROW][C]68[/C][C]789.75[/C][C]716.525[/C][C]731.75[/C][C]-15.2245[/C][C]73.2245[/C][/ROW]
[ROW][C]69[/C][C]782.25[/C][C]741.682[/C][C]752.312[/C][C]-10.6308[/C][C]40.5683[/C][/ROW]
[ROW][C]70[/C][C]706.5[/C][C]729.407[/C][C]773.812[/C][C]-44.4051[/C][C]-22.9074[/C][/ROW]
[ROW][C]71[/C][C]835.5[/C][C]833.647[/C][C]793.75[/C][C]39.897[/C][C]1.85301[/C][/ROW]
[ROW][C]72[/C][C]866.25[/C][C]871.348[/C][C]814.344[/C][C]57.0046[/C][C]-5.09838[/C][/ROW]
[ROW][C]73[/C][C]911.25[/C][C]866.591[/C][C]837.125[/C][C]29.4664[/C][C]44.6586[/C][/ROW]
[ROW][C]74[/C][C]774.75[/C][C]785.786[/C][C]858[/C][C]-72.2141[/C][C]-11.0359[/C][/ROW]
[ROW][C]75[/C][C]721.5[/C][C]803.046[/C][C]878.562[/C][C]-75.5162[/C][C]-81.5463[/C][/ROW]
[ROW][C]76[/C][C]782.25[/C][C]832.824[/C][C]901.031[/C][C]-68.2072[/C][C]-50.5741[/C][/ROW]
[ROW][C]77[/C][C]927[/C][C]979.994[/C][C]924.781[/C][C]55.213[/C][C]-52.9942[/C][/ROW]
[ROW][C]78[/C][C]1056[/C][C]1040.91[/C][C]947.562[/C][C]93.3484[/C][C]15.0891[/C][/ROW]
[ROW][C]79[/C][C]1025.25[/C][C]977.487[/C][C]966.219[/C][C]11.2685[/C][C]47.7627[/C][/ROW]
[ROW][C]80[/C][C]1025.25[/C][C]967.119[/C][C]982.344[/C][C]-15.2245[/C][C]58.1308[/C][/ROW]
[ROW][C]81[/C][C]1040.25[/C][C]991.338[/C][C]1001.97[/C][C]-10.6308[/C][C]48.912[/C][/ROW]
[ROW][C]82[/C][C]987.75[/C][C]978.47[/C][C]1022.88[/C][C]-44.4051[/C][C]9.28009[/C][/ROW]
[ROW][C]83[/C][C]1124.25[/C][C]1079.87[/C][C]1039.97[/C][C]39.897[/C][C]44.3843[/C][/ROW]
[ROW][C]84[/C][C]1124.25[/C][C]1112.16[/C][C]1055.16[/C][C]57.0046[/C][C]12.0891[/C][/ROW]
[ROW][C]85[/C][C]1101[/C][C]1097.28[/C][C]1067.81[/C][C]29.4664[/C][C]3.72106[/C][/ROW]
[ROW][C]86[/C][C]972[/C][C]1007.63[/C][C]1079.84[/C][C]-72.2141[/C][C]-35.6296[/C][/ROW]
[ROW][C]87[/C][C]995.25[/C][C]1016.05[/C][C]1091.56[/C][C]-75.5162[/C][C]-20.7963[/C][/ROW]
[ROW][C]88[/C][C]1010.25[/C][C]1034.11[/C][C]1102.31[/C][C]-68.2072[/C][C]-23.8553[/C][/ROW]
[ROW][C]89[/C][C]1109.25[/C][C]1171.12[/C][C]1115.91[/C][C]55.213[/C][C]-61.8692[/C][/ROW]
[ROW][C]90[/C][C]1238.25[/C][C]1222.85[/C][C]1129.5[/C][C]93.3484[/C][C]15.4016[/C][/ROW]
[ROW][C]91[/C][C]1146.75[/C][C]1151.52[/C][C]1140.25[/C][C]11.2685[/C][C]-4.76852[/C][/ROW]
[ROW][C]92[/C][C]1192.5[/C][C]1136.74[/C][C]1151.97[/C][C]-15.2245[/C][C]55.7558[/C][/ROW]
[ROW][C]93[/C][C]1154.25[/C][C]1157.46[/C][C]1168.09[/C][C]-10.6308[/C][C]-3.21296[/C][/ROW]
[ROW][C]94[/C][C]1131.75[/C][C]1142.97[/C][C]1187.38[/C][C]-44.4051[/C][C]-11.2199[/C][/ROW]
[ROW][C]95[/C][C]1306.5[/C][C]1245.3[/C][C]1205.41[/C][C]39.897[/C][C]61.1968[/C][/ROW]
[ROW][C]96[/C][C]1268.25[/C][C]1275.38[/C][C]1218.38[/C][C]57.0046[/C][C]-7.12963[/C][/ROW]
[ROW][C]97[/C][C]1215[/C][C]1259.25[/C][C]1229.78[/C][C]29.4664[/C][C]-44.2477[/C][/ROW]
[ROW][C]98[/C][C]1139.25[/C][C]1169.91[/C][C]1242.12[/C][C]-72.2141[/C][C]-30.6609[/C][/ROW]
[ROW][C]99[/C][C]1215[/C][C]1178.3[/C][C]1253.81[/C][C]-75.5162[/C][C]36.7037[/C][/ROW]
[ROW][C]100[/C][C]1253.25[/C][C]1197.61[/C][C]1265.81[/C][C]-68.2072[/C][C]55.6447[/C][/ROW]
[ROW][C]101[/C][C]1299[/C][C]1334.28[/C][C]1279.06[/C][C]55.213[/C][C]-35.2755[/C][/ROW]
[ROW][C]102[/C][C]1359.75[/C][C]1388.54[/C][C]1295.19[/C][C]93.3484[/C][C]-28.7859[/C][/ROW]
[ROW][C]103[/C][C]1299[/C][C]1324.52[/C][C]1313.25[/C][C]11.2685[/C][C]-25.5185[/C][/ROW]
[ROW][C]104[/C][C]1336.5[/C][C]1314.49[/C][C]1329.72[/C][C]-15.2245[/C][C]22.0058[/C][/ROW]
[ROW][C]105[/C][C]1290.75[/C][C]1334.9[/C][C]1345.53[/C][C]-10.6308[/C][C]-44.1505[/C][/ROW]
[ROW][C]106[/C][C]1283.25[/C][C]1317.56[/C][C]1361.97[/C][C]-44.4051[/C][C]-34.3137[/C][/ROW]
[ROW][C]107[/C][C]1473[/C][C]1418.3[/C][C]1378.41[/C][C]39.897[/C][C]54.6968[/C][/ROW]
[ROW][C]108[/C][C]1488.75[/C][C]1452.16[/C][C]1395.16[/C][C]57.0046[/C][C]36.5891[/C][/ROW]
[ROW][C]109[/C][C]1428[/C][C]1441.37[/C][C]1411.91[/C][C]29.4664[/C][C]-13.3727[/C][/ROW]
[ROW][C]110[/C][C]1321.5[/C][C]1356.79[/C][C]1429[/C][C]-72.2141[/C][C]-35.2859[/C][/ROW]
[ROW][C]111[/C][C]1412.25[/C][C]1372.17[/C][C]1447.69[/C][C]-75.5162[/C][C]40.0787[/C][/ROW]
[ROW][C]112[/C][C]1450.5[/C][C]1395.95[/C][C]1464.16[/C][C]-68.2072[/C][C]54.5509[/C][/ROW]
[ROW][C]113[/C][C]1496.25[/C][C]1532.06[/C][C]1476.84[/C][C]55.213[/C][C]-35.8067[/C][/ROW]
[ROW][C]114[/C][C]1564.5[/C][C]1581.6[/C][C]1488.25[/C][C]93.3484[/C][C]-17.0984[/C][/ROW]
[ROW][C]115[/C][C]1496.25[/C][C]NA[/C][C]NA[/C][C]11.2685[/C][C]NA[/C][/ROW]
[ROW][C]116[/C][C]1549.5[/C][C]NA[/C][C]NA[/C][C]-15.2245[/C][C]NA[/C][/ROW]
[ROW][C]117[/C][C]1526.25[/C][C]NA[/C][C]NA[/C][C]-10.6308[/C][C]NA[/C][/ROW]
[ROW][C]118[/C][C]1443[/C][C]NA[/C][C]NA[/C][C]-44.4051[/C][C]NA[/C][/ROW]
[ROW][C]119[/C][C]1617.75[/C][C]NA[/C][C]NA[/C][C]39.897[/C][C]NA[/C][/ROW]
[ROW][C]120[/C][C]1617.75[/C][C]NA[/C][C]NA[/C][C]57.0046[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296471&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296471&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
1425.25NANA29.4664NA
2417.75NANA-72.2141NA
3410.25NANA-75.5162NA
4395.25NANA-68.2072NA
5546.75NANA55.213NA
6539.25NANA93.3484NA
7425.25421.487410.21911.26853.76273
8349.5385.838401.062-15.2245-36.338
9357378.432389.062-10.6308-21.4317
10357332.032376.438-44.405124.9676
11364.5404.022364.12539.897-39.522
12380.25409.442352.43857.0046-29.1921
13334.5371.154341.68829.4664-36.6539
14288.75256.505328.719-72.214132.2454
15251.25240.546316.062-75.516210.7037
16251.25237.73305.938-68.207213.5197
17395.25352.932297.71955.21342.3183
18410.25385.38292.03193.348424.8704
19296.25299.831288.56211.2685-3.58102
20167.25270.182285.406-15.2245-102.932
21235.5273.494284.125-10.6308-37.9942
22235.5240.97285.375-44.4051-5.46991
23288.75325.272285.37539.897-36.522
24319.5339.848282.84457.0046-20.3484
25312307.56278.09429.46644.43981
26235.5202.411274.625-72.214133.0891
27273.75197.859273.375-75.516275.8912
28258.75205.512273.719-68.207253.2384
29387.75328.963273.7555.21358.787
30357365.817272.46993.3484-8.81713
31235.5280.206268.93811.2685-44.706
32144.75248.963264.188-15.2245-104.213
33228249.15259.781-10.6308-21.1505
34251.25211.251255.656-44.405139.9988
35273.75295.209255.31239.897-21.4595
36303.75316.098259.09457.0046-12.3484
37243293.935264.46929.4664-50.9352
38190.5201.098273.312-72.2141-10.5984
39213208.234283.75-75.51624.7662
40220.5222.512290.719-68.2072-2.01157
41417.75352.588297.37555.21365.162
42417.75400.88307.53193.348416.8704
43303.75334.019322.7511.2685-30.2685
44288.75323.65338.875-15.2245-34.9005
45334.5339.932350.562-10.6308-5.43171
46312314.064358.469-44.4051-2.06366
47372.75405.022365.12539.897-32.272
48448.5429.755372.7557.004618.7454
49463.5413.623384.15629.466449.8773
50357328.723400.938-72.214128.2766
51327342.203417.719-75.5162-15.2025
52296.25362.48430.688-68.2072-66.2303
53501.75497.588442.37555.2134.16204
54516.75547.723454.37593.3484-30.9734
55478.5478.3467.03111.26850.200231
56516.75465.744480.969-15.224551.0058
57509.25483.619494.25-10.630825.6308
58448.5465.032509.438-44.4051-16.5324
59516.75567.366527.46939.897-50.6157
60592.5604.067547.06257.0046-11.5671
61623.25598.998569.53129.466424.2523
62531.75520.411592.625-72.214111.3391
63471539.859615.375-75.5162-68.8588
64516.75569.293637.5-68.2072-52.5428
65714716.744661.53155.213-2.74421
66774.75779.567686.21993.3484-4.81713
67759.75720.894709.62511.268538.8565
68789.75716.525731.75-15.224573.2245
69782.25741.682752.312-10.630840.5683
70706.5729.407773.812-44.4051-22.9074
71835.5833.647793.7539.8971.85301
72866.25871.348814.34457.0046-5.09838
73911.25866.591837.12529.466444.6586
74774.75785.786858-72.2141-11.0359
75721.5803.046878.562-75.5162-81.5463
76782.25832.824901.031-68.2072-50.5741
77927979.994924.78155.213-52.9942
7810561040.91947.56293.348415.0891
791025.25977.487966.21911.268547.7627
801025.25967.119982.344-15.224558.1308
811040.25991.3381001.97-10.630848.912
82987.75978.471022.88-44.40519.28009
831124.251079.871039.9739.89744.3843
841124.251112.161055.1657.004612.0891
8511011097.281067.8129.46643.72106
869721007.631079.84-72.2141-35.6296
87995.251016.051091.56-75.5162-20.7963
881010.251034.111102.31-68.2072-23.8553
891109.251171.121115.9155.213-61.8692
901238.251222.851129.593.348415.4016
911146.751151.521140.2511.2685-4.76852
921192.51136.741151.97-15.224555.7558
931154.251157.461168.09-10.6308-3.21296
941131.751142.971187.38-44.4051-11.2199
951306.51245.31205.4139.89761.1968
961268.251275.381218.3857.0046-7.12963
9712151259.251229.7829.4664-44.2477
981139.251169.911242.12-72.2141-30.6609
9912151178.31253.81-75.516236.7037
1001253.251197.611265.81-68.207255.6447
10112991334.281279.0655.213-35.2755
1021359.751388.541295.1993.3484-28.7859
10312991324.521313.2511.2685-25.5185
1041336.51314.491329.72-15.224522.0058
1051290.751334.91345.53-10.6308-44.1505
1061283.251317.561361.97-44.4051-34.3137
10714731418.31378.4139.89754.6968
1081488.751452.161395.1657.004636.5891
10914281441.371411.9129.4664-13.3727
1101321.51356.791429-72.2141-35.2859
1111412.251372.171447.69-75.516240.0787
1121450.51395.951464.16-68.207254.5509
1131496.251532.061476.8455.213-35.8067
1141564.51581.61488.2593.3484-17.0984
1151496.25NANA11.2685NA
1161549.5NANA-15.2245NA
1171526.25NANA-10.6308NA
1181443NANA-44.4051NA
1191617.75NANA39.897NA
1201617.75NANA57.0046NA



Parameters (Session):
par1 = 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')