Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_decompose.wasp
Title produced by softwareClassical Decomposition
Date of computationThu, 12 Dec 2013 04:41:04 -0500
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2013/Dec/12/t1386841395w0sbvjmen0p7ucq.htm/, Retrieved Tue, 07 Dec 2021 11:30:20 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=232235, Retrieved Tue, 07 Dec 2021 11:30:20 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact68
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Classical Decomposition] [] [2013-12-12 09:41:04] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
1876,88
1876,68
1865,52
1858,99
1856,87
1858,22
1858,22
1859,32
1859,52
1852,48
1850,07
1850,07
1850,07
1841,55
1845
1844,01
1842,67
1842,67
1842,67
1842,9
1840,37
1841,59
1844,33
1844,33
1844,33
1845,39
1861,84
1862,85
1869,46
1870,8
1870,8
1871,52
1875,52
1880,38
1885,05
1886,42
1886,42
1891,65
1903,11
1905,29
1904,26
1905,37
1905,37
1905,12
1908,62
1915,08
1916,36
1916,68
1916,24
1922,05
1922,63
1922,47
1920,64
1920,66
1920,66
1921,19
1921,44
1921,73
1921,81
1921,81
1921,81
1921,48
1917,07
1912,64
1901,15
1898,12
1900,02
1900,02
1900,82
1901,9
1902,19
1901,84




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=232235&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 time5 seconds
R Server'Gwilym Jenkins' @ jenkins.wessa.net







Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
11876.88NANA0.999432NA
21876.68NANA0.999386NA
31865.52NANA1.00198NA
41858.99NANA1.00133NA
51856.87NANA0.999936NA
61858.22NANA0.999418NA
71858.221858.491859.120.9996630.999853
81859.321855.651856.540.9995221.00198
91859.521853.61854.220.9996661.00319
101852.481852.361852.740.9997961.00006
111850.071851.591851.521.000040.999178
121850.071849.991850.290.999841.00004
131850.071847.941848.990.9994321.00115
141841.551846.521847.660.9993860.997307
1518451849.831846.181.001980.99739
161844.011847.371844.921.001330.998181
171842.671844.111844.230.9999360.999218
181842.671842.681843.750.9994180.999995
191842.671842.651843.270.9996631.00001
201842.91842.311843.20.9995221.00032
211840.371843.441844.060.9996660.998334
221841.591845.171845.540.9997960.998061
231844.331847.511847.441.000040.998278
241844.331849.441849.730.999840.997239
251844.331851.031852.080.9994320.996383
261845.391853.31854.440.9993860.995731
271861.841860.771857.11.001981.00057
281862.851862.651860.181.001331.00011
291869.461863.371863.490.9999361.00327
301870.81865.861866.940.9994181.00265
311870.81869.821870.450.9996631.00052
321871.521873.241874.130.9995220.999084
331875.521877.151877.780.9996660.999131
341880.381880.881881.270.9997960.999732
351885.051884.551884.491.000041.00026
361886.421887.071887.380.999840.999654
371886.421889.181890.260.9994320.998537
381891.651891.931893.10.9993860.99985
391903.111899.631895.881.001981.00183
401905.291901.221898.71.001331.00214
411904.261901.331901.450.9999361.00154
421905.371902.911904.020.9994181.00129
431905.371905.881906.520.9996630.999733
441905.121908.121909.030.9995220.99843
451908.621910.471911.110.9996660.999031
461915.081912.251912.640.9997961.00148
471916.361914.111914.041.000041.00118
481916.681915.051915.360.999841.00085
491916.241915.541916.630.9994321.00036
501922.051916.761917.940.9993861.00276
511922.631922.941919.141.001980.99984
521922.471922.51919.951.001330.999985
531920.641920.331920.460.9999361.00016
541920.661919.781920.90.9994181.00046
551920.661920.71921.340.9996630.999981
561921.191920.631921.550.9995221.00029
571921.441920.651921.30.9996661.00041
581921.731920.261920.650.9997961.00076
591921.811919.51919.431.000041.0012
601921.811917.371917.680.999841.00231
611921.811914.81915.880.9994321.00366
621921.481912.961914.140.9993861.00445
631917.071916.181912.41.001981.00046
641912.641913.251910.711.001330.999683
651901.151908.951909.070.9999360.995915
661898.121906.311907.420.9994180.995704
671900.02NANA0.999663NA
681900.02NANA0.999522NA
691900.82NANA0.999666NA
701901.9NANA0.999796NA
711902.19NANA1.00004NA
721901.84NANA0.99984NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 1876.88 & NA & NA & 0.999432 & NA \tabularnewline
2 & 1876.68 & NA & NA & 0.999386 & NA \tabularnewline
3 & 1865.52 & NA & NA & 1.00198 & NA \tabularnewline
4 & 1858.99 & NA & NA & 1.00133 & NA \tabularnewline
5 & 1856.87 & NA & NA & 0.999936 & NA \tabularnewline
6 & 1858.22 & NA & NA & 0.999418 & NA \tabularnewline
7 & 1858.22 & 1858.49 & 1859.12 & 0.999663 & 0.999853 \tabularnewline
8 & 1859.32 & 1855.65 & 1856.54 & 0.999522 & 1.00198 \tabularnewline
9 & 1859.52 & 1853.6 & 1854.22 & 0.999666 & 1.00319 \tabularnewline
10 & 1852.48 & 1852.36 & 1852.74 & 0.999796 & 1.00006 \tabularnewline
11 & 1850.07 & 1851.59 & 1851.52 & 1.00004 & 0.999178 \tabularnewline
12 & 1850.07 & 1849.99 & 1850.29 & 0.99984 & 1.00004 \tabularnewline
13 & 1850.07 & 1847.94 & 1848.99 & 0.999432 & 1.00115 \tabularnewline
14 & 1841.55 & 1846.52 & 1847.66 & 0.999386 & 0.997307 \tabularnewline
15 & 1845 & 1849.83 & 1846.18 & 1.00198 & 0.99739 \tabularnewline
16 & 1844.01 & 1847.37 & 1844.92 & 1.00133 & 0.998181 \tabularnewline
17 & 1842.67 & 1844.11 & 1844.23 & 0.999936 & 0.999218 \tabularnewline
18 & 1842.67 & 1842.68 & 1843.75 & 0.999418 & 0.999995 \tabularnewline
19 & 1842.67 & 1842.65 & 1843.27 & 0.999663 & 1.00001 \tabularnewline
20 & 1842.9 & 1842.31 & 1843.2 & 0.999522 & 1.00032 \tabularnewline
21 & 1840.37 & 1843.44 & 1844.06 & 0.999666 & 0.998334 \tabularnewline
22 & 1841.59 & 1845.17 & 1845.54 & 0.999796 & 0.998061 \tabularnewline
23 & 1844.33 & 1847.51 & 1847.44 & 1.00004 & 0.998278 \tabularnewline
24 & 1844.33 & 1849.44 & 1849.73 & 0.99984 & 0.997239 \tabularnewline
25 & 1844.33 & 1851.03 & 1852.08 & 0.999432 & 0.996383 \tabularnewline
26 & 1845.39 & 1853.3 & 1854.44 & 0.999386 & 0.995731 \tabularnewline
27 & 1861.84 & 1860.77 & 1857.1 & 1.00198 & 1.00057 \tabularnewline
28 & 1862.85 & 1862.65 & 1860.18 & 1.00133 & 1.00011 \tabularnewline
29 & 1869.46 & 1863.37 & 1863.49 & 0.999936 & 1.00327 \tabularnewline
30 & 1870.8 & 1865.86 & 1866.94 & 0.999418 & 1.00265 \tabularnewline
31 & 1870.8 & 1869.82 & 1870.45 & 0.999663 & 1.00052 \tabularnewline
32 & 1871.52 & 1873.24 & 1874.13 & 0.999522 & 0.999084 \tabularnewline
33 & 1875.52 & 1877.15 & 1877.78 & 0.999666 & 0.999131 \tabularnewline
34 & 1880.38 & 1880.88 & 1881.27 & 0.999796 & 0.999732 \tabularnewline
35 & 1885.05 & 1884.55 & 1884.49 & 1.00004 & 1.00026 \tabularnewline
36 & 1886.42 & 1887.07 & 1887.38 & 0.99984 & 0.999654 \tabularnewline
37 & 1886.42 & 1889.18 & 1890.26 & 0.999432 & 0.998537 \tabularnewline
38 & 1891.65 & 1891.93 & 1893.1 & 0.999386 & 0.99985 \tabularnewline
39 & 1903.11 & 1899.63 & 1895.88 & 1.00198 & 1.00183 \tabularnewline
40 & 1905.29 & 1901.22 & 1898.7 & 1.00133 & 1.00214 \tabularnewline
41 & 1904.26 & 1901.33 & 1901.45 & 0.999936 & 1.00154 \tabularnewline
42 & 1905.37 & 1902.91 & 1904.02 & 0.999418 & 1.00129 \tabularnewline
43 & 1905.37 & 1905.88 & 1906.52 & 0.999663 & 0.999733 \tabularnewline
44 & 1905.12 & 1908.12 & 1909.03 & 0.999522 & 0.99843 \tabularnewline
45 & 1908.62 & 1910.47 & 1911.11 & 0.999666 & 0.999031 \tabularnewline
46 & 1915.08 & 1912.25 & 1912.64 & 0.999796 & 1.00148 \tabularnewline
47 & 1916.36 & 1914.11 & 1914.04 & 1.00004 & 1.00118 \tabularnewline
48 & 1916.68 & 1915.05 & 1915.36 & 0.99984 & 1.00085 \tabularnewline
49 & 1916.24 & 1915.54 & 1916.63 & 0.999432 & 1.00036 \tabularnewline
50 & 1922.05 & 1916.76 & 1917.94 & 0.999386 & 1.00276 \tabularnewline
51 & 1922.63 & 1922.94 & 1919.14 & 1.00198 & 0.99984 \tabularnewline
52 & 1922.47 & 1922.5 & 1919.95 & 1.00133 & 0.999985 \tabularnewline
53 & 1920.64 & 1920.33 & 1920.46 & 0.999936 & 1.00016 \tabularnewline
54 & 1920.66 & 1919.78 & 1920.9 & 0.999418 & 1.00046 \tabularnewline
55 & 1920.66 & 1920.7 & 1921.34 & 0.999663 & 0.999981 \tabularnewline
56 & 1921.19 & 1920.63 & 1921.55 & 0.999522 & 1.00029 \tabularnewline
57 & 1921.44 & 1920.65 & 1921.3 & 0.999666 & 1.00041 \tabularnewline
58 & 1921.73 & 1920.26 & 1920.65 & 0.999796 & 1.00076 \tabularnewline
59 & 1921.81 & 1919.5 & 1919.43 & 1.00004 & 1.0012 \tabularnewline
60 & 1921.81 & 1917.37 & 1917.68 & 0.99984 & 1.00231 \tabularnewline
61 & 1921.81 & 1914.8 & 1915.88 & 0.999432 & 1.00366 \tabularnewline
62 & 1921.48 & 1912.96 & 1914.14 & 0.999386 & 1.00445 \tabularnewline
63 & 1917.07 & 1916.18 & 1912.4 & 1.00198 & 1.00046 \tabularnewline
64 & 1912.64 & 1913.25 & 1910.71 & 1.00133 & 0.999683 \tabularnewline
65 & 1901.15 & 1908.95 & 1909.07 & 0.999936 & 0.995915 \tabularnewline
66 & 1898.12 & 1906.31 & 1907.42 & 0.999418 & 0.995704 \tabularnewline
67 & 1900.02 & NA & NA & 0.999663 & NA \tabularnewline
68 & 1900.02 & NA & NA & 0.999522 & NA \tabularnewline
69 & 1900.82 & NA & NA & 0.999666 & NA \tabularnewline
70 & 1901.9 & NA & NA & 0.999796 & NA \tabularnewline
71 & 1902.19 & NA & NA & 1.00004 & NA \tabularnewline
72 & 1901.84 & NA & NA & 0.99984 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=232235&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]1876.88[/C][C]NA[/C][C]NA[/C][C]0.999432[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]1876.68[/C][C]NA[/C][C]NA[/C][C]0.999386[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]1865.52[/C][C]NA[/C][C]NA[/C][C]1.00198[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]1858.99[/C][C]NA[/C][C]NA[/C][C]1.00133[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]1856.87[/C][C]NA[/C][C]NA[/C][C]0.999936[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]1858.22[/C][C]NA[/C][C]NA[/C][C]0.999418[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]1858.22[/C][C]1858.49[/C][C]1859.12[/C][C]0.999663[/C][C]0.999853[/C][/ROW]
[ROW][C]8[/C][C]1859.32[/C][C]1855.65[/C][C]1856.54[/C][C]0.999522[/C][C]1.00198[/C][/ROW]
[ROW][C]9[/C][C]1859.52[/C][C]1853.6[/C][C]1854.22[/C][C]0.999666[/C][C]1.00319[/C][/ROW]
[ROW][C]10[/C][C]1852.48[/C][C]1852.36[/C][C]1852.74[/C][C]0.999796[/C][C]1.00006[/C][/ROW]
[ROW][C]11[/C][C]1850.07[/C][C]1851.59[/C][C]1851.52[/C][C]1.00004[/C][C]0.999178[/C][/ROW]
[ROW][C]12[/C][C]1850.07[/C][C]1849.99[/C][C]1850.29[/C][C]0.99984[/C][C]1.00004[/C][/ROW]
[ROW][C]13[/C][C]1850.07[/C][C]1847.94[/C][C]1848.99[/C][C]0.999432[/C][C]1.00115[/C][/ROW]
[ROW][C]14[/C][C]1841.55[/C][C]1846.52[/C][C]1847.66[/C][C]0.999386[/C][C]0.997307[/C][/ROW]
[ROW][C]15[/C][C]1845[/C][C]1849.83[/C][C]1846.18[/C][C]1.00198[/C][C]0.99739[/C][/ROW]
[ROW][C]16[/C][C]1844.01[/C][C]1847.37[/C][C]1844.92[/C][C]1.00133[/C][C]0.998181[/C][/ROW]
[ROW][C]17[/C][C]1842.67[/C][C]1844.11[/C][C]1844.23[/C][C]0.999936[/C][C]0.999218[/C][/ROW]
[ROW][C]18[/C][C]1842.67[/C][C]1842.68[/C][C]1843.75[/C][C]0.999418[/C][C]0.999995[/C][/ROW]
[ROW][C]19[/C][C]1842.67[/C][C]1842.65[/C][C]1843.27[/C][C]0.999663[/C][C]1.00001[/C][/ROW]
[ROW][C]20[/C][C]1842.9[/C][C]1842.31[/C][C]1843.2[/C][C]0.999522[/C][C]1.00032[/C][/ROW]
[ROW][C]21[/C][C]1840.37[/C][C]1843.44[/C][C]1844.06[/C][C]0.999666[/C][C]0.998334[/C][/ROW]
[ROW][C]22[/C][C]1841.59[/C][C]1845.17[/C][C]1845.54[/C][C]0.999796[/C][C]0.998061[/C][/ROW]
[ROW][C]23[/C][C]1844.33[/C][C]1847.51[/C][C]1847.44[/C][C]1.00004[/C][C]0.998278[/C][/ROW]
[ROW][C]24[/C][C]1844.33[/C][C]1849.44[/C][C]1849.73[/C][C]0.99984[/C][C]0.997239[/C][/ROW]
[ROW][C]25[/C][C]1844.33[/C][C]1851.03[/C][C]1852.08[/C][C]0.999432[/C][C]0.996383[/C][/ROW]
[ROW][C]26[/C][C]1845.39[/C][C]1853.3[/C][C]1854.44[/C][C]0.999386[/C][C]0.995731[/C][/ROW]
[ROW][C]27[/C][C]1861.84[/C][C]1860.77[/C][C]1857.1[/C][C]1.00198[/C][C]1.00057[/C][/ROW]
[ROW][C]28[/C][C]1862.85[/C][C]1862.65[/C][C]1860.18[/C][C]1.00133[/C][C]1.00011[/C][/ROW]
[ROW][C]29[/C][C]1869.46[/C][C]1863.37[/C][C]1863.49[/C][C]0.999936[/C][C]1.00327[/C][/ROW]
[ROW][C]30[/C][C]1870.8[/C][C]1865.86[/C][C]1866.94[/C][C]0.999418[/C][C]1.00265[/C][/ROW]
[ROW][C]31[/C][C]1870.8[/C][C]1869.82[/C][C]1870.45[/C][C]0.999663[/C][C]1.00052[/C][/ROW]
[ROW][C]32[/C][C]1871.52[/C][C]1873.24[/C][C]1874.13[/C][C]0.999522[/C][C]0.999084[/C][/ROW]
[ROW][C]33[/C][C]1875.52[/C][C]1877.15[/C][C]1877.78[/C][C]0.999666[/C][C]0.999131[/C][/ROW]
[ROW][C]34[/C][C]1880.38[/C][C]1880.88[/C][C]1881.27[/C][C]0.999796[/C][C]0.999732[/C][/ROW]
[ROW][C]35[/C][C]1885.05[/C][C]1884.55[/C][C]1884.49[/C][C]1.00004[/C][C]1.00026[/C][/ROW]
[ROW][C]36[/C][C]1886.42[/C][C]1887.07[/C][C]1887.38[/C][C]0.99984[/C][C]0.999654[/C][/ROW]
[ROW][C]37[/C][C]1886.42[/C][C]1889.18[/C][C]1890.26[/C][C]0.999432[/C][C]0.998537[/C][/ROW]
[ROW][C]38[/C][C]1891.65[/C][C]1891.93[/C][C]1893.1[/C][C]0.999386[/C][C]0.99985[/C][/ROW]
[ROW][C]39[/C][C]1903.11[/C][C]1899.63[/C][C]1895.88[/C][C]1.00198[/C][C]1.00183[/C][/ROW]
[ROW][C]40[/C][C]1905.29[/C][C]1901.22[/C][C]1898.7[/C][C]1.00133[/C][C]1.00214[/C][/ROW]
[ROW][C]41[/C][C]1904.26[/C][C]1901.33[/C][C]1901.45[/C][C]0.999936[/C][C]1.00154[/C][/ROW]
[ROW][C]42[/C][C]1905.37[/C][C]1902.91[/C][C]1904.02[/C][C]0.999418[/C][C]1.00129[/C][/ROW]
[ROW][C]43[/C][C]1905.37[/C][C]1905.88[/C][C]1906.52[/C][C]0.999663[/C][C]0.999733[/C][/ROW]
[ROW][C]44[/C][C]1905.12[/C][C]1908.12[/C][C]1909.03[/C][C]0.999522[/C][C]0.99843[/C][/ROW]
[ROW][C]45[/C][C]1908.62[/C][C]1910.47[/C][C]1911.11[/C][C]0.999666[/C][C]0.999031[/C][/ROW]
[ROW][C]46[/C][C]1915.08[/C][C]1912.25[/C][C]1912.64[/C][C]0.999796[/C][C]1.00148[/C][/ROW]
[ROW][C]47[/C][C]1916.36[/C][C]1914.11[/C][C]1914.04[/C][C]1.00004[/C][C]1.00118[/C][/ROW]
[ROW][C]48[/C][C]1916.68[/C][C]1915.05[/C][C]1915.36[/C][C]0.99984[/C][C]1.00085[/C][/ROW]
[ROW][C]49[/C][C]1916.24[/C][C]1915.54[/C][C]1916.63[/C][C]0.999432[/C][C]1.00036[/C][/ROW]
[ROW][C]50[/C][C]1922.05[/C][C]1916.76[/C][C]1917.94[/C][C]0.999386[/C][C]1.00276[/C][/ROW]
[ROW][C]51[/C][C]1922.63[/C][C]1922.94[/C][C]1919.14[/C][C]1.00198[/C][C]0.99984[/C][/ROW]
[ROW][C]52[/C][C]1922.47[/C][C]1922.5[/C][C]1919.95[/C][C]1.00133[/C][C]0.999985[/C][/ROW]
[ROW][C]53[/C][C]1920.64[/C][C]1920.33[/C][C]1920.46[/C][C]0.999936[/C][C]1.00016[/C][/ROW]
[ROW][C]54[/C][C]1920.66[/C][C]1919.78[/C][C]1920.9[/C][C]0.999418[/C][C]1.00046[/C][/ROW]
[ROW][C]55[/C][C]1920.66[/C][C]1920.7[/C][C]1921.34[/C][C]0.999663[/C][C]0.999981[/C][/ROW]
[ROW][C]56[/C][C]1921.19[/C][C]1920.63[/C][C]1921.55[/C][C]0.999522[/C][C]1.00029[/C][/ROW]
[ROW][C]57[/C][C]1921.44[/C][C]1920.65[/C][C]1921.3[/C][C]0.999666[/C][C]1.00041[/C][/ROW]
[ROW][C]58[/C][C]1921.73[/C][C]1920.26[/C][C]1920.65[/C][C]0.999796[/C][C]1.00076[/C][/ROW]
[ROW][C]59[/C][C]1921.81[/C][C]1919.5[/C][C]1919.43[/C][C]1.00004[/C][C]1.0012[/C][/ROW]
[ROW][C]60[/C][C]1921.81[/C][C]1917.37[/C][C]1917.68[/C][C]0.99984[/C][C]1.00231[/C][/ROW]
[ROW][C]61[/C][C]1921.81[/C][C]1914.8[/C][C]1915.88[/C][C]0.999432[/C][C]1.00366[/C][/ROW]
[ROW][C]62[/C][C]1921.48[/C][C]1912.96[/C][C]1914.14[/C][C]0.999386[/C][C]1.00445[/C][/ROW]
[ROW][C]63[/C][C]1917.07[/C][C]1916.18[/C][C]1912.4[/C][C]1.00198[/C][C]1.00046[/C][/ROW]
[ROW][C]64[/C][C]1912.64[/C][C]1913.25[/C][C]1910.71[/C][C]1.00133[/C][C]0.999683[/C][/ROW]
[ROW][C]65[/C][C]1901.15[/C][C]1908.95[/C][C]1909.07[/C][C]0.999936[/C][C]0.995915[/C][/ROW]
[ROW][C]66[/C][C]1898.12[/C][C]1906.31[/C][C]1907.42[/C][C]0.999418[/C][C]0.995704[/C][/ROW]
[ROW][C]67[/C][C]1900.02[/C][C]NA[/C][C]NA[/C][C]0.999663[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]1900.02[/C][C]NA[/C][C]NA[/C][C]0.999522[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]1900.82[/C][C]NA[/C][C]NA[/C][C]0.999666[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]1901.9[/C][C]NA[/C][C]NA[/C][C]0.999796[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]1902.19[/C][C]NA[/C][C]NA[/C][C]1.00004[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]1901.84[/C][C]NA[/C][C]NA[/C][C]0.99984[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=232235&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=232235&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
11876.88NANA0.999432NA
21876.68NANA0.999386NA
31865.52NANA1.00198NA
41858.99NANA1.00133NA
51856.87NANA0.999936NA
61858.22NANA0.999418NA
71858.221858.491859.120.9996630.999853
81859.321855.651856.540.9995221.00198
91859.521853.61854.220.9996661.00319
101852.481852.361852.740.9997961.00006
111850.071851.591851.521.000040.999178
121850.071849.991850.290.999841.00004
131850.071847.941848.990.9994321.00115
141841.551846.521847.660.9993860.997307
1518451849.831846.181.001980.99739
161844.011847.371844.921.001330.998181
171842.671844.111844.230.9999360.999218
181842.671842.681843.750.9994180.999995
191842.671842.651843.270.9996631.00001
201842.91842.311843.20.9995221.00032
211840.371843.441844.060.9996660.998334
221841.591845.171845.540.9997960.998061
231844.331847.511847.441.000040.998278
241844.331849.441849.730.999840.997239
251844.331851.031852.080.9994320.996383
261845.391853.31854.440.9993860.995731
271861.841860.771857.11.001981.00057
281862.851862.651860.181.001331.00011
291869.461863.371863.490.9999361.00327
301870.81865.861866.940.9994181.00265
311870.81869.821870.450.9996631.00052
321871.521873.241874.130.9995220.999084
331875.521877.151877.780.9996660.999131
341880.381880.881881.270.9997960.999732
351885.051884.551884.491.000041.00026
361886.421887.071887.380.999840.999654
371886.421889.181890.260.9994320.998537
381891.651891.931893.10.9993860.99985
391903.111899.631895.881.001981.00183
401905.291901.221898.71.001331.00214
411904.261901.331901.450.9999361.00154
421905.371902.911904.020.9994181.00129
431905.371905.881906.520.9996630.999733
441905.121908.121909.030.9995220.99843
451908.621910.471911.110.9996660.999031
461915.081912.251912.640.9997961.00148
471916.361914.111914.041.000041.00118
481916.681915.051915.360.999841.00085
491916.241915.541916.630.9994321.00036
501922.051916.761917.940.9993861.00276
511922.631922.941919.141.001980.99984
521922.471922.51919.951.001330.999985
531920.641920.331920.460.9999361.00016
541920.661919.781920.90.9994181.00046
551920.661920.71921.340.9996630.999981
561921.191920.631921.550.9995221.00029
571921.441920.651921.30.9996661.00041
581921.731920.261920.650.9997961.00076
591921.811919.51919.431.000041.0012
601921.811917.371917.680.999841.00231
611921.811914.81915.880.9994321.00366
621921.481912.961914.140.9993861.00445
631917.071916.181912.41.001981.00046
641912.641913.251910.711.001330.999683
651901.151908.951909.070.9999360.995915
661898.121906.311907.420.9994180.995704
671900.02NANA0.999663NA
681900.02NANA0.999522NA
691900.82NANA0.999666NA
701901.9NANA0.999796NA
711902.19NANA1.00004NA
721901.84NANA0.99984NA



Parameters (Session):
par1 = multiplicative ; par2 = 12 ;
Parameters (R input):
par1 = multiplicative ; 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')