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

Wed, 07 Dec 2011 15:47:20 -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/2011/Dec/07/t132329086900a2elc5s1s4vml.htm/, Retrieved Thu, 02 May 2024 17:33:22 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=152714, Retrieved Thu, 02 May 2024 17:33:22 +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

KDGP2W92

Estimated Impact

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

-       [Classical Decomposition] [Opdracht 9 deel 2] [2011-12-07 20:47:20] [08867764ea6bb9e6f4e56ad4eb4305bb] [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	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.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 & 1 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=152714&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]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Herman Ole Andreas Wold' @ wold.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=152714&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=152714&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	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.wessa.net

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	121	NA	NA	1.02785110063089	NA
2	117.7	NA	NA	1.03169569006817	NA
3	115.4	NA	NA	1.0114394822697	NA
4	114.3	NA	NA	0.981973023310532	NA
5	109.5	NA	NA	0.956096047668629	NA
6	108.1	NA	NA	0.955286560861723	NA
7	108.2	108.66061540326	106.216666666667	1.02300908899978	0.995760971888936
8	99.1	104.043147638634	104.475	0.995866452631099	0.95248944547696
9	101.2	103.706510730245	102.858333333333	1.00824607369597	0.975830729309131
10	98.1	100.916500702586	101.2625	0.99658314482248	0.972090781160883
11	95.5	100.020112147772	99.8625	1.00157829162871	0.954807967610612
12	97.9	99.7745355369659	98.75	1.01037504341231	0.981212285009622
13	98.2	100.793648555616	98.0625	1.02785110063089	0.974267738168191
14	98.7	101.183554803435	98.075	1.03169569006817	0.975454956012762
15	95.6	99.5551453735717	98.4291666666667	1.0114394822697	0.960271813589038
16	95.8	96.9616529433875	98.7416666666667	0.981973023310532	0.988019460187362
17	94.4	94.9044839317073	99.2625	0.956096047668629	0.994684298245905
18	96.5	95.3614809380215	99.825	0.955286560861723	1.01193898260366
19	103.3	102.51403579352	100.208333333333	1.02300908899978	1.00766689361507
20	104.3	100.275452892846	100.691666666667	0.995866452631099	1.0401349182781
21	104.5	102.114322138867	101.279166666667	1.00824607369597	1.0233628134738
22	102.3	101.128274620861	101.475	0.99658314482248	1.01158652595955
23	103.8	101.902244687458	101.741666666667	1.00157829162871	1.01862329253259
24	103.1	103.399256005208	102.3375	1.01037504341231	0.997105820517776
25	102.2	105.594569738147	102.733333333333	1.02785110063089	0.967852800133905
26	106.3	106.290448469273	103.025	1.03169569006817	1.00008986254988
27	102.1	104.557556479631	103.375	1.0114394822697	0.976495658827782
28	94	101.855151842885	103.725	0.981973023310532	0.922879189704593
29	102.6	99.5256148287723	104.095833333333	0.956096047668629	1.03089039114721
30	102.6	99.8672492167527	104.541666666667	0.955286560861723	1.02736383353582
31	106.7	107.582193321939	105.1625	1.02300908899978	0.991799820261153
32	107.9	105.26723348666	105.704166666667	0.995866452631099	1.02501031352433
33	109.3	107.016918672213	106.141666666667	1.00824607369597	1.02133383539831
34	105.9	106.671768363936	107.0375	0.99658314482248	0.992765017625815
35	109.1	108.057777938093	107.8875	1.00157829162871	1.00964504436233
36	108.5	109.406777617497	108.283333333333	1.01037504341231	0.991711869801459
37	111.7	111.898723155349	108.866666666667	1.02785110063089	0.998224080224102
38	109.8	112.846014833248	109.379166666667	1.03169569006817	0.973007333597479
39	109.1	110.959125536163	109.704166666667	1.0114394822697	0.983244951443343
40	108.5	108.377089339372	110.366666666667	0.981973023310532	1.0011341018787
41	108.5	106.321864234284	111.204166666667	0.956096047668629	1.0204862450579
42	106.2	107.131407439972	112.145833333333	0.955286560861723	0.991305934811937
43	117.1	115.553139140396	112.954166666667	1.02300908899978	1.01338657583092
44	109.8	113.097233470472	113.566666666667	0.995866452631099	0.970846028949659
45	115.2	115.061882135246	114.120833333333	1.00824607369597	1.00120037898035
46	115.9	114.046483635623	114.4375	0.99658314482248	1.01625228858699
47	119.2	114.455359275871	114.275	1.00157829162871	1.04145407217405
48	121	115.014359108435	113.833333333333	1.01037504341231	1.05204255310349
49	118.6	116.39128900769	113.2375	1.02785110063089	1.01897660049253
50	117.6	116.237714414347	112.666666666667	1.03169569006817	1.01171982426286
51	114.6	113.264364689502	111.983333333333	1.0114394822697	1.01179219354789
52	110.6	108.970364707623	110.970833333333	0.981973023310532	1.01495484847417
53	102.5	104.875768962185	109.691666666667	0.956096047668629	0.97734682676757
54	101.6	103.22667362245	108.058333333333	0.955286560861723	0.984241731663279
55	107.4	109.219007864339	106.7625	1.02300908899978	0.983345317816855
56	105.8	105.433211228765	105.870833333333	0.995866452631099	1.00347887318389
57	102.8	105.954059269525	105.0875	1.00824607369597	0.970231822251358
58	104	104.076499757628	104.433333333333	0.99658314482248	0.999264966079702
59	100.4	103.780203984262	103.616666666667	1.00157829162871	0.967429202733361
60	100.6	103.723417998302	102.658333333333	1.01037504341231	0.969887050980585
61	107.9	104.489629804968	101.658333333333	1.02785110063089	1.03263836039421
62	106.9	103.61663713918	100.433333333333	1.03169569006817	1.03168760298995
63	106.5	100.457012245262	99.3208333333333	1.0114394822697	1.06015496200488
64	103	96.7161596875598	98.4916666666666	0.981973023310532	1.06497197916811
65	90.5	93.4384699919487	97.7291666666666	0.956096047668629	0.968551818194348
66	90.6	92.722501813641	97.0625	0.955286560861723	0.977109096798241
67	94.4	NA	NA	1.02300908899978	NA
68	89.4	NA	NA	0.995866452631099	NA
69	92.5	NA	NA	1.00824607369597	NA
70	94.4	NA	NA	0.99658314482248	NA
71	91.7	NA	NA	1.00157829162871	NA
72	93.3	NA	NA	1.01037504341231	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 121 & NA & NA & 1.02785110063089 & NA \tabularnewline
2 & 117.7 & NA & NA & 1.03169569006817 & NA \tabularnewline
3 & 115.4 & NA & NA & 1.0114394822697 & NA \tabularnewline
4 & 114.3 & NA & NA & 0.981973023310532 & NA \tabularnewline
5 & 109.5 & NA & NA & 0.956096047668629 & NA \tabularnewline
6 & 108.1 & NA & NA & 0.955286560861723 & NA \tabularnewline
7 & 108.2 & 108.66061540326 & 106.216666666667 & 1.02300908899978 & 0.995760971888936 \tabularnewline
8 & 99.1 & 104.043147638634 & 104.475 & 0.995866452631099 & 0.95248944547696 \tabularnewline
9 & 101.2 & 103.706510730245 & 102.858333333333 & 1.00824607369597 & 0.975830729309131 \tabularnewline
10 & 98.1 & 100.916500702586 & 101.2625 & 0.99658314482248 & 0.972090781160883 \tabularnewline
11 & 95.5 & 100.020112147772 & 99.8625 & 1.00157829162871 & 0.954807967610612 \tabularnewline
12 & 97.9 & 99.7745355369659 & 98.75 & 1.01037504341231 & 0.981212285009622 \tabularnewline
13 & 98.2 & 100.793648555616 & 98.0625 & 1.02785110063089 & 0.974267738168191 \tabularnewline
14 & 98.7 & 101.183554803435 & 98.075 & 1.03169569006817 & 0.975454956012762 \tabularnewline
15 & 95.6 & 99.5551453735717 & 98.4291666666667 & 1.0114394822697 & 0.960271813589038 \tabularnewline
16 & 95.8 & 96.9616529433875 & 98.7416666666667 & 0.981973023310532 & 0.988019460187362 \tabularnewline
17 & 94.4 & 94.9044839317073 & 99.2625 & 0.956096047668629 & 0.994684298245905 \tabularnewline
18 & 96.5 & 95.3614809380215 & 99.825 & 0.955286560861723 & 1.01193898260366 \tabularnewline
19 & 103.3 & 102.51403579352 & 100.208333333333 & 1.02300908899978 & 1.00766689361507 \tabularnewline
20 & 104.3 & 100.275452892846 & 100.691666666667 & 0.995866452631099 & 1.0401349182781 \tabularnewline
21 & 104.5 & 102.114322138867 & 101.279166666667 & 1.00824607369597 & 1.0233628134738 \tabularnewline
22 & 102.3 & 101.128274620861 & 101.475 & 0.99658314482248 & 1.01158652595955 \tabularnewline
23 & 103.8 & 101.902244687458 & 101.741666666667 & 1.00157829162871 & 1.01862329253259 \tabularnewline
24 & 103.1 & 103.399256005208 & 102.3375 & 1.01037504341231 & 0.997105820517776 \tabularnewline
25 & 102.2 & 105.594569738147 & 102.733333333333 & 1.02785110063089 & 0.967852800133905 \tabularnewline
26 & 106.3 & 106.290448469273 & 103.025 & 1.03169569006817 & 1.00008986254988 \tabularnewline
27 & 102.1 & 104.557556479631 & 103.375 & 1.0114394822697 & 0.976495658827782 \tabularnewline
28 & 94 & 101.855151842885 & 103.725 & 0.981973023310532 & 0.922879189704593 \tabularnewline
29 & 102.6 & 99.5256148287723 & 104.095833333333 & 0.956096047668629 & 1.03089039114721 \tabularnewline
30 & 102.6 & 99.8672492167527 & 104.541666666667 & 0.955286560861723 & 1.02736383353582 \tabularnewline
31 & 106.7 & 107.582193321939 & 105.1625 & 1.02300908899978 & 0.991799820261153 \tabularnewline
32 & 107.9 & 105.26723348666 & 105.704166666667 & 0.995866452631099 & 1.02501031352433 \tabularnewline
33 & 109.3 & 107.016918672213 & 106.141666666667 & 1.00824607369597 & 1.02133383539831 \tabularnewline
34 & 105.9 & 106.671768363936 & 107.0375 & 0.99658314482248 & 0.992765017625815 \tabularnewline
35 & 109.1 & 108.057777938093 & 107.8875 & 1.00157829162871 & 1.00964504436233 \tabularnewline
36 & 108.5 & 109.406777617497 & 108.283333333333 & 1.01037504341231 & 0.991711869801459 \tabularnewline
37 & 111.7 & 111.898723155349 & 108.866666666667 & 1.02785110063089 & 0.998224080224102 \tabularnewline
38 & 109.8 & 112.846014833248 & 109.379166666667 & 1.03169569006817 & 0.973007333597479 \tabularnewline
39 & 109.1 & 110.959125536163 & 109.704166666667 & 1.0114394822697 & 0.983244951443343 \tabularnewline
40 & 108.5 & 108.377089339372 & 110.366666666667 & 0.981973023310532 & 1.0011341018787 \tabularnewline
41 & 108.5 & 106.321864234284 & 111.204166666667 & 0.956096047668629 & 1.0204862450579 \tabularnewline
42 & 106.2 & 107.131407439972 & 112.145833333333 & 0.955286560861723 & 0.991305934811937 \tabularnewline
43 & 117.1 & 115.553139140396 & 112.954166666667 & 1.02300908899978 & 1.01338657583092 \tabularnewline
44 & 109.8 & 113.097233470472 & 113.566666666667 & 0.995866452631099 & 0.970846028949659 \tabularnewline
45 & 115.2 & 115.061882135246 & 114.120833333333 & 1.00824607369597 & 1.00120037898035 \tabularnewline
46 & 115.9 & 114.046483635623 & 114.4375 & 0.99658314482248 & 1.01625228858699 \tabularnewline
47 & 119.2 & 114.455359275871 & 114.275 & 1.00157829162871 & 1.04145407217405 \tabularnewline
48 & 121 & 115.014359108435 & 113.833333333333 & 1.01037504341231 & 1.05204255310349 \tabularnewline
49 & 118.6 & 116.39128900769 & 113.2375 & 1.02785110063089 & 1.01897660049253 \tabularnewline
50 & 117.6 & 116.237714414347 & 112.666666666667 & 1.03169569006817 & 1.01171982426286 \tabularnewline
51 & 114.6 & 113.264364689502 & 111.983333333333 & 1.0114394822697 & 1.01179219354789 \tabularnewline
52 & 110.6 & 108.970364707623 & 110.970833333333 & 0.981973023310532 & 1.01495484847417 \tabularnewline
53 & 102.5 & 104.875768962185 & 109.691666666667 & 0.956096047668629 & 0.97734682676757 \tabularnewline
54 & 101.6 & 103.22667362245 & 108.058333333333 & 0.955286560861723 & 0.984241731663279 \tabularnewline
55 & 107.4 & 109.219007864339 & 106.7625 & 1.02300908899978 & 0.983345317816855 \tabularnewline
56 & 105.8 & 105.433211228765 & 105.870833333333 & 0.995866452631099 & 1.00347887318389 \tabularnewline
57 & 102.8 & 105.954059269525 & 105.0875 & 1.00824607369597 & 0.970231822251358 \tabularnewline
58 & 104 & 104.076499757628 & 104.433333333333 & 0.99658314482248 & 0.999264966079702 \tabularnewline
59 & 100.4 & 103.780203984262 & 103.616666666667 & 1.00157829162871 & 0.967429202733361 \tabularnewline
60 & 100.6 & 103.723417998302 & 102.658333333333 & 1.01037504341231 & 0.969887050980585 \tabularnewline
61 & 107.9 & 104.489629804968 & 101.658333333333 & 1.02785110063089 & 1.03263836039421 \tabularnewline
62 & 106.9 & 103.61663713918 & 100.433333333333 & 1.03169569006817 & 1.03168760298995 \tabularnewline
63 & 106.5 & 100.457012245262 & 99.3208333333333 & 1.0114394822697 & 1.06015496200488 \tabularnewline
64 & 103 & 96.7161596875598 & 98.4916666666666 & 0.981973023310532 & 1.06497197916811 \tabularnewline
65 & 90.5 & 93.4384699919487 & 97.7291666666666 & 0.956096047668629 & 0.968551818194348 \tabularnewline
66 & 90.6 & 92.722501813641 & 97.0625 & 0.955286560861723 & 0.977109096798241 \tabularnewline
67 & 94.4 & NA & NA & 1.02300908899978 & NA \tabularnewline
68 & 89.4 & NA & NA & 0.995866452631099 & NA \tabularnewline
69 & 92.5 & NA & NA & 1.00824607369597 & NA \tabularnewline
70 & 94.4 & NA & NA & 0.99658314482248 & NA \tabularnewline
71 & 91.7 & NA & NA & 1.00157829162871 & NA \tabularnewline
72 & 93.3 & NA & NA & 1.01037504341231 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=152714&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]121[/C][C]NA[/C][C]NA[/C][C]1.02785110063089[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]117.7[/C][C]NA[/C][C]NA[/C][C]1.03169569006817[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]115.4[/C][C]NA[/C][C]NA[/C][C]1.0114394822697[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]114.3[/C][C]NA[/C][C]NA[/C][C]0.981973023310532[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]109.5[/C][C]NA[/C][C]NA[/C][C]0.956096047668629[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]108.1[/C][C]NA[/C][C]NA[/C][C]0.955286560861723[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]108.2[/C][C]108.66061540326[/C][C]106.216666666667[/C][C]1.02300908899978[/C][C]0.995760971888936[/C][/ROW]
[ROW][C]8[/C][C]99.1[/C][C]104.043147638634[/C][C]104.475[/C][C]0.995866452631099[/C][C]0.95248944547696[/C][/ROW]
[ROW][C]9[/C][C]101.2[/C][C]103.706510730245[/C][C]102.858333333333[/C][C]1.00824607369597[/C][C]0.975830729309131[/C][/ROW]
[ROW][C]10[/C][C]98.1[/C][C]100.916500702586[/C][C]101.2625[/C][C]0.99658314482248[/C][C]0.972090781160883[/C][/ROW]
[ROW][C]11[/C][C]95.5[/C][C]100.020112147772[/C][C]99.8625[/C][C]1.00157829162871[/C][C]0.954807967610612[/C][/ROW]
[ROW][C]12[/C][C]97.9[/C][C]99.7745355369659[/C][C]98.75[/C][C]1.01037504341231[/C][C]0.981212285009622[/C][/ROW]
[ROW][C]13[/C][C]98.2[/C][C]100.793648555616[/C][C]98.0625[/C][C]1.02785110063089[/C][C]0.974267738168191[/C][/ROW]
[ROW][C]14[/C][C]98.7[/C][C]101.183554803435[/C][C]98.075[/C][C]1.03169569006817[/C][C]0.975454956012762[/C][/ROW]
[ROW][C]15[/C][C]95.6[/C][C]99.5551453735717[/C][C]98.4291666666667[/C][C]1.0114394822697[/C][C]0.960271813589038[/C][/ROW]
[ROW][C]16[/C][C]95.8[/C][C]96.9616529433875[/C][C]98.7416666666667[/C][C]0.981973023310532[/C][C]0.988019460187362[/C][/ROW]
[ROW][C]17[/C][C]94.4[/C][C]94.9044839317073[/C][C]99.2625[/C][C]0.956096047668629[/C][C]0.994684298245905[/C][/ROW]
[ROW][C]18[/C][C]96.5[/C][C]95.3614809380215[/C][C]99.825[/C][C]0.955286560861723[/C][C]1.01193898260366[/C][/ROW]
[ROW][C]19[/C][C]103.3[/C][C]102.51403579352[/C][C]100.208333333333[/C][C]1.02300908899978[/C][C]1.00766689361507[/C][/ROW]
[ROW][C]20[/C][C]104.3[/C][C]100.275452892846[/C][C]100.691666666667[/C][C]0.995866452631099[/C][C]1.0401349182781[/C][/ROW]
[ROW][C]21[/C][C]104.5[/C][C]102.114322138867[/C][C]101.279166666667[/C][C]1.00824607369597[/C][C]1.0233628134738[/C][/ROW]
[ROW][C]22[/C][C]102.3[/C][C]101.128274620861[/C][C]101.475[/C][C]0.99658314482248[/C][C]1.01158652595955[/C][/ROW]
[ROW][C]23[/C][C]103.8[/C][C]101.902244687458[/C][C]101.741666666667[/C][C]1.00157829162871[/C][C]1.01862329253259[/C][/ROW]
[ROW][C]24[/C][C]103.1[/C][C]103.399256005208[/C][C]102.3375[/C][C]1.01037504341231[/C][C]0.997105820517776[/C][/ROW]
[ROW][C]25[/C][C]102.2[/C][C]105.594569738147[/C][C]102.733333333333[/C][C]1.02785110063089[/C][C]0.967852800133905[/C][/ROW]
[ROW][C]26[/C][C]106.3[/C][C]106.290448469273[/C][C]103.025[/C][C]1.03169569006817[/C][C]1.00008986254988[/C][/ROW]
[ROW][C]27[/C][C]102.1[/C][C]104.557556479631[/C][C]103.375[/C][C]1.0114394822697[/C][C]0.976495658827782[/C][/ROW]
[ROW][C]28[/C][C]94[/C][C]101.855151842885[/C][C]103.725[/C][C]0.981973023310532[/C][C]0.922879189704593[/C][/ROW]
[ROW][C]29[/C][C]102.6[/C][C]99.5256148287723[/C][C]104.095833333333[/C][C]0.956096047668629[/C][C]1.03089039114721[/C][/ROW]
[ROW][C]30[/C][C]102.6[/C][C]99.8672492167527[/C][C]104.541666666667[/C][C]0.955286560861723[/C][C]1.02736383353582[/C][/ROW]
[ROW][C]31[/C][C]106.7[/C][C]107.582193321939[/C][C]105.1625[/C][C]1.02300908899978[/C][C]0.991799820261153[/C][/ROW]
[ROW][C]32[/C][C]107.9[/C][C]105.26723348666[/C][C]105.704166666667[/C][C]0.995866452631099[/C][C]1.02501031352433[/C][/ROW]
[ROW][C]33[/C][C]109.3[/C][C]107.016918672213[/C][C]106.141666666667[/C][C]1.00824607369597[/C][C]1.02133383539831[/C][/ROW]
[ROW][C]34[/C][C]105.9[/C][C]106.671768363936[/C][C]107.0375[/C][C]0.99658314482248[/C][C]0.992765017625815[/C][/ROW]
[ROW][C]35[/C][C]109.1[/C][C]108.057777938093[/C][C]107.8875[/C][C]1.00157829162871[/C][C]1.00964504436233[/C][/ROW]
[ROW][C]36[/C][C]108.5[/C][C]109.406777617497[/C][C]108.283333333333[/C][C]1.01037504341231[/C][C]0.991711869801459[/C][/ROW]
[ROW][C]37[/C][C]111.7[/C][C]111.898723155349[/C][C]108.866666666667[/C][C]1.02785110063089[/C][C]0.998224080224102[/C][/ROW]
[ROW][C]38[/C][C]109.8[/C][C]112.846014833248[/C][C]109.379166666667[/C][C]1.03169569006817[/C][C]0.973007333597479[/C][/ROW]
[ROW][C]39[/C][C]109.1[/C][C]110.959125536163[/C][C]109.704166666667[/C][C]1.0114394822697[/C][C]0.983244951443343[/C][/ROW]
[ROW][C]40[/C][C]108.5[/C][C]108.377089339372[/C][C]110.366666666667[/C][C]0.981973023310532[/C][C]1.0011341018787[/C][/ROW]
[ROW][C]41[/C][C]108.5[/C][C]106.321864234284[/C][C]111.204166666667[/C][C]0.956096047668629[/C][C]1.0204862450579[/C][/ROW]
[ROW][C]42[/C][C]106.2[/C][C]107.131407439972[/C][C]112.145833333333[/C][C]0.955286560861723[/C][C]0.991305934811937[/C][/ROW]
[ROW][C]43[/C][C]117.1[/C][C]115.553139140396[/C][C]112.954166666667[/C][C]1.02300908899978[/C][C]1.01338657583092[/C][/ROW]
[ROW][C]44[/C][C]109.8[/C][C]113.097233470472[/C][C]113.566666666667[/C][C]0.995866452631099[/C][C]0.970846028949659[/C][/ROW]
[ROW][C]45[/C][C]115.2[/C][C]115.061882135246[/C][C]114.120833333333[/C][C]1.00824607369597[/C][C]1.00120037898035[/C][/ROW]
[ROW][C]46[/C][C]115.9[/C][C]114.046483635623[/C][C]114.4375[/C][C]0.99658314482248[/C][C]1.01625228858699[/C][/ROW]
[ROW][C]47[/C][C]119.2[/C][C]114.455359275871[/C][C]114.275[/C][C]1.00157829162871[/C][C]1.04145407217405[/C][/ROW]
[ROW][C]48[/C][C]121[/C][C]115.014359108435[/C][C]113.833333333333[/C][C]1.01037504341231[/C][C]1.05204255310349[/C][/ROW]
[ROW][C]49[/C][C]118.6[/C][C]116.39128900769[/C][C]113.2375[/C][C]1.02785110063089[/C][C]1.01897660049253[/C][/ROW]
[ROW][C]50[/C][C]117.6[/C][C]116.237714414347[/C][C]112.666666666667[/C][C]1.03169569006817[/C][C]1.01171982426286[/C][/ROW]
[ROW][C]51[/C][C]114.6[/C][C]113.264364689502[/C][C]111.983333333333[/C][C]1.0114394822697[/C][C]1.01179219354789[/C][/ROW]
[ROW][C]52[/C][C]110.6[/C][C]108.970364707623[/C][C]110.970833333333[/C][C]0.981973023310532[/C][C]1.01495484847417[/C][/ROW]
[ROW][C]53[/C][C]102.5[/C][C]104.875768962185[/C][C]109.691666666667[/C][C]0.956096047668629[/C][C]0.97734682676757[/C][/ROW]
[ROW][C]54[/C][C]101.6[/C][C]103.22667362245[/C][C]108.058333333333[/C][C]0.955286560861723[/C][C]0.984241731663279[/C][/ROW]
[ROW][C]55[/C][C]107.4[/C][C]109.219007864339[/C][C]106.7625[/C][C]1.02300908899978[/C][C]0.983345317816855[/C][/ROW]
[ROW][C]56[/C][C]105.8[/C][C]105.433211228765[/C][C]105.870833333333[/C][C]0.995866452631099[/C][C]1.00347887318389[/C][/ROW]
[ROW][C]57[/C][C]102.8[/C][C]105.954059269525[/C][C]105.0875[/C][C]1.00824607369597[/C][C]0.970231822251358[/C][/ROW]
[ROW][C]58[/C][C]104[/C][C]104.076499757628[/C][C]104.433333333333[/C][C]0.99658314482248[/C][C]0.999264966079702[/C][/ROW]
[ROW][C]59[/C][C]100.4[/C][C]103.780203984262[/C][C]103.616666666667[/C][C]1.00157829162871[/C][C]0.967429202733361[/C][/ROW]
[ROW][C]60[/C][C]100.6[/C][C]103.723417998302[/C][C]102.658333333333[/C][C]1.01037504341231[/C][C]0.969887050980585[/C][/ROW]
[ROW][C]61[/C][C]107.9[/C][C]104.489629804968[/C][C]101.658333333333[/C][C]1.02785110063089[/C][C]1.03263836039421[/C][/ROW]
[ROW][C]62[/C][C]106.9[/C][C]103.61663713918[/C][C]100.433333333333[/C][C]1.03169569006817[/C][C]1.03168760298995[/C][/ROW]
[ROW][C]63[/C][C]106.5[/C][C]100.457012245262[/C][C]99.3208333333333[/C][C]1.0114394822697[/C][C]1.06015496200488[/C][/ROW]
[ROW][C]64[/C][C]103[/C][C]96.7161596875598[/C][C]98.4916666666666[/C][C]0.981973023310532[/C][C]1.06497197916811[/C][/ROW]
[ROW][C]65[/C][C]90.5[/C][C]93.4384699919487[/C][C]97.7291666666666[/C][C]0.956096047668629[/C][C]0.968551818194348[/C][/ROW]
[ROW][C]66[/C][C]90.6[/C][C]92.722501813641[/C][C]97.0625[/C][C]0.955286560861723[/C][C]0.977109096798241[/C][/ROW]
[ROW][C]67[/C][C]94.4[/C][C]NA[/C][C]NA[/C][C]1.02300908899978[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]89.4[/C][C]NA[/C][C]NA[/C][C]0.995866452631099[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]92.5[/C][C]NA[/C][C]NA[/C][C]1.00824607369597[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]94.4[/C][C]NA[/C][C]NA[/C][C]0.99658314482248[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]91.7[/C][C]NA[/C][C]NA[/C][C]1.00157829162871[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]93.3[/C][C]NA[/C][C]NA[/C][C]1.01037504341231[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=152714&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=152714&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	121	NA	NA	1.02785110063089	NA
2	117.7	NA	NA	1.03169569006817	NA
3	115.4	NA	NA	1.0114394822697	NA
4	114.3	NA	NA	0.981973023310532	NA
5	109.5	NA	NA	0.956096047668629	NA
6	108.1	NA	NA	0.955286560861723	NA
7	108.2	108.66061540326	106.216666666667	1.02300908899978	0.995760971888936
8	99.1	104.043147638634	104.475	0.995866452631099	0.95248944547696
9	101.2	103.706510730245	102.858333333333	1.00824607369597	0.975830729309131
10	98.1	100.916500702586	101.2625	0.99658314482248	0.972090781160883
11	95.5	100.020112147772	99.8625	1.00157829162871	0.954807967610612
12	97.9	99.7745355369659	98.75	1.01037504341231	0.981212285009622
13	98.2	100.793648555616	98.0625	1.02785110063089	0.974267738168191
14	98.7	101.183554803435	98.075	1.03169569006817	0.975454956012762
15	95.6	99.5551453735717	98.4291666666667	1.0114394822697	0.960271813589038
16	95.8	96.9616529433875	98.7416666666667	0.981973023310532	0.988019460187362
17	94.4	94.9044839317073	99.2625	0.956096047668629	0.994684298245905
18	96.5	95.3614809380215	99.825	0.955286560861723	1.01193898260366
19	103.3	102.51403579352	100.208333333333	1.02300908899978	1.00766689361507
20	104.3	100.275452892846	100.691666666667	0.995866452631099	1.0401349182781
21	104.5	102.114322138867	101.279166666667	1.00824607369597	1.0233628134738
22	102.3	101.128274620861	101.475	0.99658314482248	1.01158652595955
23	103.8	101.902244687458	101.741666666667	1.00157829162871	1.01862329253259
24	103.1	103.399256005208	102.3375	1.01037504341231	0.997105820517776
25	102.2	105.594569738147	102.733333333333	1.02785110063089	0.967852800133905
26	106.3	106.290448469273	103.025	1.03169569006817	1.00008986254988
27	102.1	104.557556479631	103.375	1.0114394822697	0.976495658827782
28	94	101.855151842885	103.725	0.981973023310532	0.922879189704593
29	102.6	99.5256148287723	104.095833333333	0.956096047668629	1.03089039114721
30	102.6	99.8672492167527	104.541666666667	0.955286560861723	1.02736383353582
31	106.7	107.582193321939	105.1625	1.02300908899978	0.991799820261153
32	107.9	105.26723348666	105.704166666667	0.995866452631099	1.02501031352433
33	109.3	107.016918672213	106.141666666667	1.00824607369597	1.02133383539831
34	105.9	106.671768363936	107.0375	0.99658314482248	0.992765017625815
35	109.1	108.057777938093	107.8875	1.00157829162871	1.00964504436233
36	108.5	109.406777617497	108.283333333333	1.01037504341231	0.991711869801459
37	111.7	111.898723155349	108.866666666667	1.02785110063089	0.998224080224102
38	109.8	112.846014833248	109.379166666667	1.03169569006817	0.973007333597479
39	109.1	110.959125536163	109.704166666667	1.0114394822697	0.983244951443343
40	108.5	108.377089339372	110.366666666667	0.981973023310532	1.0011341018787
41	108.5	106.321864234284	111.204166666667	0.956096047668629	1.0204862450579
42	106.2	107.131407439972	112.145833333333	0.955286560861723	0.991305934811937
43	117.1	115.553139140396	112.954166666667	1.02300908899978	1.01338657583092
44	109.8	113.097233470472	113.566666666667	0.995866452631099	0.970846028949659
45	115.2	115.061882135246	114.120833333333	1.00824607369597	1.00120037898035
46	115.9	114.046483635623	114.4375	0.99658314482248	1.01625228858699
47	119.2	114.455359275871	114.275	1.00157829162871	1.04145407217405
48	121	115.014359108435	113.833333333333	1.01037504341231	1.05204255310349
49	118.6	116.39128900769	113.2375	1.02785110063089	1.01897660049253
50	117.6	116.237714414347	112.666666666667	1.03169569006817	1.01171982426286
51	114.6	113.264364689502	111.983333333333	1.0114394822697	1.01179219354789
52	110.6	108.970364707623	110.970833333333	0.981973023310532	1.01495484847417
53	102.5	104.875768962185	109.691666666667	0.956096047668629	0.97734682676757
54	101.6	103.22667362245	108.058333333333	0.955286560861723	0.984241731663279
55	107.4	109.219007864339	106.7625	1.02300908899978	0.983345317816855
56	105.8	105.433211228765	105.870833333333	0.995866452631099	1.00347887318389
57	102.8	105.954059269525	105.0875	1.00824607369597	0.970231822251358
58	104	104.076499757628	104.433333333333	0.99658314482248	0.999264966079702
59	100.4	103.780203984262	103.616666666667	1.00157829162871	0.967429202733361
60	100.6	103.723417998302	102.658333333333	1.01037504341231	0.969887050980585
61	107.9	104.489629804968	101.658333333333	1.02785110063089	1.03263836039421
62	106.9	103.61663713918	100.433333333333	1.03169569006817	1.03168760298995
63	106.5	100.457012245262	99.3208333333333	1.0114394822697	1.06015496200488
64	103	96.7161596875598	98.4916666666666	0.981973023310532	1.06497197916811
65	90.5	93.4384699919487	97.7291666666666	0.956096047668629	0.968551818194348
66	90.6	92.722501813641	97.0625	0.955286560861723	0.977109096798241
67	94.4	NA	NA	1.02300908899978	NA
68	89.4	NA	NA	0.995866452631099	NA
69	92.5	NA	NA	1.00824607369597	NA
70	94.4	NA	NA	0.99658314482248	NA
71	91.7	NA	NA	1.00157829162871	NA
72	93.3	NA	NA	1.01037504341231	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