Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationFri, 28 Apr 2017 20:42:14 +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/2017/Apr/28/t1493408958vpasgzf2v8i20bz.htm/, Retrieved Fri, 10 May 2024 16:07:22 +0200
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=, Retrieved Fri, 10 May 2024 16:07:22 +0200
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact0
Dataseries X:
94,47
94,19
94,34
94,3
94,4
94,54
94,09
95,87
98,46
98,7
98,75
98,72
98,72
98,67
98,82
99,39
99,33
99,22
99,05
98,83
98,84
98,89
98,8
99,4
98,89
98,85
98,69
98,48
98,39
98,35
98,26
98,06
98,14
98,17
98,41
98,64
99,25
99,61
100,28
100,31
100,55
100,45
100,78
100,68
101,69
98,09
99,13
99,18
96,22
96,11
96
95,96
97,95
98,43
98,32
97,45
96,42
95,36
95,1
95,54
94,07
93,48
92,86
90,98
91,45
91,16
90,71
90,31
89,78
91,02
90,77
90,69




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=&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 time4 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net







Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
194.47NANA-0.405174NA
294.19NANA-0.416674NA
394.34NANA-0.312007NA
494.3NANA-0.481674NA
594.4NANA0.158826NA
694.54NANA0.280243NA
794.0996.115696.07960.0359931-2.02558
895.8796.566696.44330.123243-0.696576
998.4697.490296.81670.6734930.96984
1098.797.060997.2154-0.1545071.63909
1198.7597.726797.63290.09374311.02334
1298.7298.437898.03330.4044930.282174
1398.7298.029898.435-0.4051740.690174
1498.6798.348398.765-0.4166740.321674
1598.8298.592298.9042-0.3120070.22784
1699.3998.446298.9279-0.4816740.943757
1799.3399.096798.93790.1588260.233257
1899.2299.248698.96830.280243-0.0285764
1999.0599.039799.00370.03599310.0102569
2098.8399.141699.01830.123243-0.311576
2198.8499.693999.02040.673493-0.85391
2298.8998.822698.9771-0.1545070.0674236
2398.898.993798.90.0937431-0.193743
2499.499.229198.82460.4044930.170924
2598.8998.350298.7554-0.4051740.539757
2698.8598.273798.6904-0.4166740.576257
2798.6998.317298.6292-0.3120070.37284
2898.4898.088398.57-0.4816740.391674
2998.3998.682698.52370.158826-0.292576
3098.3598.756198.47580.280243-0.406076
3198.2698.495298.45920.0359931-0.23516
3298.0698.629198.50580.123243-0.569076
3398.1499.277298.60380.673493-1.13724
3498.1798.591798.7462-0.154507-0.421743
3598.4199.006298.91250.0937431-0.596243
3698.6499.494599.090.404493-0.854493
3799.2598.877399.2825-0.4051740.372674
3899.6199.0899.4967-0.4166740.530007
39100.2899.441799.7538-0.3120070.838257
40100.3199.416799.8983-0.4816740.89334
41100.55100.08499.9250.1588260.466174
42100.45100.25899.97750.2802430.192257
43100.7899.909799.87370.03599310.870257
44100.6899.724999.60170.1232430.95509
45101.6999.95199.27750.6734931.73901
4698.0998.763498.9179-0.154507-0.67341
4799.1398.722198.62830.09374310.407924
4899.1898.840398.43580.4044930.339674
4996.2297.84498.2492-0.405174-1.62399
5096.1197.595498.0121-0.416674-1.48541
519697.345997.6579-0.312007-1.34591
5295.9696.842997.3246-0.481674-0.88291
5397.9597.201797.04290.1588260.748257
5498.4397.003696.72330.2802431.42642
5598.3296.518196.48210.03599311.80192
5697.4596.406296.28290.1232431.04384
5796.4296.71696.04250.673493-0.295993
5895.3695.549795.7042-0.154507-0.18966
5995.195.319695.22580.0937431-0.219576
6095.5495.056694.65210.4044930.483424
6194.0793.626994.0321-0.4051740.44309
6293.4893.000893.4175-0.4166740.479174
6392.8692.531392.8433-0.3120070.328674
6490.9891.904292.3858-0.481674-0.92416
6591.4592.183492.02460.158826-0.73341
6691.1691.922391.64210.280243-0.762326
6790.71NANA0.0359931NA
6890.31NANA0.123243NA
6989.78NANA0.673493NA
7091.02NANA-0.154507NA
7190.77NANA0.0937431NA
7290.69NANA0.404493NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 94.47 & NA & NA & -0.405174 & NA \tabularnewline
2 & 94.19 & NA & NA & -0.416674 & NA \tabularnewline
3 & 94.34 & NA & NA & -0.312007 & NA \tabularnewline
4 & 94.3 & NA & NA & -0.481674 & NA \tabularnewline
5 & 94.4 & NA & NA & 0.158826 & NA \tabularnewline
6 & 94.54 & NA & NA & 0.280243 & NA \tabularnewline
7 & 94.09 & 96.1156 & 96.0796 & 0.0359931 & -2.02558 \tabularnewline
8 & 95.87 & 96.5666 & 96.4433 & 0.123243 & -0.696576 \tabularnewline
9 & 98.46 & 97.4902 & 96.8167 & 0.673493 & 0.96984 \tabularnewline
10 & 98.7 & 97.0609 & 97.2154 & -0.154507 & 1.63909 \tabularnewline
11 & 98.75 & 97.7267 & 97.6329 & 0.0937431 & 1.02334 \tabularnewline
12 & 98.72 & 98.4378 & 98.0333 & 0.404493 & 0.282174 \tabularnewline
13 & 98.72 & 98.0298 & 98.435 & -0.405174 & 0.690174 \tabularnewline
14 & 98.67 & 98.3483 & 98.765 & -0.416674 & 0.321674 \tabularnewline
15 & 98.82 & 98.5922 & 98.9042 & -0.312007 & 0.22784 \tabularnewline
16 & 99.39 & 98.4462 & 98.9279 & -0.481674 & 0.943757 \tabularnewline
17 & 99.33 & 99.0967 & 98.9379 & 0.158826 & 0.233257 \tabularnewline
18 & 99.22 & 99.2486 & 98.9683 & 0.280243 & -0.0285764 \tabularnewline
19 & 99.05 & 99.0397 & 99.0037 & 0.0359931 & 0.0102569 \tabularnewline
20 & 98.83 & 99.1416 & 99.0183 & 0.123243 & -0.311576 \tabularnewline
21 & 98.84 & 99.6939 & 99.0204 & 0.673493 & -0.85391 \tabularnewline
22 & 98.89 & 98.8226 & 98.9771 & -0.154507 & 0.0674236 \tabularnewline
23 & 98.8 & 98.9937 & 98.9 & 0.0937431 & -0.193743 \tabularnewline
24 & 99.4 & 99.2291 & 98.8246 & 0.404493 & 0.170924 \tabularnewline
25 & 98.89 & 98.3502 & 98.7554 & -0.405174 & 0.539757 \tabularnewline
26 & 98.85 & 98.2737 & 98.6904 & -0.416674 & 0.576257 \tabularnewline
27 & 98.69 & 98.3172 & 98.6292 & -0.312007 & 0.37284 \tabularnewline
28 & 98.48 & 98.0883 & 98.57 & -0.481674 & 0.391674 \tabularnewline
29 & 98.39 & 98.6826 & 98.5237 & 0.158826 & -0.292576 \tabularnewline
30 & 98.35 & 98.7561 & 98.4758 & 0.280243 & -0.406076 \tabularnewline
31 & 98.26 & 98.4952 & 98.4592 & 0.0359931 & -0.23516 \tabularnewline
32 & 98.06 & 98.6291 & 98.5058 & 0.123243 & -0.569076 \tabularnewline
33 & 98.14 & 99.2772 & 98.6038 & 0.673493 & -1.13724 \tabularnewline
34 & 98.17 & 98.5917 & 98.7462 & -0.154507 & -0.421743 \tabularnewline
35 & 98.41 & 99.0062 & 98.9125 & 0.0937431 & -0.596243 \tabularnewline
36 & 98.64 & 99.4945 & 99.09 & 0.404493 & -0.854493 \tabularnewline
37 & 99.25 & 98.8773 & 99.2825 & -0.405174 & 0.372674 \tabularnewline
38 & 99.61 & 99.08 & 99.4967 & -0.416674 & 0.530007 \tabularnewline
39 & 100.28 & 99.4417 & 99.7538 & -0.312007 & 0.838257 \tabularnewline
40 & 100.31 & 99.4167 & 99.8983 & -0.481674 & 0.89334 \tabularnewline
41 & 100.55 & 100.084 & 99.925 & 0.158826 & 0.466174 \tabularnewline
42 & 100.45 & 100.258 & 99.9775 & 0.280243 & 0.192257 \tabularnewline
43 & 100.78 & 99.9097 & 99.8737 & 0.0359931 & 0.870257 \tabularnewline
44 & 100.68 & 99.7249 & 99.6017 & 0.123243 & 0.95509 \tabularnewline
45 & 101.69 & 99.951 & 99.2775 & 0.673493 & 1.73901 \tabularnewline
46 & 98.09 & 98.7634 & 98.9179 & -0.154507 & -0.67341 \tabularnewline
47 & 99.13 & 98.7221 & 98.6283 & 0.0937431 & 0.407924 \tabularnewline
48 & 99.18 & 98.8403 & 98.4358 & 0.404493 & 0.339674 \tabularnewline
49 & 96.22 & 97.844 & 98.2492 & -0.405174 & -1.62399 \tabularnewline
50 & 96.11 & 97.5954 & 98.0121 & -0.416674 & -1.48541 \tabularnewline
51 & 96 & 97.3459 & 97.6579 & -0.312007 & -1.34591 \tabularnewline
52 & 95.96 & 96.8429 & 97.3246 & -0.481674 & -0.88291 \tabularnewline
53 & 97.95 & 97.2017 & 97.0429 & 0.158826 & 0.748257 \tabularnewline
54 & 98.43 & 97.0036 & 96.7233 & 0.280243 & 1.42642 \tabularnewline
55 & 98.32 & 96.5181 & 96.4821 & 0.0359931 & 1.80192 \tabularnewline
56 & 97.45 & 96.4062 & 96.2829 & 0.123243 & 1.04384 \tabularnewline
57 & 96.42 & 96.716 & 96.0425 & 0.673493 & -0.295993 \tabularnewline
58 & 95.36 & 95.5497 & 95.7042 & -0.154507 & -0.18966 \tabularnewline
59 & 95.1 & 95.3196 & 95.2258 & 0.0937431 & -0.219576 \tabularnewline
60 & 95.54 & 95.0566 & 94.6521 & 0.404493 & 0.483424 \tabularnewline
61 & 94.07 & 93.6269 & 94.0321 & -0.405174 & 0.44309 \tabularnewline
62 & 93.48 & 93.0008 & 93.4175 & -0.416674 & 0.479174 \tabularnewline
63 & 92.86 & 92.5313 & 92.8433 & -0.312007 & 0.328674 \tabularnewline
64 & 90.98 & 91.9042 & 92.3858 & -0.481674 & -0.92416 \tabularnewline
65 & 91.45 & 92.1834 & 92.0246 & 0.158826 & -0.73341 \tabularnewline
66 & 91.16 & 91.9223 & 91.6421 & 0.280243 & -0.762326 \tabularnewline
67 & 90.71 & NA & NA & 0.0359931 & NA \tabularnewline
68 & 90.31 & NA & NA & 0.123243 & NA \tabularnewline
69 & 89.78 & NA & NA & 0.673493 & NA \tabularnewline
70 & 91.02 & NA & NA & -0.154507 & NA \tabularnewline
71 & 90.77 & NA & NA & 0.0937431 & NA \tabularnewline
72 & 90.69 & NA & NA & 0.404493 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=&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]94.47[/C][C]NA[/C][C]NA[/C][C]-0.405174[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]94.19[/C][C]NA[/C][C]NA[/C][C]-0.416674[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]94.34[/C][C]NA[/C][C]NA[/C][C]-0.312007[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]94.3[/C][C]NA[/C][C]NA[/C][C]-0.481674[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]94.4[/C][C]NA[/C][C]NA[/C][C]0.158826[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]94.54[/C][C]NA[/C][C]NA[/C][C]0.280243[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]94.09[/C][C]96.1156[/C][C]96.0796[/C][C]0.0359931[/C][C]-2.02558[/C][/ROW]
[ROW][C]8[/C][C]95.87[/C][C]96.5666[/C][C]96.4433[/C][C]0.123243[/C][C]-0.696576[/C][/ROW]
[ROW][C]9[/C][C]98.46[/C][C]97.4902[/C][C]96.8167[/C][C]0.673493[/C][C]0.96984[/C][/ROW]
[ROW][C]10[/C][C]98.7[/C][C]97.0609[/C][C]97.2154[/C][C]-0.154507[/C][C]1.63909[/C][/ROW]
[ROW][C]11[/C][C]98.75[/C][C]97.7267[/C][C]97.6329[/C][C]0.0937431[/C][C]1.02334[/C][/ROW]
[ROW][C]12[/C][C]98.72[/C][C]98.4378[/C][C]98.0333[/C][C]0.404493[/C][C]0.282174[/C][/ROW]
[ROW][C]13[/C][C]98.72[/C][C]98.0298[/C][C]98.435[/C][C]-0.405174[/C][C]0.690174[/C][/ROW]
[ROW][C]14[/C][C]98.67[/C][C]98.3483[/C][C]98.765[/C][C]-0.416674[/C][C]0.321674[/C][/ROW]
[ROW][C]15[/C][C]98.82[/C][C]98.5922[/C][C]98.9042[/C][C]-0.312007[/C][C]0.22784[/C][/ROW]
[ROW][C]16[/C][C]99.39[/C][C]98.4462[/C][C]98.9279[/C][C]-0.481674[/C][C]0.943757[/C][/ROW]
[ROW][C]17[/C][C]99.33[/C][C]99.0967[/C][C]98.9379[/C][C]0.158826[/C][C]0.233257[/C][/ROW]
[ROW][C]18[/C][C]99.22[/C][C]99.2486[/C][C]98.9683[/C][C]0.280243[/C][C]-0.0285764[/C][/ROW]
[ROW][C]19[/C][C]99.05[/C][C]99.0397[/C][C]99.0037[/C][C]0.0359931[/C][C]0.0102569[/C][/ROW]
[ROW][C]20[/C][C]98.83[/C][C]99.1416[/C][C]99.0183[/C][C]0.123243[/C][C]-0.311576[/C][/ROW]
[ROW][C]21[/C][C]98.84[/C][C]99.6939[/C][C]99.0204[/C][C]0.673493[/C][C]-0.85391[/C][/ROW]
[ROW][C]22[/C][C]98.89[/C][C]98.8226[/C][C]98.9771[/C][C]-0.154507[/C][C]0.0674236[/C][/ROW]
[ROW][C]23[/C][C]98.8[/C][C]98.9937[/C][C]98.9[/C][C]0.0937431[/C][C]-0.193743[/C][/ROW]
[ROW][C]24[/C][C]99.4[/C][C]99.2291[/C][C]98.8246[/C][C]0.404493[/C][C]0.170924[/C][/ROW]
[ROW][C]25[/C][C]98.89[/C][C]98.3502[/C][C]98.7554[/C][C]-0.405174[/C][C]0.539757[/C][/ROW]
[ROW][C]26[/C][C]98.85[/C][C]98.2737[/C][C]98.6904[/C][C]-0.416674[/C][C]0.576257[/C][/ROW]
[ROW][C]27[/C][C]98.69[/C][C]98.3172[/C][C]98.6292[/C][C]-0.312007[/C][C]0.37284[/C][/ROW]
[ROW][C]28[/C][C]98.48[/C][C]98.0883[/C][C]98.57[/C][C]-0.481674[/C][C]0.391674[/C][/ROW]
[ROW][C]29[/C][C]98.39[/C][C]98.6826[/C][C]98.5237[/C][C]0.158826[/C][C]-0.292576[/C][/ROW]
[ROW][C]30[/C][C]98.35[/C][C]98.7561[/C][C]98.4758[/C][C]0.280243[/C][C]-0.406076[/C][/ROW]
[ROW][C]31[/C][C]98.26[/C][C]98.4952[/C][C]98.4592[/C][C]0.0359931[/C][C]-0.23516[/C][/ROW]
[ROW][C]32[/C][C]98.06[/C][C]98.6291[/C][C]98.5058[/C][C]0.123243[/C][C]-0.569076[/C][/ROW]
[ROW][C]33[/C][C]98.14[/C][C]99.2772[/C][C]98.6038[/C][C]0.673493[/C][C]-1.13724[/C][/ROW]
[ROW][C]34[/C][C]98.17[/C][C]98.5917[/C][C]98.7462[/C][C]-0.154507[/C][C]-0.421743[/C][/ROW]
[ROW][C]35[/C][C]98.41[/C][C]99.0062[/C][C]98.9125[/C][C]0.0937431[/C][C]-0.596243[/C][/ROW]
[ROW][C]36[/C][C]98.64[/C][C]99.4945[/C][C]99.09[/C][C]0.404493[/C][C]-0.854493[/C][/ROW]
[ROW][C]37[/C][C]99.25[/C][C]98.8773[/C][C]99.2825[/C][C]-0.405174[/C][C]0.372674[/C][/ROW]
[ROW][C]38[/C][C]99.61[/C][C]99.08[/C][C]99.4967[/C][C]-0.416674[/C][C]0.530007[/C][/ROW]
[ROW][C]39[/C][C]100.28[/C][C]99.4417[/C][C]99.7538[/C][C]-0.312007[/C][C]0.838257[/C][/ROW]
[ROW][C]40[/C][C]100.31[/C][C]99.4167[/C][C]99.8983[/C][C]-0.481674[/C][C]0.89334[/C][/ROW]
[ROW][C]41[/C][C]100.55[/C][C]100.084[/C][C]99.925[/C][C]0.158826[/C][C]0.466174[/C][/ROW]
[ROW][C]42[/C][C]100.45[/C][C]100.258[/C][C]99.9775[/C][C]0.280243[/C][C]0.192257[/C][/ROW]
[ROW][C]43[/C][C]100.78[/C][C]99.9097[/C][C]99.8737[/C][C]0.0359931[/C][C]0.870257[/C][/ROW]
[ROW][C]44[/C][C]100.68[/C][C]99.7249[/C][C]99.6017[/C][C]0.123243[/C][C]0.95509[/C][/ROW]
[ROW][C]45[/C][C]101.69[/C][C]99.951[/C][C]99.2775[/C][C]0.673493[/C][C]1.73901[/C][/ROW]
[ROW][C]46[/C][C]98.09[/C][C]98.7634[/C][C]98.9179[/C][C]-0.154507[/C][C]-0.67341[/C][/ROW]
[ROW][C]47[/C][C]99.13[/C][C]98.7221[/C][C]98.6283[/C][C]0.0937431[/C][C]0.407924[/C][/ROW]
[ROW][C]48[/C][C]99.18[/C][C]98.8403[/C][C]98.4358[/C][C]0.404493[/C][C]0.339674[/C][/ROW]
[ROW][C]49[/C][C]96.22[/C][C]97.844[/C][C]98.2492[/C][C]-0.405174[/C][C]-1.62399[/C][/ROW]
[ROW][C]50[/C][C]96.11[/C][C]97.5954[/C][C]98.0121[/C][C]-0.416674[/C][C]-1.48541[/C][/ROW]
[ROW][C]51[/C][C]96[/C][C]97.3459[/C][C]97.6579[/C][C]-0.312007[/C][C]-1.34591[/C][/ROW]
[ROW][C]52[/C][C]95.96[/C][C]96.8429[/C][C]97.3246[/C][C]-0.481674[/C][C]-0.88291[/C][/ROW]
[ROW][C]53[/C][C]97.95[/C][C]97.2017[/C][C]97.0429[/C][C]0.158826[/C][C]0.748257[/C][/ROW]
[ROW][C]54[/C][C]98.43[/C][C]97.0036[/C][C]96.7233[/C][C]0.280243[/C][C]1.42642[/C][/ROW]
[ROW][C]55[/C][C]98.32[/C][C]96.5181[/C][C]96.4821[/C][C]0.0359931[/C][C]1.80192[/C][/ROW]
[ROW][C]56[/C][C]97.45[/C][C]96.4062[/C][C]96.2829[/C][C]0.123243[/C][C]1.04384[/C][/ROW]
[ROW][C]57[/C][C]96.42[/C][C]96.716[/C][C]96.0425[/C][C]0.673493[/C][C]-0.295993[/C][/ROW]
[ROW][C]58[/C][C]95.36[/C][C]95.5497[/C][C]95.7042[/C][C]-0.154507[/C][C]-0.18966[/C][/ROW]
[ROW][C]59[/C][C]95.1[/C][C]95.3196[/C][C]95.2258[/C][C]0.0937431[/C][C]-0.219576[/C][/ROW]
[ROW][C]60[/C][C]95.54[/C][C]95.0566[/C][C]94.6521[/C][C]0.404493[/C][C]0.483424[/C][/ROW]
[ROW][C]61[/C][C]94.07[/C][C]93.6269[/C][C]94.0321[/C][C]-0.405174[/C][C]0.44309[/C][/ROW]
[ROW][C]62[/C][C]93.48[/C][C]93.0008[/C][C]93.4175[/C][C]-0.416674[/C][C]0.479174[/C][/ROW]
[ROW][C]63[/C][C]92.86[/C][C]92.5313[/C][C]92.8433[/C][C]-0.312007[/C][C]0.328674[/C][/ROW]
[ROW][C]64[/C][C]90.98[/C][C]91.9042[/C][C]92.3858[/C][C]-0.481674[/C][C]-0.92416[/C][/ROW]
[ROW][C]65[/C][C]91.45[/C][C]92.1834[/C][C]92.0246[/C][C]0.158826[/C][C]-0.73341[/C][/ROW]
[ROW][C]66[/C][C]91.16[/C][C]91.9223[/C][C]91.6421[/C][C]0.280243[/C][C]-0.762326[/C][/ROW]
[ROW][C]67[/C][C]90.71[/C][C]NA[/C][C]NA[/C][C]0.0359931[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]90.31[/C][C]NA[/C][C]NA[/C][C]0.123243[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]89.78[/C][C]NA[/C][C]NA[/C][C]0.673493[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]91.02[/C][C]NA[/C][C]NA[/C][C]-0.154507[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]90.77[/C][C]NA[/C][C]NA[/C][C]0.0937431[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]90.69[/C][C]NA[/C][C]NA[/C][C]0.404493[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=&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
194.47NANA-0.405174NA
294.19NANA-0.416674NA
394.34NANA-0.312007NA
494.3NANA-0.481674NA
594.4NANA0.158826NA
694.54NANA0.280243NA
794.0996.115696.07960.0359931-2.02558
895.8796.566696.44330.123243-0.696576
998.4697.490296.81670.6734930.96984
1098.797.060997.2154-0.1545071.63909
1198.7597.726797.63290.09374311.02334
1298.7298.437898.03330.4044930.282174
1398.7298.029898.435-0.4051740.690174
1498.6798.348398.765-0.4166740.321674
1598.8298.592298.9042-0.3120070.22784
1699.3998.446298.9279-0.4816740.943757
1799.3399.096798.93790.1588260.233257
1899.2299.248698.96830.280243-0.0285764
1999.0599.039799.00370.03599310.0102569
2098.8399.141699.01830.123243-0.311576
2198.8499.693999.02040.673493-0.85391
2298.8998.822698.9771-0.1545070.0674236
2398.898.993798.90.0937431-0.193743
2499.499.229198.82460.4044930.170924
2598.8998.350298.7554-0.4051740.539757
2698.8598.273798.6904-0.4166740.576257
2798.6998.317298.6292-0.3120070.37284
2898.4898.088398.57-0.4816740.391674
2998.3998.682698.52370.158826-0.292576
3098.3598.756198.47580.280243-0.406076
3198.2698.495298.45920.0359931-0.23516
3298.0698.629198.50580.123243-0.569076
3398.1499.277298.60380.673493-1.13724
3498.1798.591798.7462-0.154507-0.421743
3598.4199.006298.91250.0937431-0.596243
3698.6499.494599.090.404493-0.854493
3799.2598.877399.2825-0.4051740.372674
3899.6199.0899.4967-0.4166740.530007
39100.2899.441799.7538-0.3120070.838257
40100.3199.416799.8983-0.4816740.89334
41100.55100.08499.9250.1588260.466174
42100.45100.25899.97750.2802430.192257
43100.7899.909799.87370.03599310.870257
44100.6899.724999.60170.1232430.95509
45101.6999.95199.27750.6734931.73901
4698.0998.763498.9179-0.154507-0.67341
4799.1398.722198.62830.09374310.407924
4899.1898.840398.43580.4044930.339674
4996.2297.84498.2492-0.405174-1.62399
5096.1197.595498.0121-0.416674-1.48541
519697.345997.6579-0.312007-1.34591
5295.9696.842997.3246-0.481674-0.88291
5397.9597.201797.04290.1588260.748257
5498.4397.003696.72330.2802431.42642
5598.3296.518196.48210.03599311.80192
5697.4596.406296.28290.1232431.04384
5796.4296.71696.04250.673493-0.295993
5895.3695.549795.7042-0.154507-0.18966
5995.195.319695.22580.0937431-0.219576
6095.5495.056694.65210.4044930.483424
6194.0793.626994.0321-0.4051740.44309
6293.4893.000893.4175-0.4166740.479174
6392.8692.531392.8433-0.3120070.328674
6490.9891.904292.3858-0.481674-0.92416
6591.4592.183492.02460.158826-0.73341
6691.1691.922391.64210.280243-0.762326
6790.71NANA0.0359931NA
6890.31NANA0.123243NA
6989.78NANA0.673493NA
7091.02NANA-0.154507NA
7190.77NANA0.0937431NA
7290.69NANA0.404493NA



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