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

Mon, 09 Dec 2013 04:04:55 -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/2013/Dec/09/t1386579976ue7caadg2fzqauk.htm/, Retrieved Thu, 25 Apr 2024 21:46:12 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=231577, Retrieved Thu, 25 Apr 2024 21:46:12 +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

108

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

-       [Classical Decomposition] [] [2013-12-09 09:04:55] [f14b00927930a3cd0f0d57b4fa1be6d9] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

3,96
3,97
3,96
3,95
3,94
3,94
3,95
3,93
3,94
3,92
3,95
3,94
3,95
3,92
3,92
3,92
3,92
3,9
3,92
3,94
3,96
3,95
3,96
3,97
3,99
4
4,05
4,08
4,09
4,12
4,14
4,15
4,15
4,15
4,15
4,2
4,22
4,22
4,22
4,23
4,3
4,29
4,32
4,31
4,35
4,34
4,35
4,38
4,39
4,38
4,34
4,33
4,33
4,33
4,33
4,32
4,35
4,35
4,35
4,36
4,38
4,41
4,43
4,42
4,43
4,43
4,42
4,46
4,44
4,41
4,41
4,46
4,5
4,58
4,61
4,65
4,55
4,63
4,69
4,72
4,71
4,74
4,77
4,78

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	8 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 & 8 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=231577&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]8 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=231577&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	3.96	NA	NA	0.00743056	NA
2	3.97	NA	NA	0.0101389	NA
3	3.96	NA	NA	0.00930556	NA
4	3.95	NA	NA	0.00826389	NA
5	3.94	NA	NA	-0.00479167	NA
6	3.94	NA	NA	-0.00298611	NA
7	3.95	3.94868	3.94542	0.00326389	0.00131944
8	3.93	3.94319	3.94292	0.000277778	-0.0131944
9	3.94	3.94403	3.93917	0.00486111	-0.00402778
10	3.92	3.92007	3.93625	-0.0161806	-6.94444e-05
11	3.95	3.91722	3.93417	-0.0169444	0.0327778
12	3.94	3.92903	3.93167	-0.00263889	0.0109722
13	3.95	3.93618	3.92875	0.00743056	0.0138194
14	3.92	3.93806	3.92792	0.0101389	-0.0180556
15	3.92	3.93847	3.92917	0.00930556	-0.0184722
16	3.92	3.93951	3.93125	0.00826389	-0.0195139
17	3.92	3.92812	3.93292	-0.00479167	-0.008125
18	3.9	3.9316	3.93458	-0.00298611	-0.0315972
19	3.92	3.94076	3.9375	0.00326389	-0.0207639
20	3.94	3.94278	3.9425	0.000277778	-0.00277778
21	3.96	3.95611	3.95125	0.00486111	0.00388889
22	3.95	3.94715	3.96333	-0.0161806	0.00284722
23	3.96	3.96014	3.97708	-0.0169444	-0.000138889
24	3.97	3.99069	3.99333	-0.00263889	-0.0206944
25	3.99	4.0191	4.01167	0.00743056	-0.0290972
26	4	4.03972	4.02958	0.0101389	-0.0397222
27	4.05	4.05556	4.04625	0.00930556	-0.00555556
28	4.08	4.07076	4.0625	0.00826389	0.00923611
29	4.09	4.07396	4.07875	-0.00479167	0.0160417
30	4.12	4.09326	4.09625	-0.00298611	0.0267361
31	4.14	4.11868	4.11542	0.00326389	0.0213194
32	4.15	4.13444	4.13417	0.000277778	0.0155556
33	4.15	4.15528	4.15042	0.00486111	-0.00527778
34	4.15	4.14757	4.16375	-0.0161806	0.00243056
35	4.15	4.16181	4.17875	-0.0169444	-0.0118056
36	4.2	4.19194	4.19458	-0.00263889	0.00805556
37	4.22	4.2166	4.20917	0.00743056	0.00340278
38	4.22	4.23347	4.22333	0.0101389	-0.0134722
39	4.22	4.24764	4.23833	0.00930556	-0.0276389
40	4.23	4.26285	4.25458	0.00826389	-0.0328472
41	4.3	4.26604	4.27083	-0.00479167	0.0339583
42	4.29	4.28368	4.28667	-0.00298611	0.00631944
43	4.32	4.30451	4.30125	0.00326389	0.0154861
44	4.31	4.31528	4.315	0.000277778	-0.00527778
45	4.35	4.33153	4.32667	0.00486111	0.0184722
46	4.34	4.31965	4.33583	-0.0161806	0.0203472
47	4.35	4.32431	4.34125	-0.0169444	0.0256944
48	4.38	4.34153	4.34417	-0.00263889	0.0384722
49	4.39	4.35368	4.34625	0.00743056	0.0363194
50	4.38	4.35722	4.34708	0.0101389	0.0227778
51	4.34	4.35681	4.3475	0.00930556	-0.0168056
52	4.33	4.35618	4.34792	0.00826389	-0.0261806
53	4.33	4.34354	4.34833	-0.00479167	-0.0135417
54	4.33	4.34451	4.3475	-0.00298611	-0.0145139
55	4.33	4.34951	4.34625	0.00326389	-0.0195139
56	4.32	4.34736	4.34708	0.000277778	-0.0273611
57	4.35	4.35694	4.35208	0.00486111	-0.00694444
58	4.35	4.3434	4.35958	-0.0161806	0.00659722
59	4.35	4.35056	4.3675	-0.0169444	-0.000555556
60	4.36	4.37319	4.37583	-0.00263889	-0.0131944
61	4.38	4.39118	4.38375	0.00743056	-0.0111806
62	4.41	4.40347	4.39333	0.0101389	0.00652778
63	4.43	4.41222	4.40292	0.00930556	0.0177778
64	4.42	4.41743	4.40917	0.00826389	0.00256944
65	4.43	4.40938	4.41417	-0.00479167	0.020625
66	4.43	4.41785	4.42083	-0.00298611	0.0121528
67	4.42	4.43326	4.43	0.00326389	-0.0132639
68	4.46	4.44236	4.44208	0.000277778	0.0176389
69	4.44	4.46153	4.45667	0.00486111	-0.0215278
70	4.41	4.45757	4.47375	-0.0161806	-0.0475694
71	4.41	4.47139	4.48833	-0.0169444	-0.0613889
72	4.46	4.49903	4.50167	-0.00263889	-0.0390278
73	4.5	4.52868	4.52125	0.00743056	-0.0286806
74	4.58	4.55347	4.54333	0.0101389	0.0265278
75	4.61	4.57472	4.56542	0.00930556	0.0352778
76	4.65	4.59868	4.59042	0.00826389	0.0513194
77	4.55	4.61438	4.61917	-0.00479167	-0.064375
78	4.63	4.64451	4.6475	-0.00298611	-0.0145139
79	4.69	NA	NA	0.00326389	NA
80	4.72	NA	NA	0.000277778	NA
81	4.71	NA	NA	0.00486111	NA
82	4.74	NA	NA	-0.0161806	NA
83	4.77	NA	NA	-0.0169444	NA
84	4.78	NA	NA	-0.00263889	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 3.96 & NA & NA & 0.00743056 & NA \tabularnewline
2 & 3.97 & NA & NA & 0.0101389 & NA \tabularnewline
3 & 3.96 & NA & NA & 0.00930556 & NA \tabularnewline
4 & 3.95 & NA & NA & 0.00826389 & NA \tabularnewline
5 & 3.94 & NA & NA & -0.00479167 & NA \tabularnewline
6 & 3.94 & NA & NA & -0.00298611 & NA \tabularnewline
7 & 3.95 & 3.94868 & 3.94542 & 0.00326389 & 0.00131944 \tabularnewline
8 & 3.93 & 3.94319 & 3.94292 & 0.000277778 & -0.0131944 \tabularnewline
9 & 3.94 & 3.94403 & 3.93917 & 0.00486111 & -0.00402778 \tabularnewline
10 & 3.92 & 3.92007 & 3.93625 & -0.0161806 & -6.94444e-05 \tabularnewline
11 & 3.95 & 3.91722 & 3.93417 & -0.0169444 & 0.0327778 \tabularnewline
12 & 3.94 & 3.92903 & 3.93167 & -0.00263889 & 0.0109722 \tabularnewline
13 & 3.95 & 3.93618 & 3.92875 & 0.00743056 & 0.0138194 \tabularnewline
14 & 3.92 & 3.93806 & 3.92792 & 0.0101389 & -0.0180556 \tabularnewline
15 & 3.92 & 3.93847 & 3.92917 & 0.00930556 & -0.0184722 \tabularnewline
16 & 3.92 & 3.93951 & 3.93125 & 0.00826389 & -0.0195139 \tabularnewline
17 & 3.92 & 3.92812 & 3.93292 & -0.00479167 & -0.008125 \tabularnewline
18 & 3.9 & 3.9316 & 3.93458 & -0.00298611 & -0.0315972 \tabularnewline
19 & 3.92 & 3.94076 & 3.9375 & 0.00326389 & -0.0207639 \tabularnewline
20 & 3.94 & 3.94278 & 3.9425 & 0.000277778 & -0.00277778 \tabularnewline
21 & 3.96 & 3.95611 & 3.95125 & 0.00486111 & 0.00388889 \tabularnewline
22 & 3.95 & 3.94715 & 3.96333 & -0.0161806 & 0.00284722 \tabularnewline
23 & 3.96 & 3.96014 & 3.97708 & -0.0169444 & -0.000138889 \tabularnewline
24 & 3.97 & 3.99069 & 3.99333 & -0.00263889 & -0.0206944 \tabularnewline
25 & 3.99 & 4.0191 & 4.01167 & 0.00743056 & -0.0290972 \tabularnewline
26 & 4 & 4.03972 & 4.02958 & 0.0101389 & -0.0397222 \tabularnewline
27 & 4.05 & 4.05556 & 4.04625 & 0.00930556 & -0.00555556 \tabularnewline
28 & 4.08 & 4.07076 & 4.0625 & 0.00826389 & 0.00923611 \tabularnewline
29 & 4.09 & 4.07396 & 4.07875 & -0.00479167 & 0.0160417 \tabularnewline
30 & 4.12 & 4.09326 & 4.09625 & -0.00298611 & 0.0267361 \tabularnewline
31 & 4.14 & 4.11868 & 4.11542 & 0.00326389 & 0.0213194 \tabularnewline
32 & 4.15 & 4.13444 & 4.13417 & 0.000277778 & 0.0155556 \tabularnewline
33 & 4.15 & 4.15528 & 4.15042 & 0.00486111 & -0.00527778 \tabularnewline
34 & 4.15 & 4.14757 & 4.16375 & -0.0161806 & 0.00243056 \tabularnewline
35 & 4.15 & 4.16181 & 4.17875 & -0.0169444 & -0.0118056 \tabularnewline
36 & 4.2 & 4.19194 & 4.19458 & -0.00263889 & 0.00805556 \tabularnewline
37 & 4.22 & 4.2166 & 4.20917 & 0.00743056 & 0.00340278 \tabularnewline
38 & 4.22 & 4.23347 & 4.22333 & 0.0101389 & -0.0134722 \tabularnewline
39 & 4.22 & 4.24764 & 4.23833 & 0.00930556 & -0.0276389 \tabularnewline
40 & 4.23 & 4.26285 & 4.25458 & 0.00826389 & -0.0328472 \tabularnewline
41 & 4.3 & 4.26604 & 4.27083 & -0.00479167 & 0.0339583 \tabularnewline
42 & 4.29 & 4.28368 & 4.28667 & -0.00298611 & 0.00631944 \tabularnewline
43 & 4.32 & 4.30451 & 4.30125 & 0.00326389 & 0.0154861 \tabularnewline
44 & 4.31 & 4.31528 & 4.315 & 0.000277778 & -0.00527778 \tabularnewline
45 & 4.35 & 4.33153 & 4.32667 & 0.00486111 & 0.0184722 \tabularnewline
46 & 4.34 & 4.31965 & 4.33583 & -0.0161806 & 0.0203472 \tabularnewline
47 & 4.35 & 4.32431 & 4.34125 & -0.0169444 & 0.0256944 \tabularnewline
48 & 4.38 & 4.34153 & 4.34417 & -0.00263889 & 0.0384722 \tabularnewline
49 & 4.39 & 4.35368 & 4.34625 & 0.00743056 & 0.0363194 \tabularnewline
50 & 4.38 & 4.35722 & 4.34708 & 0.0101389 & 0.0227778 \tabularnewline
51 & 4.34 & 4.35681 & 4.3475 & 0.00930556 & -0.0168056 \tabularnewline
52 & 4.33 & 4.35618 & 4.34792 & 0.00826389 & -0.0261806 \tabularnewline
53 & 4.33 & 4.34354 & 4.34833 & -0.00479167 & -0.0135417 \tabularnewline
54 & 4.33 & 4.34451 & 4.3475 & -0.00298611 & -0.0145139 \tabularnewline
55 & 4.33 & 4.34951 & 4.34625 & 0.00326389 & -0.0195139 \tabularnewline
56 & 4.32 & 4.34736 & 4.34708 & 0.000277778 & -0.0273611 \tabularnewline
57 & 4.35 & 4.35694 & 4.35208 & 0.00486111 & -0.00694444 \tabularnewline
58 & 4.35 & 4.3434 & 4.35958 & -0.0161806 & 0.00659722 \tabularnewline
59 & 4.35 & 4.35056 & 4.3675 & -0.0169444 & -0.000555556 \tabularnewline
60 & 4.36 & 4.37319 & 4.37583 & -0.00263889 & -0.0131944 \tabularnewline
61 & 4.38 & 4.39118 & 4.38375 & 0.00743056 & -0.0111806 \tabularnewline
62 & 4.41 & 4.40347 & 4.39333 & 0.0101389 & 0.00652778 \tabularnewline
63 & 4.43 & 4.41222 & 4.40292 & 0.00930556 & 0.0177778 \tabularnewline
64 & 4.42 & 4.41743 & 4.40917 & 0.00826389 & 0.00256944 \tabularnewline
65 & 4.43 & 4.40938 & 4.41417 & -0.00479167 & 0.020625 \tabularnewline
66 & 4.43 & 4.41785 & 4.42083 & -0.00298611 & 0.0121528 \tabularnewline
67 & 4.42 & 4.43326 & 4.43 & 0.00326389 & -0.0132639 \tabularnewline
68 & 4.46 & 4.44236 & 4.44208 & 0.000277778 & 0.0176389 \tabularnewline
69 & 4.44 & 4.46153 & 4.45667 & 0.00486111 & -0.0215278 \tabularnewline
70 & 4.41 & 4.45757 & 4.47375 & -0.0161806 & -0.0475694 \tabularnewline
71 & 4.41 & 4.47139 & 4.48833 & -0.0169444 & -0.0613889 \tabularnewline
72 & 4.46 & 4.49903 & 4.50167 & -0.00263889 & -0.0390278 \tabularnewline
73 & 4.5 & 4.52868 & 4.52125 & 0.00743056 & -0.0286806 \tabularnewline
74 & 4.58 & 4.55347 & 4.54333 & 0.0101389 & 0.0265278 \tabularnewline
75 & 4.61 & 4.57472 & 4.56542 & 0.00930556 & 0.0352778 \tabularnewline
76 & 4.65 & 4.59868 & 4.59042 & 0.00826389 & 0.0513194 \tabularnewline
77 & 4.55 & 4.61438 & 4.61917 & -0.00479167 & -0.064375 \tabularnewline
78 & 4.63 & 4.64451 & 4.6475 & -0.00298611 & -0.0145139 \tabularnewline
79 & 4.69 & NA & NA & 0.00326389 & NA \tabularnewline
80 & 4.72 & NA & NA & 0.000277778 & NA \tabularnewline
81 & 4.71 & NA & NA & 0.00486111 & NA \tabularnewline
82 & 4.74 & NA & NA & -0.0161806 & NA \tabularnewline
83 & 4.77 & NA & NA & -0.0169444 & NA \tabularnewline
84 & 4.78 & NA & NA & -0.00263889 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=231577&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]3.96[/C][C]NA[/C][C]NA[/C][C]0.00743056[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]3.97[/C][C]NA[/C][C]NA[/C][C]0.0101389[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]3.96[/C][C]NA[/C][C]NA[/C][C]0.00930556[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]3.95[/C][C]NA[/C][C]NA[/C][C]0.00826389[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]3.94[/C][C]NA[/C][C]NA[/C][C]-0.00479167[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]3.94[/C][C]NA[/C][C]NA[/C][C]-0.00298611[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]3.95[/C][C]3.94868[/C][C]3.94542[/C][C]0.00326389[/C][C]0.00131944[/C][/ROW]
[ROW][C]8[/C][C]3.93[/C][C]3.94319[/C][C]3.94292[/C][C]0.000277778[/C][C]-0.0131944[/C][/ROW]
[ROW][C]9[/C][C]3.94[/C][C]3.94403[/C][C]3.93917[/C][C]0.00486111[/C][C]-0.00402778[/C][/ROW]
[ROW][C]10[/C][C]3.92[/C][C]3.92007[/C][C]3.93625[/C][C]-0.0161806[/C][C]-6.94444e-05[/C][/ROW]
[ROW][C]11[/C][C]3.95[/C][C]3.91722[/C][C]3.93417[/C][C]-0.0169444[/C][C]0.0327778[/C][/ROW]
[ROW][C]12[/C][C]3.94[/C][C]3.92903[/C][C]3.93167[/C][C]-0.00263889[/C][C]0.0109722[/C][/ROW]
[ROW][C]13[/C][C]3.95[/C][C]3.93618[/C][C]3.92875[/C][C]0.00743056[/C][C]0.0138194[/C][/ROW]
[ROW][C]14[/C][C]3.92[/C][C]3.93806[/C][C]3.92792[/C][C]0.0101389[/C][C]-0.0180556[/C][/ROW]
[ROW][C]15[/C][C]3.92[/C][C]3.93847[/C][C]3.92917[/C][C]0.00930556[/C][C]-0.0184722[/C][/ROW]
[ROW][C]16[/C][C]3.92[/C][C]3.93951[/C][C]3.93125[/C][C]0.00826389[/C][C]-0.0195139[/C][/ROW]
[ROW][C]17[/C][C]3.92[/C][C]3.92812[/C][C]3.93292[/C][C]-0.00479167[/C][C]-0.008125[/C][/ROW]
[ROW][C]18[/C][C]3.9[/C][C]3.9316[/C][C]3.93458[/C][C]-0.00298611[/C][C]-0.0315972[/C][/ROW]
[ROW][C]19[/C][C]3.92[/C][C]3.94076[/C][C]3.9375[/C][C]0.00326389[/C][C]-0.0207639[/C][/ROW]
[ROW][C]20[/C][C]3.94[/C][C]3.94278[/C][C]3.9425[/C][C]0.000277778[/C][C]-0.00277778[/C][/ROW]
[ROW][C]21[/C][C]3.96[/C][C]3.95611[/C][C]3.95125[/C][C]0.00486111[/C][C]0.00388889[/C][/ROW]
[ROW][C]22[/C][C]3.95[/C][C]3.94715[/C][C]3.96333[/C][C]-0.0161806[/C][C]0.00284722[/C][/ROW]
[ROW][C]23[/C][C]3.96[/C][C]3.96014[/C][C]3.97708[/C][C]-0.0169444[/C][C]-0.000138889[/C][/ROW]
[ROW][C]24[/C][C]3.97[/C][C]3.99069[/C][C]3.99333[/C][C]-0.00263889[/C][C]-0.0206944[/C][/ROW]
[ROW][C]25[/C][C]3.99[/C][C]4.0191[/C][C]4.01167[/C][C]0.00743056[/C][C]-0.0290972[/C][/ROW]
[ROW][C]26[/C][C]4[/C][C]4.03972[/C][C]4.02958[/C][C]0.0101389[/C][C]-0.0397222[/C][/ROW]
[ROW][C]27[/C][C]4.05[/C][C]4.05556[/C][C]4.04625[/C][C]0.00930556[/C][C]-0.00555556[/C][/ROW]
[ROW][C]28[/C][C]4.08[/C][C]4.07076[/C][C]4.0625[/C][C]0.00826389[/C][C]0.00923611[/C][/ROW]
[ROW][C]29[/C][C]4.09[/C][C]4.07396[/C][C]4.07875[/C][C]-0.00479167[/C][C]0.0160417[/C][/ROW]
[ROW][C]30[/C][C]4.12[/C][C]4.09326[/C][C]4.09625[/C][C]-0.00298611[/C][C]0.0267361[/C][/ROW]
[ROW][C]31[/C][C]4.14[/C][C]4.11868[/C][C]4.11542[/C][C]0.00326389[/C][C]0.0213194[/C][/ROW]
[ROW][C]32[/C][C]4.15[/C][C]4.13444[/C][C]4.13417[/C][C]0.000277778[/C][C]0.0155556[/C][/ROW]
[ROW][C]33[/C][C]4.15[/C][C]4.15528[/C][C]4.15042[/C][C]0.00486111[/C][C]-0.00527778[/C][/ROW]
[ROW][C]34[/C][C]4.15[/C][C]4.14757[/C][C]4.16375[/C][C]-0.0161806[/C][C]0.00243056[/C][/ROW]
[ROW][C]35[/C][C]4.15[/C][C]4.16181[/C][C]4.17875[/C][C]-0.0169444[/C][C]-0.0118056[/C][/ROW]
[ROW][C]36[/C][C]4.2[/C][C]4.19194[/C][C]4.19458[/C][C]-0.00263889[/C][C]0.00805556[/C][/ROW]
[ROW][C]37[/C][C]4.22[/C][C]4.2166[/C][C]4.20917[/C][C]0.00743056[/C][C]0.00340278[/C][/ROW]
[ROW][C]38[/C][C]4.22[/C][C]4.23347[/C][C]4.22333[/C][C]0.0101389[/C][C]-0.0134722[/C][/ROW]
[ROW][C]39[/C][C]4.22[/C][C]4.24764[/C][C]4.23833[/C][C]0.00930556[/C][C]-0.0276389[/C][/ROW]
[ROW][C]40[/C][C]4.23[/C][C]4.26285[/C][C]4.25458[/C][C]0.00826389[/C][C]-0.0328472[/C][/ROW]
[ROW][C]41[/C][C]4.3[/C][C]4.26604[/C][C]4.27083[/C][C]-0.00479167[/C][C]0.0339583[/C][/ROW]
[ROW][C]42[/C][C]4.29[/C][C]4.28368[/C][C]4.28667[/C][C]-0.00298611[/C][C]0.00631944[/C][/ROW]
[ROW][C]43[/C][C]4.32[/C][C]4.30451[/C][C]4.30125[/C][C]0.00326389[/C][C]0.0154861[/C][/ROW]
[ROW][C]44[/C][C]4.31[/C][C]4.31528[/C][C]4.315[/C][C]0.000277778[/C][C]-0.00527778[/C][/ROW]
[ROW][C]45[/C][C]4.35[/C][C]4.33153[/C][C]4.32667[/C][C]0.00486111[/C][C]0.0184722[/C][/ROW]
[ROW][C]46[/C][C]4.34[/C][C]4.31965[/C][C]4.33583[/C][C]-0.0161806[/C][C]0.0203472[/C][/ROW]
[ROW][C]47[/C][C]4.35[/C][C]4.32431[/C][C]4.34125[/C][C]-0.0169444[/C][C]0.0256944[/C][/ROW]
[ROW][C]48[/C][C]4.38[/C][C]4.34153[/C][C]4.34417[/C][C]-0.00263889[/C][C]0.0384722[/C][/ROW]
[ROW][C]49[/C][C]4.39[/C][C]4.35368[/C][C]4.34625[/C][C]0.00743056[/C][C]0.0363194[/C][/ROW]
[ROW][C]50[/C][C]4.38[/C][C]4.35722[/C][C]4.34708[/C][C]0.0101389[/C][C]0.0227778[/C][/ROW]
[ROW][C]51[/C][C]4.34[/C][C]4.35681[/C][C]4.3475[/C][C]0.00930556[/C][C]-0.0168056[/C][/ROW]
[ROW][C]52[/C][C]4.33[/C][C]4.35618[/C][C]4.34792[/C][C]0.00826389[/C][C]-0.0261806[/C][/ROW]
[ROW][C]53[/C][C]4.33[/C][C]4.34354[/C][C]4.34833[/C][C]-0.00479167[/C][C]-0.0135417[/C][/ROW]
[ROW][C]54[/C][C]4.33[/C][C]4.34451[/C][C]4.3475[/C][C]-0.00298611[/C][C]-0.0145139[/C][/ROW]
[ROW][C]55[/C][C]4.33[/C][C]4.34951[/C][C]4.34625[/C][C]0.00326389[/C][C]-0.0195139[/C][/ROW]
[ROW][C]56[/C][C]4.32[/C][C]4.34736[/C][C]4.34708[/C][C]0.000277778[/C][C]-0.0273611[/C][/ROW]
[ROW][C]57[/C][C]4.35[/C][C]4.35694[/C][C]4.35208[/C][C]0.00486111[/C][C]-0.00694444[/C][/ROW]
[ROW][C]58[/C][C]4.35[/C][C]4.3434[/C][C]4.35958[/C][C]-0.0161806[/C][C]0.00659722[/C][/ROW]
[ROW][C]59[/C][C]4.35[/C][C]4.35056[/C][C]4.3675[/C][C]-0.0169444[/C][C]-0.000555556[/C][/ROW]
[ROW][C]60[/C][C]4.36[/C][C]4.37319[/C][C]4.37583[/C][C]-0.00263889[/C][C]-0.0131944[/C][/ROW]
[ROW][C]61[/C][C]4.38[/C][C]4.39118[/C][C]4.38375[/C][C]0.00743056[/C][C]-0.0111806[/C][/ROW]
[ROW][C]62[/C][C]4.41[/C][C]4.40347[/C][C]4.39333[/C][C]0.0101389[/C][C]0.00652778[/C][/ROW]
[ROW][C]63[/C][C]4.43[/C][C]4.41222[/C][C]4.40292[/C][C]0.00930556[/C][C]0.0177778[/C][/ROW]
[ROW][C]64[/C][C]4.42[/C][C]4.41743[/C][C]4.40917[/C][C]0.00826389[/C][C]0.00256944[/C][/ROW]
[ROW][C]65[/C][C]4.43[/C][C]4.40938[/C][C]4.41417[/C][C]-0.00479167[/C][C]0.020625[/C][/ROW]
[ROW][C]66[/C][C]4.43[/C][C]4.41785[/C][C]4.42083[/C][C]-0.00298611[/C][C]0.0121528[/C][/ROW]
[ROW][C]67[/C][C]4.42[/C][C]4.43326[/C][C]4.43[/C][C]0.00326389[/C][C]-0.0132639[/C][/ROW]
[ROW][C]68[/C][C]4.46[/C][C]4.44236[/C][C]4.44208[/C][C]0.000277778[/C][C]0.0176389[/C][/ROW]
[ROW][C]69[/C][C]4.44[/C][C]4.46153[/C][C]4.45667[/C][C]0.00486111[/C][C]-0.0215278[/C][/ROW]
[ROW][C]70[/C][C]4.41[/C][C]4.45757[/C][C]4.47375[/C][C]-0.0161806[/C][C]-0.0475694[/C][/ROW]
[ROW][C]71[/C][C]4.41[/C][C]4.47139[/C][C]4.48833[/C][C]-0.0169444[/C][C]-0.0613889[/C][/ROW]
[ROW][C]72[/C][C]4.46[/C][C]4.49903[/C][C]4.50167[/C][C]-0.00263889[/C][C]-0.0390278[/C][/ROW]
[ROW][C]73[/C][C]4.5[/C][C]4.52868[/C][C]4.52125[/C][C]0.00743056[/C][C]-0.0286806[/C][/ROW]
[ROW][C]74[/C][C]4.58[/C][C]4.55347[/C][C]4.54333[/C][C]0.0101389[/C][C]0.0265278[/C][/ROW]
[ROW][C]75[/C][C]4.61[/C][C]4.57472[/C][C]4.56542[/C][C]0.00930556[/C][C]0.0352778[/C][/ROW]
[ROW][C]76[/C][C]4.65[/C][C]4.59868[/C][C]4.59042[/C][C]0.00826389[/C][C]0.0513194[/C][/ROW]
[ROW][C]77[/C][C]4.55[/C][C]4.61438[/C][C]4.61917[/C][C]-0.00479167[/C][C]-0.064375[/C][/ROW]
[ROW][C]78[/C][C]4.63[/C][C]4.64451[/C][C]4.6475[/C][C]-0.00298611[/C][C]-0.0145139[/C][/ROW]
[ROW][C]79[/C][C]4.69[/C][C]NA[/C][C]NA[/C][C]0.00326389[/C][C]NA[/C][/ROW]
[ROW][C]80[/C][C]4.72[/C][C]NA[/C][C]NA[/C][C]0.000277778[/C][C]NA[/C][/ROW]
[ROW][C]81[/C][C]4.71[/C][C]NA[/C][C]NA[/C][C]0.00486111[/C][C]NA[/C][/ROW]
[ROW][C]82[/C][C]4.74[/C][C]NA[/C][C]NA[/C][C]-0.0161806[/C][C]NA[/C][/ROW]
[ROW][C]83[/C][C]4.77[/C][C]NA[/C][C]NA[/C][C]-0.0169444[/C][C]NA[/C][/ROW]
[ROW][C]84[/C][C]4.78[/C][C]NA[/C][C]NA[/C][C]-0.00263889[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=231577&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=231577&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	3.96	NA	NA	0.00743056	NA
2	3.97	NA	NA	0.0101389	NA
3	3.96	NA	NA	0.00930556	NA
4	3.95	NA	NA	0.00826389	NA
5	3.94	NA	NA	-0.00479167	NA
6	3.94	NA	NA	-0.00298611	NA
7	3.95	3.94868	3.94542	0.00326389	0.00131944
8	3.93	3.94319	3.94292	0.000277778	-0.0131944
9	3.94	3.94403	3.93917	0.00486111	-0.00402778
10	3.92	3.92007	3.93625	-0.0161806	-6.94444e-05
11	3.95	3.91722	3.93417	-0.0169444	0.0327778
12	3.94	3.92903	3.93167	-0.00263889	0.0109722
13	3.95	3.93618	3.92875	0.00743056	0.0138194
14	3.92	3.93806	3.92792	0.0101389	-0.0180556
15	3.92	3.93847	3.92917	0.00930556	-0.0184722
16	3.92	3.93951	3.93125	0.00826389	-0.0195139
17	3.92	3.92812	3.93292	-0.00479167	-0.008125
18	3.9	3.9316	3.93458	-0.00298611	-0.0315972
19	3.92	3.94076	3.9375	0.00326389	-0.0207639
20	3.94	3.94278	3.9425	0.000277778	-0.00277778
21	3.96	3.95611	3.95125	0.00486111	0.00388889
22	3.95	3.94715	3.96333	-0.0161806	0.00284722
23	3.96	3.96014	3.97708	-0.0169444	-0.000138889
24	3.97	3.99069	3.99333	-0.00263889	-0.0206944
25	3.99	4.0191	4.01167	0.00743056	-0.0290972
26	4	4.03972	4.02958	0.0101389	-0.0397222
27	4.05	4.05556	4.04625	0.00930556	-0.00555556
28	4.08	4.07076	4.0625	0.00826389	0.00923611
29	4.09	4.07396	4.07875	-0.00479167	0.0160417
30	4.12	4.09326	4.09625	-0.00298611	0.0267361
31	4.14	4.11868	4.11542	0.00326389	0.0213194
32	4.15	4.13444	4.13417	0.000277778	0.0155556
33	4.15	4.15528	4.15042	0.00486111	-0.00527778
34	4.15	4.14757	4.16375	-0.0161806	0.00243056
35	4.15	4.16181	4.17875	-0.0169444	-0.0118056
36	4.2	4.19194	4.19458	-0.00263889	0.00805556
37	4.22	4.2166	4.20917	0.00743056	0.00340278
38	4.22	4.23347	4.22333	0.0101389	-0.0134722
39	4.22	4.24764	4.23833	0.00930556	-0.0276389
40	4.23	4.26285	4.25458	0.00826389	-0.0328472
41	4.3	4.26604	4.27083	-0.00479167	0.0339583
42	4.29	4.28368	4.28667	-0.00298611	0.00631944
43	4.32	4.30451	4.30125	0.00326389	0.0154861
44	4.31	4.31528	4.315	0.000277778	-0.00527778
45	4.35	4.33153	4.32667	0.00486111	0.0184722
46	4.34	4.31965	4.33583	-0.0161806	0.0203472
47	4.35	4.32431	4.34125	-0.0169444	0.0256944
48	4.38	4.34153	4.34417	-0.00263889	0.0384722
49	4.39	4.35368	4.34625	0.00743056	0.0363194
50	4.38	4.35722	4.34708	0.0101389	0.0227778
51	4.34	4.35681	4.3475	0.00930556	-0.0168056
52	4.33	4.35618	4.34792	0.00826389	-0.0261806
53	4.33	4.34354	4.34833	-0.00479167	-0.0135417
54	4.33	4.34451	4.3475	-0.00298611	-0.0145139
55	4.33	4.34951	4.34625	0.00326389	-0.0195139
56	4.32	4.34736	4.34708	0.000277778	-0.0273611
57	4.35	4.35694	4.35208	0.00486111	-0.00694444
58	4.35	4.3434	4.35958	-0.0161806	0.00659722
59	4.35	4.35056	4.3675	-0.0169444	-0.000555556
60	4.36	4.37319	4.37583	-0.00263889	-0.0131944
61	4.38	4.39118	4.38375	0.00743056	-0.0111806
62	4.41	4.40347	4.39333	0.0101389	0.00652778
63	4.43	4.41222	4.40292	0.00930556	0.0177778
64	4.42	4.41743	4.40917	0.00826389	0.00256944
65	4.43	4.40938	4.41417	-0.00479167	0.020625
66	4.43	4.41785	4.42083	-0.00298611	0.0121528
67	4.42	4.43326	4.43	0.00326389	-0.0132639
68	4.46	4.44236	4.44208	0.000277778	0.0176389
69	4.44	4.46153	4.45667	0.00486111	-0.0215278
70	4.41	4.45757	4.47375	-0.0161806	-0.0475694
71	4.41	4.47139	4.48833	-0.0169444	-0.0613889
72	4.46	4.49903	4.50167	-0.00263889	-0.0390278
73	4.5	4.52868	4.52125	0.00743056	-0.0286806
74	4.58	4.55347	4.54333	0.0101389	0.0265278
75	4.61	4.57472	4.56542	0.00930556	0.0352778
76	4.65	4.59868	4.59042	0.00826389	0.0513194
77	4.55	4.61438	4.61917	-0.00479167	-0.064375
78	4.63	4.64451	4.6475	-0.00298611	-0.0145139
79	4.69	NA	NA	0.00326389	NA
80	4.72	NA	NA	0.000277778	NA
81	4.71	NA	NA	0.00486111	NA
82	4.74	NA	NA	-0.0161806	NA
83	4.77	NA	NA	-0.0169444	NA
84	4.78	NA	NA	-0.00263889	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 = 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')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code