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, 03 Dec 2012 06:07:27 -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/03/t1354532897zkvf3ldmybw4gay.htm/, Retrieved Sun, 05 May 2024 12:22:56 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=195701, Retrieved Sun, 05 May 2024 12:22:56 +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] [decompositie cons...] [2012-12-03 11:07:27] [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	5 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=195701&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=195701&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	79.49	NA	NA	1.00026879397457	NA
2	79.69	NA	NA	0.999288130350722	NA
3	79.86	NA	NA	1.00013005299518	NA
4	79.87	NA	NA	1.00033577833852	NA
5	79.83	NA	NA	1.00001918517648	NA
6	79.83	NA	NA	0.999002801751953	NA
7	79.83	79.6484669054821	79.7691666666666	0.998486887023792	1.00227917876603
8	79.37	79.5702859897808	79.80125	0.997105759493502	0.997482904739006
9	79.53	79.7484408377837	79.8295833333333	0.998983553562959	0.997260876382173
10	79.78	80.161914056963	79.8670833333333	1.00369151734763	0.995235716843143
11	79.94	80.0116759335866	79.9008333333333	1.00138725211777	0.999104181574123
12	79.97	80.0305943415765	79.9266666666667	1.00130028786692	0.999242860282683
13	79.97	79.9748243075804	79.9533333333333	1.00026879397457	0.999939677171883
14	79.98	79.943466798112	80.0004166666667	0.999288130350722	1.00045698796101
15	80.25	80.0837471101675	80.0733333333333	1.00013005299518	1.00207598789807
16	80.38	80.1831647324468	80.15625	1.00033577833852	1.00245482038792
17	80.13	80.2298725280671	80.2283333333333	1.00001918517648	0.998755170301035
18	80.15	80.2053561898229	80.2854166666667	0.999002801751953	0.999309819288229
19	80.15	80.221348756912	80.3429166666667	0.998486887023792	0.999110601379588
20	80.18	80.1677185240107	80.4004166666667	0.997105759493502	1.00015319727461
21	80.47	80.3703080998766	80.4520833333333	0.998983553562959	1.00124040709163
22	80.83	80.7996763752776	80.5025	1.00369151734763	1.00037529388833
23	80.62	80.6880295734545	80.57625	1.00138725211777	0.999156881462912
24	80.66	80.7736425968644	80.66875	1.00130028786692	0.998593073269809
25	80.66	80.782958137379	80.76125	1.00026879397457	0.998477919845793
26	80.67	80.8036873303223	80.86125	0.999288130350722	0.998345529334871
27	80.8	80.9867812038511	80.97625	1.00013005299518	0.997693682832252
28	81.04	81.1480719519692	81.1208333333333	1.00033577833852	0.998668212942469
29	81.24	81.275309251237	81.27375	1.00001918517648	0.99956555992758
30	81.26	81.3313155976308	81.4125	0.999002801751953	0.999123147128424
31	81.26	81.4274377091961	81.5508333333333	0.998486887023792	0.99794371880159
32	81.47	81.4514921893586	81.6879166666667	0.997105759493502	1.00022722494265
33	81.94	81.7451592154676	81.8283333333333	0.998983553562959	1.0023835146497
34	82.83	82.2659024002029	81.9633333333333	1.00369151734763	1.00685700373227
35	82.29	82.1972036113336	82.0833333333333	1.00138725211777	1.00112894824385
36	82.32	82.3047976203943	82.1979166666667	1.00130028786692	1.00018470830432
37	82.32	82.3342083253679	82.3120833333333	1.00026879397457	0.999827431080508
38	82.3	82.3588294831806	82.4175	0.999288130350722	0.999285693063515
39	82.54	82.5086457678254	82.4979166666667	1.00013005299518	1.00038001147495
40	82.54	82.5752176623988	82.5475	1.00033577833852	0.999573508088797
41	82.62	82.6020013702378	82.6004166666666	1.00001918517648	1.00021789580717
42	82.63	82.5958866441818	82.6783333333333	0.999002801751953	1.00041301519003
43	82.63	82.6381030597125	82.7633333333333	0.998486887023792	0.999901945235764
44	82.63	82.6106276347697	82.8504166666666	0.997105759493502	1.00023450209477
45	82.71	82.8436248812396	82.9279166666667	0.998983553562959	0.998387022762088
46	83.25	83.2971954342777	82.9908333333333	1.00369151734763	0.999433409083804
47	83.14	83.1793976077858	83.0641666666667	1.00138725211777	0.999526353773664
48	83.34	83.257701727681	83.1495833333333	1.00130028786692	1.00098847638851
49	83.34	83.2561227304811	83.23375	1.00026879397457	1.00100746067398
50	83.37	83.2615197609307	83.3208333333333	0.999288130350722	1.0013028856473
51	83.33	83.4250149288822	83.4141666666667	1.00013005299518	0.998861073876184
52	83.26	83.5288711044149	83.5008333333333	1.00033577833852	0.996781099745994
53	83.66	83.5911870142416	83.5895833333333	1.00001918517648	1.00082320862063
54	83.64	83.6023819669469	83.6858333333333	0.999002801751953	1.00044996365137
55	83.64	83.6507351776358	83.7775	0.998486887023792	0.999871666667209
56	83.71	83.6255982057875	83.8683333333333	0.997105759493502	1.00100928179915
57	83.87	83.883816506387	83.9691666666667	0.998983553562959	0.999835289964591
58	84.17	84.4058563561479	84.0954166666667	1.00369151734763	0.997205687302636
59	84.35	84.3339136605399	84.2170833333333	1.00138725211777	1.00019074579563
60	84.44	84.4317263152049	84.3220833333333	1.00130028786692	1.00009799260487
61	84.44	84.452277496609	84.4295833333333	1.00026879397457	0.999854622078019
62	84.45	84.4739893590896	84.5341666666667	0.999288130350722	0.999716014843485
63	84.67	84.6618424277529	84.6508333333333	1.00013005299518	1.00009635476873
64	84.95	84.811801740134	84.7833333333333	1.00033577833852	1.001629469685
65	84.89	84.911629013335	84.91	1.00001918517648	0.999745276193775
66	84.93	84.9460407353033	85.0308333333333	0.999002801751953	0.999811165592128
67	84.93	NA	NA	0.998486887023792	NA
68	84.93	NA	NA	0.997105759493502	NA
69	85.45	NA	NA	0.998983553562959	NA
70	85.77	NA	NA	1.00369151734763	NA
71	85.79	NA	NA	1.00138725211777	NA
72	85.9	NA	NA	1.00130028786692	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 79.49 & NA & NA & 1.00026879397457 & NA \tabularnewline
2 & 79.69 & NA & NA & 0.999288130350722 & NA \tabularnewline
3 & 79.86 & NA & NA & 1.00013005299518 & NA \tabularnewline
4 & 79.87 & NA & NA & 1.00033577833852 & NA \tabularnewline
5 & 79.83 & NA & NA & 1.00001918517648 & NA \tabularnewline
6 & 79.83 & NA & NA & 0.999002801751953 & NA \tabularnewline
7 & 79.83 & 79.6484669054821 & 79.7691666666666 & 0.998486887023792 & 1.00227917876603 \tabularnewline
8 & 79.37 & 79.5702859897808 & 79.80125 & 0.997105759493502 & 0.997482904739006 \tabularnewline
9 & 79.53 & 79.7484408377837 & 79.8295833333333 & 0.998983553562959 & 0.997260876382173 \tabularnewline
10 & 79.78 & 80.161914056963 & 79.8670833333333 & 1.00369151734763 & 0.995235716843143 \tabularnewline
11 & 79.94 & 80.0116759335866 & 79.9008333333333 & 1.00138725211777 & 0.999104181574123 \tabularnewline
12 & 79.97 & 80.0305943415765 & 79.9266666666667 & 1.00130028786692 & 0.999242860282683 \tabularnewline
13 & 79.97 & 79.9748243075804 & 79.9533333333333 & 1.00026879397457 & 0.999939677171883 \tabularnewline
14 & 79.98 & 79.943466798112 & 80.0004166666667 & 0.999288130350722 & 1.00045698796101 \tabularnewline
15 & 80.25 & 80.0837471101675 & 80.0733333333333 & 1.00013005299518 & 1.00207598789807 \tabularnewline
16 & 80.38 & 80.1831647324468 & 80.15625 & 1.00033577833852 & 1.00245482038792 \tabularnewline
17 & 80.13 & 80.2298725280671 & 80.2283333333333 & 1.00001918517648 & 0.998755170301035 \tabularnewline
18 & 80.15 & 80.2053561898229 & 80.2854166666667 & 0.999002801751953 & 0.999309819288229 \tabularnewline
19 & 80.15 & 80.221348756912 & 80.3429166666667 & 0.998486887023792 & 0.999110601379588 \tabularnewline
20 & 80.18 & 80.1677185240107 & 80.4004166666667 & 0.997105759493502 & 1.00015319727461 \tabularnewline
21 & 80.47 & 80.3703080998766 & 80.4520833333333 & 0.998983553562959 & 1.00124040709163 \tabularnewline
22 & 80.83 & 80.7996763752776 & 80.5025 & 1.00369151734763 & 1.00037529388833 \tabularnewline
23 & 80.62 & 80.6880295734545 & 80.57625 & 1.00138725211777 & 0.999156881462912 \tabularnewline
24 & 80.66 & 80.7736425968644 & 80.66875 & 1.00130028786692 & 0.998593073269809 \tabularnewline
25 & 80.66 & 80.782958137379 & 80.76125 & 1.00026879397457 & 0.998477919845793 \tabularnewline
26 & 80.67 & 80.8036873303223 & 80.86125 & 0.999288130350722 & 0.998345529334871 \tabularnewline
27 & 80.8 & 80.9867812038511 & 80.97625 & 1.00013005299518 & 0.997693682832252 \tabularnewline
28 & 81.04 & 81.1480719519692 & 81.1208333333333 & 1.00033577833852 & 0.998668212942469 \tabularnewline
29 & 81.24 & 81.275309251237 & 81.27375 & 1.00001918517648 & 0.99956555992758 \tabularnewline
30 & 81.26 & 81.3313155976308 & 81.4125 & 0.999002801751953 & 0.999123147128424 \tabularnewline
31 & 81.26 & 81.4274377091961 & 81.5508333333333 & 0.998486887023792 & 0.99794371880159 \tabularnewline
32 & 81.47 & 81.4514921893586 & 81.6879166666667 & 0.997105759493502 & 1.00022722494265 \tabularnewline
33 & 81.94 & 81.7451592154676 & 81.8283333333333 & 0.998983553562959 & 1.0023835146497 \tabularnewline
34 & 82.83 & 82.2659024002029 & 81.9633333333333 & 1.00369151734763 & 1.00685700373227 \tabularnewline
35 & 82.29 & 82.1972036113336 & 82.0833333333333 & 1.00138725211777 & 1.00112894824385 \tabularnewline
36 & 82.32 & 82.3047976203943 & 82.1979166666667 & 1.00130028786692 & 1.00018470830432 \tabularnewline
37 & 82.32 & 82.3342083253679 & 82.3120833333333 & 1.00026879397457 & 0.999827431080508 \tabularnewline
38 & 82.3 & 82.3588294831806 & 82.4175 & 0.999288130350722 & 0.999285693063515 \tabularnewline
39 & 82.54 & 82.5086457678254 & 82.4979166666667 & 1.00013005299518 & 1.00038001147495 \tabularnewline
40 & 82.54 & 82.5752176623988 & 82.5475 & 1.00033577833852 & 0.999573508088797 \tabularnewline
41 & 82.62 & 82.6020013702378 & 82.6004166666666 & 1.00001918517648 & 1.00021789580717 \tabularnewline
42 & 82.63 & 82.5958866441818 & 82.6783333333333 & 0.999002801751953 & 1.00041301519003 \tabularnewline
43 & 82.63 & 82.6381030597125 & 82.7633333333333 & 0.998486887023792 & 0.999901945235764 \tabularnewline
44 & 82.63 & 82.6106276347697 & 82.8504166666666 & 0.997105759493502 & 1.00023450209477 \tabularnewline
45 & 82.71 & 82.8436248812396 & 82.9279166666667 & 0.998983553562959 & 0.998387022762088 \tabularnewline
46 & 83.25 & 83.2971954342777 & 82.9908333333333 & 1.00369151734763 & 0.999433409083804 \tabularnewline
47 & 83.14 & 83.1793976077858 & 83.0641666666667 & 1.00138725211777 & 0.999526353773664 \tabularnewline
48 & 83.34 & 83.257701727681 & 83.1495833333333 & 1.00130028786692 & 1.00098847638851 \tabularnewline
49 & 83.34 & 83.2561227304811 & 83.23375 & 1.00026879397457 & 1.00100746067398 \tabularnewline
50 & 83.37 & 83.2615197609307 & 83.3208333333333 & 0.999288130350722 & 1.0013028856473 \tabularnewline
51 & 83.33 & 83.4250149288822 & 83.4141666666667 & 1.00013005299518 & 0.998861073876184 \tabularnewline
52 & 83.26 & 83.5288711044149 & 83.5008333333333 & 1.00033577833852 & 0.996781099745994 \tabularnewline
53 & 83.66 & 83.5911870142416 & 83.5895833333333 & 1.00001918517648 & 1.00082320862063 \tabularnewline
54 & 83.64 & 83.6023819669469 & 83.6858333333333 & 0.999002801751953 & 1.00044996365137 \tabularnewline
55 & 83.64 & 83.6507351776358 & 83.7775 & 0.998486887023792 & 0.999871666667209 \tabularnewline
56 & 83.71 & 83.6255982057875 & 83.8683333333333 & 0.997105759493502 & 1.00100928179915 \tabularnewline
57 & 83.87 & 83.883816506387 & 83.9691666666667 & 0.998983553562959 & 0.999835289964591 \tabularnewline
58 & 84.17 & 84.4058563561479 & 84.0954166666667 & 1.00369151734763 & 0.997205687302636 \tabularnewline
59 & 84.35 & 84.3339136605399 & 84.2170833333333 & 1.00138725211777 & 1.00019074579563 \tabularnewline
60 & 84.44 & 84.4317263152049 & 84.3220833333333 & 1.00130028786692 & 1.00009799260487 \tabularnewline
61 & 84.44 & 84.452277496609 & 84.4295833333333 & 1.00026879397457 & 0.999854622078019 \tabularnewline
62 & 84.45 & 84.4739893590896 & 84.5341666666667 & 0.999288130350722 & 0.999716014843485 \tabularnewline
63 & 84.67 & 84.6618424277529 & 84.6508333333333 & 1.00013005299518 & 1.00009635476873 \tabularnewline
64 & 84.95 & 84.811801740134 & 84.7833333333333 & 1.00033577833852 & 1.001629469685 \tabularnewline
65 & 84.89 & 84.911629013335 & 84.91 & 1.00001918517648 & 0.999745276193775 \tabularnewline
66 & 84.93 & 84.9460407353033 & 85.0308333333333 & 0.999002801751953 & 0.999811165592128 \tabularnewline
67 & 84.93 & NA & NA & 0.998486887023792 & NA \tabularnewline
68 & 84.93 & NA & NA & 0.997105759493502 & NA \tabularnewline
69 & 85.45 & NA & NA & 0.998983553562959 & NA \tabularnewline
70 & 85.77 & NA & NA & 1.00369151734763 & NA \tabularnewline
71 & 85.79 & NA & NA & 1.00138725211777 & NA \tabularnewline
72 & 85.9 & NA & NA & 1.00130028786692 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=195701&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]79.49[/C][C]NA[/C][C]NA[/C][C]1.00026879397457[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]79.69[/C][C]NA[/C][C]NA[/C][C]0.999288130350722[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]79.86[/C][C]NA[/C][C]NA[/C][C]1.00013005299518[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]79.87[/C][C]NA[/C][C]NA[/C][C]1.00033577833852[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]79.83[/C][C]NA[/C][C]NA[/C][C]1.00001918517648[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]79.83[/C][C]NA[/C][C]NA[/C][C]0.999002801751953[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]79.83[/C][C]79.6484669054821[/C][C]79.7691666666666[/C][C]0.998486887023792[/C][C]1.00227917876603[/C][/ROW]
[ROW][C]8[/C][C]79.37[/C][C]79.5702859897808[/C][C]79.80125[/C][C]0.997105759493502[/C][C]0.997482904739006[/C][/ROW]
[ROW][C]9[/C][C]79.53[/C][C]79.7484408377837[/C][C]79.8295833333333[/C][C]0.998983553562959[/C][C]0.997260876382173[/C][/ROW]
[ROW][C]10[/C][C]79.78[/C][C]80.161914056963[/C][C]79.8670833333333[/C][C]1.00369151734763[/C][C]0.995235716843143[/C][/ROW]
[ROW][C]11[/C][C]79.94[/C][C]80.0116759335866[/C][C]79.9008333333333[/C][C]1.00138725211777[/C][C]0.999104181574123[/C][/ROW]
[ROW][C]12[/C][C]79.97[/C][C]80.0305943415765[/C][C]79.9266666666667[/C][C]1.00130028786692[/C][C]0.999242860282683[/C][/ROW]
[ROW][C]13[/C][C]79.97[/C][C]79.9748243075804[/C][C]79.9533333333333[/C][C]1.00026879397457[/C][C]0.999939677171883[/C][/ROW]
[ROW][C]14[/C][C]79.98[/C][C]79.943466798112[/C][C]80.0004166666667[/C][C]0.999288130350722[/C][C]1.00045698796101[/C][/ROW]
[ROW][C]15[/C][C]80.25[/C][C]80.0837471101675[/C][C]80.0733333333333[/C][C]1.00013005299518[/C][C]1.00207598789807[/C][/ROW]
[ROW][C]16[/C][C]80.38[/C][C]80.1831647324468[/C][C]80.15625[/C][C]1.00033577833852[/C][C]1.00245482038792[/C][/ROW]
[ROW][C]17[/C][C]80.13[/C][C]80.2298725280671[/C][C]80.2283333333333[/C][C]1.00001918517648[/C][C]0.998755170301035[/C][/ROW]
[ROW][C]18[/C][C]80.15[/C][C]80.2053561898229[/C][C]80.2854166666667[/C][C]0.999002801751953[/C][C]0.999309819288229[/C][/ROW]
[ROW][C]19[/C][C]80.15[/C][C]80.221348756912[/C][C]80.3429166666667[/C][C]0.998486887023792[/C][C]0.999110601379588[/C][/ROW]
[ROW][C]20[/C][C]80.18[/C][C]80.1677185240107[/C][C]80.4004166666667[/C][C]0.997105759493502[/C][C]1.00015319727461[/C][/ROW]
[ROW][C]21[/C][C]80.47[/C][C]80.3703080998766[/C][C]80.4520833333333[/C][C]0.998983553562959[/C][C]1.00124040709163[/C][/ROW]
[ROW][C]22[/C][C]80.83[/C][C]80.7996763752776[/C][C]80.5025[/C][C]1.00369151734763[/C][C]1.00037529388833[/C][/ROW]
[ROW][C]23[/C][C]80.62[/C][C]80.6880295734545[/C][C]80.57625[/C][C]1.00138725211777[/C][C]0.999156881462912[/C][/ROW]
[ROW][C]24[/C][C]80.66[/C][C]80.7736425968644[/C][C]80.66875[/C][C]1.00130028786692[/C][C]0.998593073269809[/C][/ROW]
[ROW][C]25[/C][C]80.66[/C][C]80.782958137379[/C][C]80.76125[/C][C]1.00026879397457[/C][C]0.998477919845793[/C][/ROW]
[ROW][C]26[/C][C]80.67[/C][C]80.8036873303223[/C][C]80.86125[/C][C]0.999288130350722[/C][C]0.998345529334871[/C][/ROW]
[ROW][C]27[/C][C]80.8[/C][C]80.9867812038511[/C][C]80.97625[/C][C]1.00013005299518[/C][C]0.997693682832252[/C][/ROW]
[ROW][C]28[/C][C]81.04[/C][C]81.1480719519692[/C][C]81.1208333333333[/C][C]1.00033577833852[/C][C]0.998668212942469[/C][/ROW]
[ROW][C]29[/C][C]81.24[/C][C]81.275309251237[/C][C]81.27375[/C][C]1.00001918517648[/C][C]0.99956555992758[/C][/ROW]
[ROW][C]30[/C][C]81.26[/C][C]81.3313155976308[/C][C]81.4125[/C][C]0.999002801751953[/C][C]0.999123147128424[/C][/ROW]
[ROW][C]31[/C][C]81.26[/C][C]81.4274377091961[/C][C]81.5508333333333[/C][C]0.998486887023792[/C][C]0.99794371880159[/C][/ROW]
[ROW][C]32[/C][C]81.47[/C][C]81.4514921893586[/C][C]81.6879166666667[/C][C]0.997105759493502[/C][C]1.00022722494265[/C][/ROW]
[ROW][C]33[/C][C]81.94[/C][C]81.7451592154676[/C][C]81.8283333333333[/C][C]0.998983553562959[/C][C]1.0023835146497[/C][/ROW]
[ROW][C]34[/C][C]82.83[/C][C]82.2659024002029[/C][C]81.9633333333333[/C][C]1.00369151734763[/C][C]1.00685700373227[/C][/ROW]
[ROW][C]35[/C][C]82.29[/C][C]82.1972036113336[/C][C]82.0833333333333[/C][C]1.00138725211777[/C][C]1.00112894824385[/C][/ROW]
[ROW][C]36[/C][C]82.32[/C][C]82.3047976203943[/C][C]82.1979166666667[/C][C]1.00130028786692[/C][C]1.00018470830432[/C][/ROW]
[ROW][C]37[/C][C]82.32[/C][C]82.3342083253679[/C][C]82.3120833333333[/C][C]1.00026879397457[/C][C]0.999827431080508[/C][/ROW]
[ROW][C]38[/C][C]82.3[/C][C]82.3588294831806[/C][C]82.4175[/C][C]0.999288130350722[/C][C]0.999285693063515[/C][/ROW]
[ROW][C]39[/C][C]82.54[/C][C]82.5086457678254[/C][C]82.4979166666667[/C][C]1.00013005299518[/C][C]1.00038001147495[/C][/ROW]
[ROW][C]40[/C][C]82.54[/C][C]82.5752176623988[/C][C]82.5475[/C][C]1.00033577833852[/C][C]0.999573508088797[/C][/ROW]
[ROW][C]41[/C][C]82.62[/C][C]82.6020013702378[/C][C]82.6004166666666[/C][C]1.00001918517648[/C][C]1.00021789580717[/C][/ROW]
[ROW][C]42[/C][C]82.63[/C][C]82.5958866441818[/C][C]82.6783333333333[/C][C]0.999002801751953[/C][C]1.00041301519003[/C][/ROW]
[ROW][C]43[/C][C]82.63[/C][C]82.6381030597125[/C][C]82.7633333333333[/C][C]0.998486887023792[/C][C]0.999901945235764[/C][/ROW]
[ROW][C]44[/C][C]82.63[/C][C]82.6106276347697[/C][C]82.8504166666666[/C][C]0.997105759493502[/C][C]1.00023450209477[/C][/ROW]
[ROW][C]45[/C][C]82.71[/C][C]82.8436248812396[/C][C]82.9279166666667[/C][C]0.998983553562959[/C][C]0.998387022762088[/C][/ROW]
[ROW][C]46[/C][C]83.25[/C][C]83.2971954342777[/C][C]82.9908333333333[/C][C]1.00369151734763[/C][C]0.999433409083804[/C][/ROW]
[ROW][C]47[/C][C]83.14[/C][C]83.1793976077858[/C][C]83.0641666666667[/C][C]1.00138725211777[/C][C]0.999526353773664[/C][/ROW]
[ROW][C]48[/C][C]83.34[/C][C]83.257701727681[/C][C]83.1495833333333[/C][C]1.00130028786692[/C][C]1.00098847638851[/C][/ROW]
[ROW][C]49[/C][C]83.34[/C][C]83.2561227304811[/C][C]83.23375[/C][C]1.00026879397457[/C][C]1.00100746067398[/C][/ROW]
[ROW][C]50[/C][C]83.37[/C][C]83.2615197609307[/C][C]83.3208333333333[/C][C]0.999288130350722[/C][C]1.0013028856473[/C][/ROW]
[ROW][C]51[/C][C]83.33[/C][C]83.4250149288822[/C][C]83.4141666666667[/C][C]1.00013005299518[/C][C]0.998861073876184[/C][/ROW]
[ROW][C]52[/C][C]83.26[/C][C]83.5288711044149[/C][C]83.5008333333333[/C][C]1.00033577833852[/C][C]0.996781099745994[/C][/ROW]
[ROW][C]53[/C][C]83.66[/C][C]83.5911870142416[/C][C]83.5895833333333[/C][C]1.00001918517648[/C][C]1.00082320862063[/C][/ROW]
[ROW][C]54[/C][C]83.64[/C][C]83.6023819669469[/C][C]83.6858333333333[/C][C]0.999002801751953[/C][C]1.00044996365137[/C][/ROW]
[ROW][C]55[/C][C]83.64[/C][C]83.6507351776358[/C][C]83.7775[/C][C]0.998486887023792[/C][C]0.999871666667209[/C][/ROW]
[ROW][C]56[/C][C]83.71[/C][C]83.6255982057875[/C][C]83.8683333333333[/C][C]0.997105759493502[/C][C]1.00100928179915[/C][/ROW]
[ROW][C]57[/C][C]83.87[/C][C]83.883816506387[/C][C]83.9691666666667[/C][C]0.998983553562959[/C][C]0.999835289964591[/C][/ROW]
[ROW][C]58[/C][C]84.17[/C][C]84.4058563561479[/C][C]84.0954166666667[/C][C]1.00369151734763[/C][C]0.997205687302636[/C][/ROW]
[ROW][C]59[/C][C]84.35[/C][C]84.3339136605399[/C][C]84.2170833333333[/C][C]1.00138725211777[/C][C]1.00019074579563[/C][/ROW]
[ROW][C]60[/C][C]84.44[/C][C]84.4317263152049[/C][C]84.3220833333333[/C][C]1.00130028786692[/C][C]1.00009799260487[/C][/ROW]
[ROW][C]61[/C][C]84.44[/C][C]84.452277496609[/C][C]84.4295833333333[/C][C]1.00026879397457[/C][C]0.999854622078019[/C][/ROW]
[ROW][C]62[/C][C]84.45[/C][C]84.4739893590896[/C][C]84.5341666666667[/C][C]0.999288130350722[/C][C]0.999716014843485[/C][/ROW]
[ROW][C]63[/C][C]84.67[/C][C]84.6618424277529[/C][C]84.6508333333333[/C][C]1.00013005299518[/C][C]1.00009635476873[/C][/ROW]
[ROW][C]64[/C][C]84.95[/C][C]84.811801740134[/C][C]84.7833333333333[/C][C]1.00033577833852[/C][C]1.001629469685[/C][/ROW]
[ROW][C]65[/C][C]84.89[/C][C]84.911629013335[/C][C]84.91[/C][C]1.00001918517648[/C][C]0.999745276193775[/C][/ROW]
[ROW][C]66[/C][C]84.93[/C][C]84.9460407353033[/C][C]85.0308333333333[/C][C]0.999002801751953[/C][C]0.999811165592128[/C][/ROW]
[ROW][C]67[/C][C]84.93[/C][C]NA[/C][C]NA[/C][C]0.998486887023792[/C][C]NA[/C][/ROW]
[ROW][C]68[/C][C]84.93[/C][C]NA[/C][C]NA[/C][C]0.997105759493502[/C][C]NA[/C][/ROW]
[ROW][C]69[/C][C]85.45[/C][C]NA[/C][C]NA[/C][C]0.998983553562959[/C][C]NA[/C][/ROW]
[ROW][C]70[/C][C]85.77[/C][C]NA[/C][C]NA[/C][C]1.00369151734763[/C][C]NA[/C][/ROW]
[ROW][C]71[/C][C]85.79[/C][C]NA[/C][C]NA[/C][C]1.00138725211777[/C][C]NA[/C][/ROW]
[ROW][C]72[/C][C]85.9[/C][C]NA[/C][C]NA[/C][C]1.00130028786692[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=195701&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=195701&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	79.49	NA	NA	1.00026879397457	NA
2	79.69	NA	NA	0.999288130350722	NA
3	79.86	NA	NA	1.00013005299518	NA
4	79.87	NA	NA	1.00033577833852	NA
5	79.83	NA	NA	1.00001918517648	NA
6	79.83	NA	NA	0.999002801751953	NA
7	79.83	79.6484669054821	79.7691666666666	0.998486887023792	1.00227917876603
8	79.37	79.5702859897808	79.80125	0.997105759493502	0.997482904739006
9	79.53	79.7484408377837	79.8295833333333	0.998983553562959	0.997260876382173
10	79.78	80.161914056963	79.8670833333333	1.00369151734763	0.995235716843143
11	79.94	80.0116759335866	79.9008333333333	1.00138725211777	0.999104181574123
12	79.97	80.0305943415765	79.9266666666667	1.00130028786692	0.999242860282683
13	79.97	79.9748243075804	79.9533333333333	1.00026879397457	0.999939677171883
14	79.98	79.943466798112	80.0004166666667	0.999288130350722	1.00045698796101
15	80.25	80.0837471101675	80.0733333333333	1.00013005299518	1.00207598789807
16	80.38	80.1831647324468	80.15625	1.00033577833852	1.00245482038792
17	80.13	80.2298725280671	80.2283333333333	1.00001918517648	0.998755170301035
18	80.15	80.2053561898229	80.2854166666667	0.999002801751953	0.999309819288229
19	80.15	80.221348756912	80.3429166666667	0.998486887023792	0.999110601379588
20	80.18	80.1677185240107	80.4004166666667	0.997105759493502	1.00015319727461
21	80.47	80.3703080998766	80.4520833333333	0.998983553562959	1.00124040709163
22	80.83	80.7996763752776	80.5025	1.00369151734763	1.00037529388833
23	80.62	80.6880295734545	80.57625	1.00138725211777	0.999156881462912
24	80.66	80.7736425968644	80.66875	1.00130028786692	0.998593073269809
25	80.66	80.782958137379	80.76125	1.00026879397457	0.998477919845793
26	80.67	80.8036873303223	80.86125	0.999288130350722	0.998345529334871
27	80.8	80.9867812038511	80.97625	1.00013005299518	0.997693682832252
28	81.04	81.1480719519692	81.1208333333333	1.00033577833852	0.998668212942469
29	81.24	81.275309251237	81.27375	1.00001918517648	0.99956555992758
30	81.26	81.3313155976308	81.4125	0.999002801751953	0.999123147128424
31	81.26	81.4274377091961	81.5508333333333	0.998486887023792	0.99794371880159
32	81.47	81.4514921893586	81.6879166666667	0.997105759493502	1.00022722494265
33	81.94	81.7451592154676	81.8283333333333	0.998983553562959	1.0023835146497
34	82.83	82.2659024002029	81.9633333333333	1.00369151734763	1.00685700373227
35	82.29	82.1972036113336	82.0833333333333	1.00138725211777	1.00112894824385
36	82.32	82.3047976203943	82.1979166666667	1.00130028786692	1.00018470830432
37	82.32	82.3342083253679	82.3120833333333	1.00026879397457	0.999827431080508
38	82.3	82.3588294831806	82.4175	0.999288130350722	0.999285693063515
39	82.54	82.5086457678254	82.4979166666667	1.00013005299518	1.00038001147495
40	82.54	82.5752176623988	82.5475	1.00033577833852	0.999573508088797
41	82.62	82.6020013702378	82.6004166666666	1.00001918517648	1.00021789580717
42	82.63	82.5958866441818	82.6783333333333	0.999002801751953	1.00041301519003
43	82.63	82.6381030597125	82.7633333333333	0.998486887023792	0.999901945235764
44	82.63	82.6106276347697	82.8504166666666	0.997105759493502	1.00023450209477
45	82.71	82.8436248812396	82.9279166666667	0.998983553562959	0.998387022762088
46	83.25	83.2971954342777	82.9908333333333	1.00369151734763	0.999433409083804
47	83.14	83.1793976077858	83.0641666666667	1.00138725211777	0.999526353773664
48	83.34	83.257701727681	83.1495833333333	1.00130028786692	1.00098847638851
49	83.34	83.2561227304811	83.23375	1.00026879397457	1.00100746067398
50	83.37	83.2615197609307	83.3208333333333	0.999288130350722	1.0013028856473
51	83.33	83.4250149288822	83.4141666666667	1.00013005299518	0.998861073876184
52	83.26	83.5288711044149	83.5008333333333	1.00033577833852	0.996781099745994
53	83.66	83.5911870142416	83.5895833333333	1.00001918517648	1.00082320862063
54	83.64	83.6023819669469	83.6858333333333	0.999002801751953	1.00044996365137
55	83.64	83.6507351776358	83.7775	0.998486887023792	0.999871666667209
56	83.71	83.6255982057875	83.8683333333333	0.997105759493502	1.00100928179915
57	83.87	83.883816506387	83.9691666666667	0.998983553562959	0.999835289964591
58	84.17	84.4058563561479	84.0954166666667	1.00369151734763	0.997205687302636
59	84.35	84.3339136605399	84.2170833333333	1.00138725211777	1.00019074579563
60	84.44	84.4317263152049	84.3220833333333	1.00130028786692	1.00009799260487
61	84.44	84.452277496609	84.4295833333333	1.00026879397457	0.999854622078019
62	84.45	84.4739893590896	84.5341666666667	0.999288130350722	0.999716014843485
63	84.67	84.6618424277529	84.6508333333333	1.00013005299518	1.00009635476873
64	84.95	84.811801740134	84.7833333333333	1.00033577833852	1.001629469685
65	84.89	84.911629013335	84.91	1.00001918517648	0.999745276193775
66	84.93	84.9460407353033	85.0308333333333	0.999002801751953	0.999811165592128
67	84.93	NA	NA	0.998486887023792	NA
68	84.93	NA	NA	0.997105759493502	NA
69	85.45	NA	NA	0.998983553562959	NA
70	85.77	NA	NA	1.00369151734763	NA
71	85.79	NA	NA	1.00138725211777	NA
72	85.9	NA	NA	1.00130028786692	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