Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_decompose.wasp

Title produced by software

Classical Decomposition

Date of computation

Fri, 14 Dec 2012 17:13:46 -0500

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Dec/14/t13555232959ei8kuancregcsd.htm/, Retrieved Fri, 19 Apr 2024 02:56:37 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=199767, Retrieved Fri, 19 Apr 2024 02:56:37 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Classical Decomposition] [Opdracht 9.2 pers...] [2012-12-14 22:13:46] [d41d8cd98f00b204e9800998ecf8427e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	4 seconds
R Server	'Gertrude Mary Cox' @ cox.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 & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=199767&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]'Gertrude Mary Cox' @ cox.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=199767&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=199767&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	4 seconds
R Server	'Gertrude Mary Cox' @ cox.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	101.81	NA	NA	1.00054708865757	NA
2	101.72	NA	NA	1.00086567684146	NA
3	101.78	NA	NA	1.00127198087622	NA
4	102.04	NA	NA	1.00084576000705	NA
5	102.36	NA	NA	0.998818787846641	NA
6	102.56	NA	NA	0.999316300529365	NA
7	102.69	102.416788753364	102.46125	0.99956606769256	1.00266764121353
8	102.77	102.503946599627	102.55625	0.999490002799702	1.00259554299321
9	102.85	102.647046686335	102.66875	0.999788608377278	1.0019771958397
10	102.9	102.734976992078	102.78625	0.999501168610378	1.00160629819321
11	102.72	102.821063483348	102.86625	0.999560725537755	0.999017093580593
12	102.79	102.956112438824	102.912083333333	1.00042783222402	0.998386570404719
13	102.9	103.009241039639	102.952916666667	1.00054708865757	0.99893950252874
14	102.91	103.080824167363	102.991666666667	1.00086567684146	0.998342813333685
15	103.29	103.160634993019	103.029583333333	1.00127198087622	1.00125401522577
16	103.35	103.153419312327	103.06625	1.00084576000705	1.00190571179301
17	102.97	102.998193402746	103.12	0.998818787846641	0.999726272842133
18	103.05	103.123196487752	103.19375	0.999316300529365	0.999290203462992
19	103.18	103.22227240958	103.267083333333	0.99956606769256	0.999590472011581
20	103.21	103.288546251825	103.34125	0.999490002799702	0.99923954538354
21	103.32	103.381058156318	103.402916666667	0.999788608377278	0.999409387392553
22	103.31	103.397979433923	103.449583333333	0.999501168610378	0.999149118441144
23	103.6	103.454535093158	103.5	0.999560725537755	1.00140607569027
24	103.68	103.596803096377	103.5525	1.00042783222402	1.00080308369695
25	103.77	103.655844595684	103.599166666667	1.00054708865757	1.00110129250079
26	103.82	103.733889021502	103.644166666667	1.00086567684146	1.00083011424049
27	103.86	103.825229270325	103.693333333333	1.00127198087622	1.00033489672904
28	103.9	103.836913562598	103.749166666667	1.00084576000705	1.00060755308721
29	103.63	103.674476957017	103.797083333333	0.998818787846641	0.999570994150902
30	103.65	103.769421028761	103.840416666667	0.999316300529365	0.998849169364373
31	103.7	103.84491877258	103.89	0.99956606769256	0.998604469296206
32	103.77	103.896569336861	103.949583333333	0.999490002799702	0.998781775590195
33	103.94	103.999260779165	104.02125	0.999788608377278	0.999430180765507
34	104.03	104.045572899419	104.0975	0.999501168610378	0.999850326169727
35	104.03	104.109247368385	104.155	0.999560725537755	0.999238805673963
36	104.29	104.237910598861	104.193333333333	1.00042783222402	1.00049971647398
37	104.35	104.294944048564	104.237916666667	1.00054708865757	1.00052788706047
38	104.67	104.375277109411	104.285	1.00086567684146	1.00282368486821
39	104.73	104.460619781523	104.327916666667	1.00127198087622	1.00257877292936
40	104.86	104.451182647803	104.362916666667	1.00084576000705	1.00391395618349
41	104.05	104.27085500826	104.394166666667	0.998818787846641	0.997881910450982
42	104.15	104.35152277382	104.422916666667	0.999316300529365	0.998068808499745
43	104.27	104.401343883596	104.446666666667	0.99956606769256	0.998741933018199
44	104.33	104.403394059114	104.456666666667	0.999490002799702	0.999297014625093
45	104.41	104.426253830659	104.448333333333	0.999788608377278	0.999844351108431
46	104.4	104.374158908599	104.42625	0.999501168610378	1.00024758131391
47	104.41	104.394538658799	104.440416666667	0.999560725537755	1.00014810488556
48	104.6	104.54470846741	104.5	1.00042783222402	1.00052887930342
49	104.61	104.614702222314	104.5575	1.00054708865757	0.999955051993513
50	104.65	104.699724399654	104.609166666667	1.00086567684146	0.999525076117067
51	104.55	104.789787945236	104.656666666667	1.00127198087622	0.997711724110355
52	104.51	104.791470206205	104.702916666667	1.00084576000705	0.997313996972738
53	104.74	104.634175342339	104.757916666667	0.998818787846641	1.00101137756679
54	104.89	104.746252712529	104.817916666667	0.999316300529365	1.00137233823405
55	104.91	104.831990264426	104.8775	0.99956606769256	1.00074414055649
56	104.93	104.884398622962	104.937916666667	0.999490002799702	1.00043477750397
57	104.95	104.982802822656	105.005	0.999788608377278	0.999687540989818
58	104.97	105.023001750556	105.075416666667	0.999501168610378	0.999495331978021
59	105.16	105.103393806659	105.149583333333	0.999560725537755	1.00053857626562
60	105.29	105.276271319723	105.23125	1.00042783222402	1.00013040621694
61	105.35	105.368447695769	105.310833333333	1.00054708865757	0.999824922012491
62	105.36	105.483735846513	105.3925	1.00086567684146	0.998826967536558
63	105.45	105.611665362872	105.4775	1.00127198087622	0.998469247101478
64	105.3	105.658452845811	105.569166666667	1.00084576000705	0.996607438059553
65	105.73	105.502315338776	105.627083333333	0.998818787846641	1.0021581010852
66	105.86	105.567773987922	105.64	0.999316300529365	1.00276813653484
67	105.85	NA	NA	0.99956606769256	NA
68	105.95	NA	NA	0.999490002799702	NA
69	105.97	NA	NA	0.999788608377278	NA
70	106.15	NA	NA	0.999501168610378	NA
71	105.37	NA	NA	0.999560725537755	NA
72	105.39	NA	NA	1.00042783222402	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 101.81 & NA & NA & 1.00054708865757 & NA \tabularnewline
2 & 101.72 & NA & NA & 1.00086567684146 & NA \tabularnewline
3 & 101.78 & NA & NA & 1.00127198087622 & NA \tabularnewline
4 & 102.04 & NA & NA & 1.00084576000705 & NA \tabularnewline
5 & 102.36 & NA & NA & 0.998818787846641 & NA \tabularnewline
6 & 102.56 & NA & NA & 0.999316300529365 & NA \tabularnewline
7 & 102.69 & 102.416788753364 & 102.46125 & 0.99956606769256 & 1.00266764121353 \tabularnewline
8 & 102.77 & 102.503946599627 & 102.55625 & 0.999490002799702 & 1.00259554299321 \tabularnewline
9 & 102.85 & 102.647046686335 & 102.66875 & 0.999788608377278 & 1.0019771958397 \tabularnewline
10 & 102.9 & 102.734976992078 & 102.78625 & 0.999501168610378 & 1.00160629819321 \tabularnewline
11 & 102.72 & 102.821063483348 & 102.86625 & 0.999560725537755 & 0.999017093580593 \tabularnewline
12 & 102.79 & 102.956112438824 & 102.912083333333 & 1.00042783222402 & 0.998386570404719 \tabularnewline
13 & 102.9 & 103.009241039639 & 102.952916666667 & 1.00054708865757 & 0.99893950252874 \tabularnewline
14 & 102.91 & 103.080824167363 & 102.991666666667 & 1.00086567684146 & 0.998342813333685 \tabularnewline
15 & 103.29 & 103.160634993019 & 103.029583333333 & 1.00127198087622 & 1.00125401522577 \tabularnewline
16 & 103.35 & 103.153419312327 & 103.06625 & 1.00084576000705 & 1.00190571179301 \tabularnewline
17 & 102.97 & 102.998193402746 & 103.12 & 0.998818787846641 & 0.999726272842133 \tabularnewline
18 & 103.05 & 103.123196487752 & 103.19375 & 0.999316300529365 & 0.999290203462992 \tabularnewline
19 & 103.18 & 103.22227240958 & 103.267083333333 & 0.99956606769256 & 0.999590472011581 \tabularnewline
20 & 103.21 & 103.288546251825 & 103.34125 & 0.999490002799702 & 0.99923954538354 \tabularnewline
21 & 103.32 & 103.381058156318 & 103.402916666667 & 0.999788608377278 & 0.999409387392553 \tabularnewline
22 & 103.31 & 103.397979433923 & 103.449583333333 & 0.999501168610378 & 0.999149118441144 \tabularnewline
23 & 103.6 & 103.454535093158 & 103.5 & 0.999560725537755 & 1.00140607569027 \tabularnewline
24 & 103.68 & 103.596803096377 & 103.5525 & 1.00042783222402 & 1.00080308369695 \tabularnewline
25 & 103.77 & 103.655844595684 & 103.599166666667 & 1.00054708865757 & 1.00110129250079 \tabularnewline
26 & 103.82 & 103.733889021502 & 103.644166666667 & 1.00086567684146 & 1.00083011424049 \tabularnewline
27 & 103.86 & 103.825229270325 & 103.693333333333 & 1.00127198087622 & 1.00033489672904 \tabularnewline
28 & 103.9 & 103.836913562598 & 103.749166666667 & 1.00084576000705 & 1.00060755308721 \tabularnewline
29 & 103.63 & 103.674476957017 & 103.797083333333 & 0.998818787846641 & 0.999570994150902 \tabularnewline
30 & 103.65 & 103.769421028761 & 103.840416666667 & 0.999316300529365 & 0.998849169364373 \tabularnewline
31 & 103.7 & 103.84491877258 & 103.89 & 0.99956606769256 & 0.998604469296206 \tabularnewline
32 & 103.77 & 103.896569336861 & 103.949583333333 & 0.999490002799702 & 0.998781775590195 \tabularnewline
33 & 103.94 & 103.999260779165 & 104.02125 & 0.999788608377278 & 0.999430180765507 \tabularnewline
34 & 104.03 & 104.045572899419 & 104.0975 & 0.999501168610378 & 0.999850326169727 \tabularnewline
35 & 104.03 & 104.109247368385 & 104.155 & 0.999560725537755 & 0.999238805673963 \tabularnewline
36 & 104.29 & 104.237910598861 & 104.193333333333 & 1.00042783222402 & 1.00049971647398 \tabularnewline
37 & 104.35 & 104.294944048564 & 104.237916666667 & 1.00054708865757 & 1.00052788706047 \tabularnewline
38 & 104.67 & 104.375277109411 & 104.285 & 1.00086567684146 & 1.00282368486821 \tabularnewline
39 & 104.73 & 104.460619781523 & 104.327916666667 & 1.00127198087622 & 1.00257877292936 \tabularnewline
40 & 104.86 & 104.451182647803 & 104.362916666667 & 1.00084576000705 & 1.00391395618349 \tabularnewline
41 & 104.05 & 104.27085500826 & 104.394166666667 & 0.998818787846641 & 0.997881910450982 \tabularnewline
42 & 104.15 & 104.35152277382 & 104.422916666667 & 0.999316300529365 & 0.998068808499745 \tabularnewline
43 & 104.27 & 104.401343883596 & 104.446666666667 & 0.99956606769256 & 0.998741933018199 \tabularnewline
44 & 104.33 & 104.403394059114 & 104.456666666667 & 0.999490002799702 & 0.999297014625093 \tabularnewline
45 & 104.41 & 104.426253830659 & 104.448333333333 & 0.999788608377278 & 0.999844351108431 \tabularnewline
46 & 104.4 & 104.374158908599 & 104.42625 & 0.999501168610378 & 1.00024758131391 \tabularnewline
47 & 104.41 & 104.394538658799 & 104.440416666667 & 0.999560725537755 & 1.00014810488556 \tabularnewline
48 & 104.6 & 104.54470846741 & 104.5 & 1.00042783222402 & 1.00052887930342 \tabularnewline
49 & 104.61 & 104.614702222314 & 104.5575 & 1.00054708865757 & 0.999955051993513 \tabularnewline
50 & 104.65 & 104.699724399654 & 104.609166666667 & 1.00086567684146 & 0.999525076117067 \tabularnewline
51 & 104.55 & 104.789787945236 & 104.656666666667 & 1.00127198087622 & 0.997711724110355 \tabularnewline
52 & 104.51 & 104.791470206205 & 104.702916666667 & 1.00084576000705 & 0.997313996972738 \tabularnewline
53 & 104.74 & 104.634175342339 & 104.757916666667 & 0.998818787846641 & 1.00101137756679 \tabularnewline
54 & 104.89 & 104.746252712529 & 104.817916666667 & 0.999316300529365 & 1.00137233823405 \tabularnewline
55 & 104.91 & 104.831990264426 & 104.8775 & 0.99956606769256 & 1.00074414055649 \tabularnewline
56 & 104.93 & 104.884398622962 & 104.937916666667 & 0.999490002799702 & 1.00043477750397 \tabularnewline
57 & 104.95 & 104.982802822656 & 105.005 & 0.999788608377278 & 0.999687540989818 \tabularnewline
58 & 104.97 & 105.023001750556 & 105.075416666667 & 0.999501168610378 & 0.999495331978021 \tabularnewline
59 & 105.16 & 105.103393806659 & 105.149583333333 & 0.999560725537755 & 1.00053857626562 \tabularnewline
60 & 105.29 & 105.276271319723 & 105.23125 & 1.00042783222402 & 1.00013040621694 \tabularnewline
61 & 105.35 & 105.368447695769 & 105.310833333333 & 1.00054708865757 & 0.999824922012491 \tabularnewline
62 & 105.36 & 105.483735846513 & 105.3925 & 1.00086567684146 & 0.998826967536558 \tabularnewline
63 & 105.45 & 105.611665362872 & 105.4775 & 1.00127198087622 & 0.998469247101478 \tabularnewline
64 & 105.3 & 105.658452845811 & 105.569166666667 & 1.00084576000705 & 0.996607438059553 \tabularnewline
65 & 105.73 & 105.502315338776 & 105.627083333333 & 0.998818787846641 & 1.0021581010852 \tabularnewline
66 & 105.86 & 105.567773987922 & 105.64 & 0.999316300529365 & 1.00276813653484 \tabularnewline
67 & 105.85 & NA & NA & 0.99956606769256 & NA \tabularnewline
68 & 105.95 & NA & NA & 0.999490002799702 & NA \tabularnewline
69 & 105.97 & NA & NA & 0.999788608377278 & NA \tabularnewline
70 & 106.15 & NA & NA & 0.999501168610378 & NA \tabularnewline
71 & 105.37 & NA & NA & 0.999560725537755 & NA \tabularnewline
72 & 105.39 & NA & NA & 1.00042783222402 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=199767&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]101.81[/C][C]NA[/C][C]NA[/C][C]1.00054708865757[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]101.72[/C][C]NA[/C][C]NA[/C][C]1.00086567684146[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]101.78[/C][C]NA[/C][C]NA[/C][C]1.00127198087622[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]102.04[/C][C]NA[/C][C]NA[/C][C]1.00084576000705[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]102.36[/C][C]NA[/C][C]NA[/C][C]0.998818787846641[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]102.56[/C][C]NA[/C][C]NA[/C][C]0.999316300529365[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]102.69[/C][C]102.416788753364[/C][C]102.46125[/C][C]0.99956606769256[/C][C]1.00266764121353[/C][/ROW]
[ROW][C]8[/C][C]102.77[/C][C]102.503946599627[/C][C]102.55625[/C][C]0.999490002799702[/C][C]1.00259554299321[/C][/ROW]
[ROW][C]9[/C][C]102.85[/C][C]102.647046686335[/C][C]102.66875[/C][C]0.999788608377278[/C][C]1.0019771958397[/C][/ROW]
[ROW][C]10[/C][C]102.9[/C][C]102.734976992078[/C][C]102.78625[/C][C]0.999501168610378[/C][C]1.00160629819321[/C][/ROW]
[ROW][C]11[/C][C]102.72[/C][C]102.821063483348[/C][C]102.86625[/C][C]0.999560725537755[/C][C]0.999017093580593[/C][/ROW]
[ROW][C]12[/C][C]102.79[/C][C]102.956112438824[/C][C]102.912083333333[/C][C]1.00042783222402[/C][C]0.998386570404719[/C][/ROW]
[ROW][C]13[/C][C]102.9[/C][C]103.009241039639[/C][C]102.952916666667[/C][C]1.00054708865757[/C][C]0.99893950252874[/C][/ROW]
[ROW][C]14[/C][C]102.91[/C][C]103.080824167363[/C][C]102.991666666667[/C][C]1.00086567684146[/C][C]0.998342813333685[/C][/ROW]
[ROW][C]15[/C][C]103.29[/C][C]103.160634993019[/C][C]103.029583333333[/C][C]1.00127198087622[/C][C]1.00125401522577[/C][/ROW]
[ROW][C]16[/C][C]103.35[/C][C]103.153419312327[/C][C]103.06625[/C][C]1.00084576000705[/C][C]1.00190571179301[/C][/ROW]
[ROW][C]17[/C][C]102.97[/C][C]102.998193402746[/C][C]103.12[/C][C]0.998818787846641[/C][C]0.999726272842133[/C][/ROW]
[ROW][C]18[/C][C]103.05[/C][C]103.123196487752[/C][C]103.19375[/C][C]0.999316300529365[/C][C]0.999290203462992[/C][/ROW]
[ROW][C]19[/C][C]103.18[/C][C]103.22227240958[/C][C]103.267083333333[/C][C]0.99956606769256[/C][C]0.999590472011581[/C][/ROW]
[ROW][C]20[/C][C]103.21[/C][C]103.288546251825[/C][C]103.34125[/C][C]0.999490002799702[/C][C]0.99923954538354[/C][/ROW]
[ROW][C]21[/C][C]103.32[/C][C]103.381058156318[/C][C]103.402916666667[/C][C]0.999788608377278[/C][C]0.999409387392553[/C][/ROW]
[ROW][C]22[/C][C]103.31[/C][C]103.397979433923[/C][C]103.449583333333[/C][C]0.999501168610378[/C][C]0.999149118441144[/C][/ROW]
[ROW][C]23[/C][C]103.6[/C][C]103.454535093158[/C][C]103.5[/C][C]0.999560725537755[/C][C]1.00140607569027[/C][/ROW]
[ROW][C]24[/C][C]103.68[/C][C]103.596803096377[/C][C]103.5525[/C][C]1.00042783222402[/C][C]1.00080308369695[/C][/ROW]
[ROW][C]25[/C][C]103.77[/C][C]103.655844595684[/C][C]103.599166666667[/C][C]1.00054708865757[/C][C]1.00110129250079[/C][/ROW]
[ROW][C]26[/C][C]103.82[/C][C]103.733889021502[/C][C]103.644166666667[/C][C]1.00086567684146[/C][C]1.00083011424049[/C][/ROW]
[ROW][C]27[/C][C]103.86[/C][C]103.825229270325[/C][C]103.693333333333[/C][C]1.00127198087622[/C][C]1.00033489672904[/C][/ROW]
[ROW][C]28[/C][C]103.9[/C][C]103.836913562598[/C][C]103.749166666667[/C][C]1.00084576000705[/C][C]1.00060755308721[/C][/ROW]
[ROW][C]29[/C][C]103.63[/C][C]103.674476957017[/C][C]103.797083333333[/C][C]0.998818787846641[/C][C]0.999570994150902[/C][/ROW]
[ROW][C]30[/C][C]103.65[/C][C]103.769421028761[/C][C]103.840416666667[/C][C]0.999316300529365[/C][C]0.998849169364373[/C][/ROW]
[ROW][C]31[/C][C]103.7[/C][C]103.84491877258[/C][C]103.89[/C][C]0.99956606769256[/C][C]0.998604469296206[/C][/ROW]
[ROW][C]32[/C][C]103.77[/C][C]103.896569336861[/C][C]103.949583333333[/C][C]0.999490002799702[/C][C]0.998781775590195[/C][/ROW]
[ROW][C]33[/C][C]103.94[/C][C]103.999260779165[/C][C]104.02125[/C][C]0.999788608377278[/C][C]0.999430180765507[/C][/ROW]
[ROW][C]34[/C][C]104.03[/C][C]104.045572899419[/C][C]104.0975[/C][C]0.999501168610378[/C][C]0.999850326169727[/C][/ROW]
[ROW][C]35[/C][C]104.03[/C][C]104.109247368385[/C][C]104.155[/C][C]0.999560725537755[/C][C]0.999238805673963[/C][/ROW]
[ROW][C]36[/C][C]104.29[/C][C]104.237910598861[/C][C]104.193333333333[/C][C]1.00042783222402[/C][C]1.00049971647398[/C][/ROW]
[ROW][C]37[/C][C]104.35[/C][C]104.294944048564[/C][C]104.237916666667[/C][C]1.00054708865757[/C][C]1.00052788706047[/C][/ROW]
[ROW][C]38[/C][C]104.67[/C][C]104.375277109411[/C][C]104.285[/C][C]1.00086567684146[/C][C]1.00282368486821[/C][/ROW]
[ROW][C]39[/C][C]104.73[/C][C]104.460619781523[/C][C]104.327916666667[/C][C]1.00127198087622[/C][C]1.00257877292936[/C][/ROW]
[ROW][C]40[/C][C]104.86[/C][C]104.451182647803[/C][C]104.362916666667[/C][C]1.00084576000705[/C][C]1.00391395618349[/C][/ROW]
[ROW][C]41[/C][C]104.05[/C][C]104.27085500826[/C][C]104.394166666667[/C][C]0.998818787846641[/C][C]0.997881910450982[/C][/ROW]
[ROW][C]42[/C][C]104.15[/C][C]104.35152277382[/C][C]104.422916666667[/C][C]0.999316300529365[/C][C]0.998068808499745[/C][/ROW]
[ROW][C]43[/C][C]104.27[/C][C]104.401343883596[/C][C]104.446666666667[/C][C]0.99956606769256[/C][C]0.998741933018199[/C][/ROW]
[ROW][C]44[/C][C]104.33[/C][C]104.403394059114[/C][C]104.456666666667[/C][C]0.999490002799702[/C][C]0.999297014625093[/C][/ROW]
[ROW][C]45[/C][C]104.41[/C][C]104.426253830659[/C][C]104.448333333333[/C][C]0.999788608377278[/C][C]0.999844351108431[/C][/ROW]
[ROW][C]46[/C][C]104.4[/C][C]104.374158908599[/C][C]104.42625[/C][C]0.999501168610378[/C][C]1.00024758131391[/C][/ROW]
[ROW][C]47[/C][C]104.41[/C][C]104.394538658799[/C][C]104.440416666667[/C][C]0.999560725537755[/C][C]1.00014810488556[/C][/ROW]
[ROW][C]48[/C][C]104.6[/C][C]104.54470846741[/C][C]104.5[/C][C]1.00042783222402[/C][C]1.00052887930342[/C][/ROW]
[ROW][C]49[/C][C]104.61[/C][C]104.614702222314[/C][C]104.5575[/C][C]1.00054708865757[/C][C]0.999955051993513[/C][/ROW]
[ROW][C]50[/C][C]104.65[/C][C]104.699724399654[/C][C]104.609166666667[/C][C]1.00086567684146[/C][C]0.999525076117067[/C][/ROW]
[ROW][C]51[/C][C]104.55[/C][C]104.789787945236[/C][C]104.656666666667[/C][C]1.00127198087622[/C][C]0.997711724110355[/C][/ROW]
[ROW][C]52[/C][C]104.51[/C][C]104.791470206205[/C][C]104.702916666667[/C][C]1.00084576000705[/C][C]0.997313996972738[/C][/ROW]
[ROW][C]53[/C][C]104.74[/C][C]104.634175342339[/C][C]104.757916666667[/C][C]0.998818787846641[/C][C]1.00101137756679[/C][/ROW]
[ROW][C]54[/C][C]104.89[/C][C]104.746252712529[/C][C]104.817916666667[/C][C]0.999316300529365[/C][C]1.00137233823405[/C][/ROW]
[ROW][C]55[/C][C]104.91[/C][C]104.831990264426[/C][C]104.8775[/C][C]0.99956606769256[/C][C]1.00074414055649[/C][/ROW]
[ROW][C]56[/C][C]104.93[/C][C]104.884398622962[/C][C]104.937916666667[/C][C]0.999490002799702[/C][C]1.00043477750397[/C][/ROW]
[ROW][C]57[/C][C]104.95[/C][C]104.982802822656[/C][C]105.005[/C][C]0.999788608377278[/C][C]0.999687540989818[/C][/ROW]
[ROW][C]58[/C][C]104.97[/C][C]105.023001750556[/C][C]105.075416666667[/C][C]0.999501168610378[/C][C]0.999495331978021[/C][/ROW]
[ROW][C]59[/C][C]105.16[/C][C]105.103393806659[/C][C]105.149583333333[/C][C]0.999560725537755[/C][C]1.00053857626562[/C][/ROW]
[ROW][C]60[/C][C]105.29[/C][C]105.276271319723[/C][C]105.23125[/C][C]1.00042783222402[/C][C]1.00013040621694[/C][/ROW]
[ROW][C]61[/C][C]105.35[/C][C]105.368447695769[/C][C]105.310833333333[/C][C]1.00054708865757[/C][C]0.999824922012491[/C][/ROW]
[ROW][C]62[/C][C]105.36[/C][C]105.483735846513[/C][C]105.3925[/C][C]1.00086567684146[/C][C]0.998826967536558[/C][/ROW]
[ROW][C]63[/C][C]105.45[/C][C]105.611665362872[/C][C]105.4775[/C][C]1.00127198087622[/C][C]0.998469247101478[/C][/ROW]
[ROW][C]64[/C][C]105.3[/C][C]105.658452845811[/C][C]105.569166666667[/C][C]1.00084576000705[/C][C]0.996607438059553[/C][/ROW]
[ROW][C]65[/C][C]105.73[/C][C]105.502315338776[/C][C]105.627083333333[/C][C]0.998818787846641[/C][C]1.0021581010852[/C][/ROW]
[ROW][C]66[/C][C]105.86[/C][C]105.567773987922[/C][C]105.64[/C][C]0.999316300529365[/C][C]1.00276813653484[/C][/ROW]
[ROW][C]67[/C][C]105.85[/C][C]NA[/C][C]NA[/C][C]0.99956606769256[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]105.95[/C][C]NA[/C][C]NA[/C][C]0.999490002799702[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]105.97[/C][C]NA[/C][C]NA[/C][C]0.999788608377278[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]106.15[/C][C]NA[/C][C]NA[/C][C]0.999501168610378[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]105.37[/C][C]NA[/C][C]NA[/C][C]0.999560725537755[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]105.39[/C][C]NA[/C][C]NA[/C][C]1.00042783222402[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=199767&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=199767&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
t	Observations	Fit	Trend	Seasonal	Random
1	101.81	NA	NA	1.00054708865757	NA
2	101.72	NA	NA	1.00086567684146	NA
3	101.78	NA	NA	1.00127198087622	NA
4	102.04	NA	NA	1.00084576000705	NA
5	102.36	NA	NA	0.998818787846641	NA
6	102.56	NA	NA	0.999316300529365	NA
7	102.69	102.416788753364	102.46125	0.99956606769256	1.00266764121353
8	102.77	102.503946599627	102.55625	0.999490002799702	1.00259554299321
9	102.85	102.647046686335	102.66875	0.999788608377278	1.0019771958397
10	102.9	102.734976992078	102.78625	0.999501168610378	1.00160629819321
11	102.72	102.821063483348	102.86625	0.999560725537755	0.999017093580593
12	102.79	102.956112438824	102.912083333333	1.00042783222402	0.998386570404719
13	102.9	103.009241039639	102.952916666667	1.00054708865757	0.99893950252874
14	102.91	103.080824167363	102.991666666667	1.00086567684146	0.998342813333685
15	103.29	103.160634993019	103.029583333333	1.00127198087622	1.00125401522577
16	103.35	103.153419312327	103.06625	1.00084576000705	1.00190571179301
17	102.97	102.998193402746	103.12	0.998818787846641	0.999726272842133
18	103.05	103.123196487752	103.19375	0.999316300529365	0.999290203462992
19	103.18	103.22227240958	103.267083333333	0.99956606769256	0.999590472011581
20	103.21	103.288546251825	103.34125	0.999490002799702	0.99923954538354
21	103.32	103.381058156318	103.402916666667	0.999788608377278	0.999409387392553
22	103.31	103.397979433923	103.449583333333	0.999501168610378	0.999149118441144
23	103.6	103.454535093158	103.5	0.999560725537755	1.00140607569027
24	103.68	103.596803096377	103.5525	1.00042783222402	1.00080308369695
25	103.77	103.655844595684	103.599166666667	1.00054708865757	1.00110129250079
26	103.82	103.733889021502	103.644166666667	1.00086567684146	1.00083011424049
27	103.86	103.825229270325	103.693333333333	1.00127198087622	1.00033489672904
28	103.9	103.836913562598	103.749166666667	1.00084576000705	1.00060755308721
29	103.63	103.674476957017	103.797083333333	0.998818787846641	0.999570994150902
30	103.65	103.769421028761	103.840416666667	0.999316300529365	0.998849169364373
31	103.7	103.84491877258	103.89	0.99956606769256	0.998604469296206
32	103.77	103.896569336861	103.949583333333	0.999490002799702	0.998781775590195
33	103.94	103.999260779165	104.02125	0.999788608377278	0.999430180765507
34	104.03	104.045572899419	104.0975	0.999501168610378	0.999850326169727
35	104.03	104.109247368385	104.155	0.999560725537755	0.999238805673963
36	104.29	104.237910598861	104.193333333333	1.00042783222402	1.00049971647398
37	104.35	104.294944048564	104.237916666667	1.00054708865757	1.00052788706047
38	104.67	104.375277109411	104.285	1.00086567684146	1.00282368486821
39	104.73	104.460619781523	104.327916666667	1.00127198087622	1.00257877292936
40	104.86	104.451182647803	104.362916666667	1.00084576000705	1.00391395618349
41	104.05	104.27085500826	104.394166666667	0.998818787846641	0.997881910450982
42	104.15	104.35152277382	104.422916666667	0.999316300529365	0.998068808499745
43	104.27	104.401343883596	104.446666666667	0.99956606769256	0.998741933018199
44	104.33	104.403394059114	104.456666666667	0.999490002799702	0.999297014625093
45	104.41	104.426253830659	104.448333333333	0.999788608377278	0.999844351108431
46	104.4	104.374158908599	104.42625	0.999501168610378	1.00024758131391
47	104.41	104.394538658799	104.440416666667	0.999560725537755	1.00014810488556
48	104.6	104.54470846741	104.5	1.00042783222402	1.00052887930342
49	104.61	104.614702222314	104.5575	1.00054708865757	0.999955051993513
50	104.65	104.699724399654	104.609166666667	1.00086567684146	0.999525076117067
51	104.55	104.789787945236	104.656666666667	1.00127198087622	0.997711724110355
52	104.51	104.791470206205	104.702916666667	1.00084576000705	0.997313996972738
53	104.74	104.634175342339	104.757916666667	0.998818787846641	1.00101137756679
54	104.89	104.746252712529	104.817916666667	0.999316300529365	1.00137233823405
55	104.91	104.831990264426	104.8775	0.99956606769256	1.00074414055649
56	104.93	104.884398622962	104.937916666667	0.999490002799702	1.00043477750397
57	104.95	104.982802822656	105.005	0.999788608377278	0.999687540989818
58	104.97	105.023001750556	105.075416666667	0.999501168610378	0.999495331978021
59	105.16	105.103393806659	105.149583333333	0.999560725537755	1.00053857626562
60	105.29	105.276271319723	105.23125	1.00042783222402	1.00013040621694
61	105.35	105.368447695769	105.310833333333	1.00054708865757	0.999824922012491
62	105.36	105.483735846513	105.3925	1.00086567684146	0.998826967536558
63	105.45	105.611665362872	105.4775	1.00127198087622	0.998469247101478
64	105.3	105.658452845811	105.569166666667	1.00084576000705	0.996607438059553
65	105.73	105.502315338776	105.627083333333	0.998818787846641	1.0021581010852
66	105.86	105.567773987922	105.64	0.999316300529365	1.00276813653484
67	105.85	NA	NA	0.99956606769256	NA
68	105.95	NA	NA	0.999490002799702	NA
69	105.97	NA	NA	0.999788608377278	NA
70	106.15	NA	NA	0.999501168610378	NA
71	105.37	NA	NA	0.999560725537755	NA
72	105.39	NA	NA	1.00042783222402	NA

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Figure 3

PNG link

Postscript link

PDF link

Figure 4

PNG link

Postscript link

PDF link

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,m$trend[i]+m$seasonal[i]) else a<-table.element(a,m$trend[i]*m$seasonal[i])
a<-table.element(a,m$trend[i])
a<-table.element(a,m$seasonal[i])
a<-table.element(a,m$random[i])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code