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

Sun, 29 Nov 2015 11:06:09 +0000

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/2015/Nov/29/t14487952063nset7r90k4qc3k.htm/, Retrieved Wed, 15 May 2024 23:17:28 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=284406, Retrieved Wed, 15 May 2024 23:17:28 +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

123

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

-       [Classical Decomposition] [opdracht 9] [2015-11-29 11:06:09] [b43493158838656c32486372ca9c54cf] [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	2 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 & 2 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284406&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]2 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=284406&T=0

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

Classical Decomposition by Moving Averages
t	Observations	Fit	Trend	Seasonal	Random
1	84.71	NA	NA	-0.2649	NA
2	85.17	NA	NA	0.146819	NA
3	84.93	NA	NA	0.118433	NA
4	85.1	NA	NA	-0.134796	NA
5	85.19	NA	NA	-0.0214106	NA
6	85.38	NA	NA	0.113798	NA
7	85.95	86.0503	85.5412	0.509058	-0.100308
8	86.04	86.0212	85.6696	0.35161	0.0188064
9	85.68	85.7101	85.8217	-0.111567	-0.0300998
10	85.79	85.8552	85.9854	-0.130265	-0.0651519
11	85.79	85.8163	86.1467	-0.330369	-0.0262977
12	86.05	86.0523	86.2988	-0.246411	-0.00233941
13	86.14	86.1759	86.4408	-0.2649	-0.0359332
14	86.82	86.7235	86.5767	0.146819	0.0965148
15	86.93	86.8163	86.6979	0.118433	0.11365
16	87.03	86.6748	86.8096	-0.134796	0.355213
17	87.13	86.8973	86.9187	-0.0214106	0.232661
18	87.09	87.1492	87.0354	0.113798	-0.0592144
19	87.65	87.6561	87.1471	0.509058	-0.00614149
20	87.6	87.592	87.2404	0.35161	0.00797309
21	87.03	87.2263	87.3379	-0.111567	-0.19635
22	87.12	87.2885	87.4188	-0.130265	-0.168485
23	87.08	87.1605	87.4908	-0.330369	-0.0804644
24	87.56	87.3536	87.6	-0.246411	0.206411
25	87.31	87.4763	87.7413	-0.2649	-0.16635
26	87.89	88.0497	87.9029	0.146819	-0.159735
27	88.2	88.203	88.0846	0.118433	-0.00301649
28	87.7	88.1548	88.2896	-0.134796	-0.454787
29	88.19	88.489	88.5104	-0.0214106	-0.299006
30	88.65	88.8488	88.735	0.113798	-0.198798
31	89.48	89.4699	88.9608	0.509058	0.0101085
32	89.65	89.5591	89.2075	0.35161	0.0908898
33	89.34	89.3434	89.455	-0.111567	-0.00343316
34	89.73	89.5777	89.7079	-0.130265	0.152348
35	89.77	89.6392	89.9696	-0.330369	0.130786
36	90.26	89.9653	90.2117	-0.246411	0.294744
37	90.03	90.1705	90.4354	-0.2649	-0.140516
38	91.09	90.781	90.6342	0.146819	0.309015
39	90.94	90.9493	90.8308	0.118433	-0.00926649
40	91.03	90.8848	91.0196	-0.134796	0.145213
41	91.14	91.154	91.1754	-0.0214106	-0.0140061
42	91.51	91.4242	91.3104	0.113798	0.0857856
43	91.99	91.9445	91.4354	0.509058	0.0455252
44	91.91	91.8916	91.54	0.35161	0.0183898
45	91.8	91.5138	91.6254	-0.111567	0.28615
46	91.8	91.5785	91.7088	-0.130265	0.221515
47	91.44	91.4709	91.8013	-0.330369	-0.0308811
48	91.83	91.6553	91.9017	-0.246411	0.174744
49	91.46	91.7443	92.0092	-0.2649	-0.284266
50	92.17	92.2697	92.1229	0.146819	-0.0997352
51	91.91	92.3576	92.2392	0.118433	-0.4476
52	92.06	92.2265	92.3613	-0.134796	-0.166454
53	92.33	92.4765	92.4979	-0.0214106	-0.146506
54	92.73	92.74	92.6263	0.113798	-0.0100477
55	93.35	93.2882	92.7792	0.509058	0.0617752
56	93.28	93.3129	92.9612	0.35161	-0.0328602
57	93.22	93.0388	93.1504	-0.111567	0.18115
58	93.31	93.221	93.3512	-0.130265	0.0890148
59	93.21	93.2017	93.5321	-0.330369	0.00828559
60	93.14	93.454	93.7004	-0.246411	-0.314006
61	93.82	93.5976	93.8625	-0.2649	0.2224
62	94.18	94.1668	94.02	0.146819	0.0131814
63	94.44	94.2868	94.1683	0.118433	0.153234
64	94.35	94.1777	94.3125	-0.134796	0.172296
65	94.38	94.449	94.4704	-0.0214106	-0.0690061
66	94.72	94.7617	94.6479	0.113798	-0.0417144
67	95.25	95.3653	94.8562	0.509058	-0.115308
68	95.16	95.442	95.0904	0.35161	-0.282027
69	94.9	95.2097	95.3212	-0.111567	-0.309683
70	95.09	95.416	95.5462	-0.130265	-0.325985
71	95.22	95.4596	95.79	-0.330369	-0.239631
72	95.39	95.8069	96.0533	-0.246411	-0.416923
73	96.57	96.0547	96.3196	-0.2649	0.515317
74	97.05	96.736	96.5892	0.146819	0.314015
75	97.11	96.9759	96.8575	0.118433	0.134067
76	97.08	96.984	97.1188	-0.134796	0.096046
77	97.5	97.3507	97.3721	-0.0214106	0.149327
78	97.92	97.7334	97.6196	0.113798	0.186619
79	98.44	98.3291	97.82	0.509058	0.110942
80	98.44	98.3283	97.9767	0.35161	0.111723
81	98.06	98.0426	98.1542	-0.111567	0.0174002
82	98.2	98.1993	98.3296	-0.130265	0.000681424
83	98.19	98.1688	98.4992	-0.330369	0.0212023
84	98.36	98.4361	98.6825	-0.246411	-0.0760894
85	98.41	98.6001	98.865	-0.2649	-0.1901
86	98.97	99.1989	99.0521	0.146819	-0.228902
87	99.45	99.3672	99.2488	0.118433	0.0828168
88	98.95	99.319	99.4538	-0.134796	-0.368954
89	99.7	99.6478	99.6692	-0.0214106	0.0522439
90	100.12	100.005	99.8912	0.113798	0.114952
91	100.62	100.625	100.116	0.509058	-0.00489149
92	100.75	100.681	100.33	0.35161	0.0688064
93	100.47	100.413	100.525	-0.111567	0.0565668
94	100.71	100.612	100.742	-0.130265	0.0977648
95	100.85	100.631	100.962	-0.330369	0.218702
96	101.03	100.895	101.141	-0.246411	0.135161
97	101.13	101.049	101.314	-0.2649	0.0811502
98	101.38	101.623	101.476	0.146819	-0.242652
99	101.73	101.752	101.634	0.118433	-0.0221832
100	101.89	101.667	101.802	-0.134796	0.223129
101	102.02	101.924	101.945	-0.0214106	0.0959939
102	102.11	102.186	102.072	0.113798	-0.0758811
103	102.77	NA	NA	0.509058	NA
104	102.49	NA	NA	0.35161	NA
105	102.52	NA	NA	-0.111567	NA
106	102.69	NA	NA	-0.130265	NA
107	102.32	NA	NA	-0.330369	NA
108	102.6	NA	NA	-0.246411	NA

\begin{tabular}{lllllllll}
\hline
Classical Decomposition by Moving Averages \tabularnewline
t & Observations & Fit & Trend & Seasonal & Random \tabularnewline
1 & 84.71 & NA & NA & -0.2649 & NA \tabularnewline
2 & 85.17 & NA & NA & 0.146819 & NA \tabularnewline
3 & 84.93 & NA & NA & 0.118433 & NA \tabularnewline
4 & 85.1 & NA & NA & -0.134796 & NA \tabularnewline
5 & 85.19 & NA & NA & -0.0214106 & NA \tabularnewline
6 & 85.38 & NA & NA & 0.113798 & NA \tabularnewline
7 & 85.95 & 86.0503 & 85.5412 & 0.509058 & -0.100308 \tabularnewline
8 & 86.04 & 86.0212 & 85.6696 & 0.35161 & 0.0188064 \tabularnewline
9 & 85.68 & 85.7101 & 85.8217 & -0.111567 & -0.0300998 \tabularnewline
10 & 85.79 & 85.8552 & 85.9854 & -0.130265 & -0.0651519 \tabularnewline
11 & 85.79 & 85.8163 & 86.1467 & -0.330369 & -0.0262977 \tabularnewline
12 & 86.05 & 86.0523 & 86.2988 & -0.246411 & -0.00233941 \tabularnewline
13 & 86.14 & 86.1759 & 86.4408 & -0.2649 & -0.0359332 \tabularnewline
14 & 86.82 & 86.7235 & 86.5767 & 0.146819 & 0.0965148 \tabularnewline
15 & 86.93 & 86.8163 & 86.6979 & 0.118433 & 0.11365 \tabularnewline
16 & 87.03 & 86.6748 & 86.8096 & -0.134796 & 0.355213 \tabularnewline
17 & 87.13 & 86.8973 & 86.9187 & -0.0214106 & 0.232661 \tabularnewline
18 & 87.09 & 87.1492 & 87.0354 & 0.113798 & -0.0592144 \tabularnewline
19 & 87.65 & 87.6561 & 87.1471 & 0.509058 & -0.00614149 \tabularnewline
20 & 87.6 & 87.592 & 87.2404 & 0.35161 & 0.00797309 \tabularnewline
21 & 87.03 & 87.2263 & 87.3379 & -0.111567 & -0.19635 \tabularnewline
22 & 87.12 & 87.2885 & 87.4188 & -0.130265 & -0.168485 \tabularnewline
23 & 87.08 & 87.1605 & 87.4908 & -0.330369 & -0.0804644 \tabularnewline
24 & 87.56 & 87.3536 & 87.6 & -0.246411 & 0.206411 \tabularnewline
25 & 87.31 & 87.4763 & 87.7413 & -0.2649 & -0.16635 \tabularnewline
26 & 87.89 & 88.0497 & 87.9029 & 0.146819 & -0.159735 \tabularnewline
27 & 88.2 & 88.203 & 88.0846 & 0.118433 & -0.00301649 \tabularnewline
28 & 87.7 & 88.1548 & 88.2896 & -0.134796 & -0.454787 \tabularnewline
29 & 88.19 & 88.489 & 88.5104 & -0.0214106 & -0.299006 \tabularnewline
30 & 88.65 & 88.8488 & 88.735 & 0.113798 & -0.198798 \tabularnewline
31 & 89.48 & 89.4699 & 88.9608 & 0.509058 & 0.0101085 \tabularnewline
32 & 89.65 & 89.5591 & 89.2075 & 0.35161 & 0.0908898 \tabularnewline
33 & 89.34 & 89.3434 & 89.455 & -0.111567 & -0.00343316 \tabularnewline
34 & 89.73 & 89.5777 & 89.7079 & -0.130265 & 0.152348 \tabularnewline
35 & 89.77 & 89.6392 & 89.9696 & -0.330369 & 0.130786 \tabularnewline
36 & 90.26 & 89.9653 & 90.2117 & -0.246411 & 0.294744 \tabularnewline
37 & 90.03 & 90.1705 & 90.4354 & -0.2649 & -0.140516 \tabularnewline
38 & 91.09 & 90.781 & 90.6342 & 0.146819 & 0.309015 \tabularnewline
39 & 90.94 & 90.9493 & 90.8308 & 0.118433 & -0.00926649 \tabularnewline
40 & 91.03 & 90.8848 & 91.0196 & -0.134796 & 0.145213 \tabularnewline
41 & 91.14 & 91.154 & 91.1754 & -0.0214106 & -0.0140061 \tabularnewline
42 & 91.51 & 91.4242 & 91.3104 & 0.113798 & 0.0857856 \tabularnewline
43 & 91.99 & 91.9445 & 91.4354 & 0.509058 & 0.0455252 \tabularnewline
44 & 91.91 & 91.8916 & 91.54 & 0.35161 & 0.0183898 \tabularnewline
45 & 91.8 & 91.5138 & 91.6254 & -0.111567 & 0.28615 \tabularnewline
46 & 91.8 & 91.5785 & 91.7088 & -0.130265 & 0.221515 \tabularnewline
47 & 91.44 & 91.4709 & 91.8013 & -0.330369 & -0.0308811 \tabularnewline
48 & 91.83 & 91.6553 & 91.9017 & -0.246411 & 0.174744 \tabularnewline
49 & 91.46 & 91.7443 & 92.0092 & -0.2649 & -0.284266 \tabularnewline
50 & 92.17 & 92.2697 & 92.1229 & 0.146819 & -0.0997352 \tabularnewline
51 & 91.91 & 92.3576 & 92.2392 & 0.118433 & -0.4476 \tabularnewline
52 & 92.06 & 92.2265 & 92.3613 & -0.134796 & -0.166454 \tabularnewline
53 & 92.33 & 92.4765 & 92.4979 & -0.0214106 & -0.146506 \tabularnewline
54 & 92.73 & 92.74 & 92.6263 & 0.113798 & -0.0100477 \tabularnewline
55 & 93.35 & 93.2882 & 92.7792 & 0.509058 & 0.0617752 \tabularnewline
56 & 93.28 & 93.3129 & 92.9612 & 0.35161 & -0.0328602 \tabularnewline
57 & 93.22 & 93.0388 & 93.1504 & -0.111567 & 0.18115 \tabularnewline
58 & 93.31 & 93.221 & 93.3512 & -0.130265 & 0.0890148 \tabularnewline
59 & 93.21 & 93.2017 & 93.5321 & -0.330369 & 0.00828559 \tabularnewline
60 & 93.14 & 93.454 & 93.7004 & -0.246411 & -0.314006 \tabularnewline
61 & 93.82 & 93.5976 & 93.8625 & -0.2649 & 0.2224 \tabularnewline
62 & 94.18 & 94.1668 & 94.02 & 0.146819 & 0.0131814 \tabularnewline
63 & 94.44 & 94.2868 & 94.1683 & 0.118433 & 0.153234 \tabularnewline
64 & 94.35 & 94.1777 & 94.3125 & -0.134796 & 0.172296 \tabularnewline
65 & 94.38 & 94.449 & 94.4704 & -0.0214106 & -0.0690061 \tabularnewline
66 & 94.72 & 94.7617 & 94.6479 & 0.113798 & -0.0417144 \tabularnewline
67 & 95.25 & 95.3653 & 94.8562 & 0.509058 & -0.115308 \tabularnewline
68 & 95.16 & 95.442 & 95.0904 & 0.35161 & -0.282027 \tabularnewline
69 & 94.9 & 95.2097 & 95.3212 & -0.111567 & -0.309683 \tabularnewline
70 & 95.09 & 95.416 & 95.5462 & -0.130265 & -0.325985 \tabularnewline
71 & 95.22 & 95.4596 & 95.79 & -0.330369 & -0.239631 \tabularnewline
72 & 95.39 & 95.8069 & 96.0533 & -0.246411 & -0.416923 \tabularnewline
73 & 96.57 & 96.0547 & 96.3196 & -0.2649 & 0.515317 \tabularnewline
74 & 97.05 & 96.736 & 96.5892 & 0.146819 & 0.314015 \tabularnewline
75 & 97.11 & 96.9759 & 96.8575 & 0.118433 & 0.134067 \tabularnewline
76 & 97.08 & 96.984 & 97.1188 & -0.134796 & 0.096046 \tabularnewline
77 & 97.5 & 97.3507 & 97.3721 & -0.0214106 & 0.149327 \tabularnewline
78 & 97.92 & 97.7334 & 97.6196 & 0.113798 & 0.186619 \tabularnewline
79 & 98.44 & 98.3291 & 97.82 & 0.509058 & 0.110942 \tabularnewline
80 & 98.44 & 98.3283 & 97.9767 & 0.35161 & 0.111723 \tabularnewline
81 & 98.06 & 98.0426 & 98.1542 & -0.111567 & 0.0174002 \tabularnewline
82 & 98.2 & 98.1993 & 98.3296 & -0.130265 & 0.000681424 \tabularnewline
83 & 98.19 & 98.1688 & 98.4992 & -0.330369 & 0.0212023 \tabularnewline
84 & 98.36 & 98.4361 & 98.6825 & -0.246411 & -0.0760894 \tabularnewline
85 & 98.41 & 98.6001 & 98.865 & -0.2649 & -0.1901 \tabularnewline
86 & 98.97 & 99.1989 & 99.0521 & 0.146819 & -0.228902 \tabularnewline
87 & 99.45 & 99.3672 & 99.2488 & 0.118433 & 0.0828168 \tabularnewline
88 & 98.95 & 99.319 & 99.4538 & -0.134796 & -0.368954 \tabularnewline
89 & 99.7 & 99.6478 & 99.6692 & -0.0214106 & 0.0522439 \tabularnewline
90 & 100.12 & 100.005 & 99.8912 & 0.113798 & 0.114952 \tabularnewline
91 & 100.62 & 100.625 & 100.116 & 0.509058 & -0.00489149 \tabularnewline
92 & 100.75 & 100.681 & 100.33 & 0.35161 & 0.0688064 \tabularnewline
93 & 100.47 & 100.413 & 100.525 & -0.111567 & 0.0565668 \tabularnewline
94 & 100.71 & 100.612 & 100.742 & -0.130265 & 0.0977648 \tabularnewline
95 & 100.85 & 100.631 & 100.962 & -0.330369 & 0.218702 \tabularnewline
96 & 101.03 & 100.895 & 101.141 & -0.246411 & 0.135161 \tabularnewline
97 & 101.13 & 101.049 & 101.314 & -0.2649 & 0.0811502 \tabularnewline
98 & 101.38 & 101.623 & 101.476 & 0.146819 & -0.242652 \tabularnewline
99 & 101.73 & 101.752 & 101.634 & 0.118433 & -0.0221832 \tabularnewline
100 & 101.89 & 101.667 & 101.802 & -0.134796 & 0.223129 \tabularnewline
101 & 102.02 & 101.924 & 101.945 & -0.0214106 & 0.0959939 \tabularnewline
102 & 102.11 & 102.186 & 102.072 & 0.113798 & -0.0758811 \tabularnewline
103 & 102.77 & NA & NA & 0.509058 & NA \tabularnewline
104 & 102.49 & NA & NA & 0.35161 & NA \tabularnewline
105 & 102.52 & NA & NA & -0.111567 & NA \tabularnewline
106 & 102.69 & NA & NA & -0.130265 & NA \tabularnewline
107 & 102.32 & NA & NA & -0.330369 & NA \tabularnewline
108 & 102.6 & NA & NA & -0.246411 & NA \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=284406&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]84.71[/C][C]NA[/C][C]NA[/C][C]-0.2649[/C][C]NA[/C][/ROW]
[ROW][C]2[/C][C]85.17[/C][C]NA[/C][C]NA[/C][C]0.146819[/C][C]NA[/C][/ROW]
[ROW][C]3[/C][C]84.93[/C][C]NA[/C][C]NA[/C][C]0.118433[/C][C]NA[/C][/ROW]
[ROW][C]4[/C][C]85.1[/C][C]NA[/C][C]NA[/C][C]-0.134796[/C][C]NA[/C][/ROW]
[ROW][C]5[/C][C]85.19[/C][C]NA[/C][C]NA[/C][C]-0.0214106[/C][C]NA[/C][/ROW]
[ROW][C]6[/C][C]85.38[/C][C]NA[/C][C]NA[/C][C]0.113798[/C][C]NA[/C][/ROW]
[ROW][C]7[/C][C]85.95[/C][C]86.0503[/C][C]85.5412[/C][C]0.509058[/C][C]-0.100308[/C][/ROW]
[ROW][C]8[/C][C]86.04[/C][C]86.0212[/C][C]85.6696[/C][C]0.35161[/C][C]0.0188064[/C][/ROW]
[ROW][C]9[/C][C]85.68[/C][C]85.7101[/C][C]85.8217[/C][C]-0.111567[/C][C]-0.0300998[/C][/ROW]
[ROW][C]10[/C][C]85.79[/C][C]85.8552[/C][C]85.9854[/C][C]-0.130265[/C][C]-0.0651519[/C][/ROW]
[ROW][C]11[/C][C]85.79[/C][C]85.8163[/C][C]86.1467[/C][C]-0.330369[/C][C]-0.0262977[/C][/ROW]
[ROW][C]12[/C][C]86.05[/C][C]86.0523[/C][C]86.2988[/C][C]-0.246411[/C][C]-0.00233941[/C][/ROW]
[ROW][C]13[/C][C]86.14[/C][C]86.1759[/C][C]86.4408[/C][C]-0.2649[/C][C]-0.0359332[/C][/ROW]
[ROW][C]14[/C][C]86.82[/C][C]86.7235[/C][C]86.5767[/C][C]0.146819[/C][C]0.0965148[/C][/ROW]
[ROW][C]15[/C][C]86.93[/C][C]86.8163[/C][C]86.6979[/C][C]0.118433[/C][C]0.11365[/C][/ROW]
[ROW][C]16[/C][C]87.03[/C][C]86.6748[/C][C]86.8096[/C][C]-0.134796[/C][C]0.355213[/C][/ROW]
[ROW][C]17[/C][C]87.13[/C][C]86.8973[/C][C]86.9187[/C][C]-0.0214106[/C][C]0.232661[/C][/ROW]
[ROW][C]18[/C][C]87.09[/C][C]87.1492[/C][C]87.0354[/C][C]0.113798[/C][C]-0.0592144[/C][/ROW]
[ROW][C]19[/C][C]87.65[/C][C]87.6561[/C][C]87.1471[/C][C]0.509058[/C][C]-0.00614149[/C][/ROW]
[ROW][C]20[/C][C]87.6[/C][C]87.592[/C][C]87.2404[/C][C]0.35161[/C][C]0.00797309[/C][/ROW]
[ROW][C]21[/C][C]87.03[/C][C]87.2263[/C][C]87.3379[/C][C]-0.111567[/C][C]-0.19635[/C][/ROW]
[ROW][C]22[/C][C]87.12[/C][C]87.2885[/C][C]87.4188[/C][C]-0.130265[/C][C]-0.168485[/C][/ROW]
[ROW][C]23[/C][C]87.08[/C][C]87.1605[/C][C]87.4908[/C][C]-0.330369[/C][C]-0.0804644[/C][/ROW]
[ROW][C]24[/C][C]87.56[/C][C]87.3536[/C][C]87.6[/C][C]-0.246411[/C][C]0.206411[/C][/ROW]
[ROW][C]25[/C][C]87.31[/C][C]87.4763[/C][C]87.7413[/C][C]-0.2649[/C][C]-0.16635[/C][/ROW]
[ROW][C]26[/C][C]87.89[/C][C]88.0497[/C][C]87.9029[/C][C]0.146819[/C][C]-0.159735[/C][/ROW]
[ROW][C]27[/C][C]88.2[/C][C]88.203[/C][C]88.0846[/C][C]0.118433[/C][C]-0.00301649[/C][/ROW]
[ROW][C]28[/C][C]87.7[/C][C]88.1548[/C][C]88.2896[/C][C]-0.134796[/C][C]-0.454787[/C][/ROW]
[ROW][C]29[/C][C]88.19[/C][C]88.489[/C][C]88.5104[/C][C]-0.0214106[/C][C]-0.299006[/C][/ROW]
[ROW][C]30[/C][C]88.65[/C][C]88.8488[/C][C]88.735[/C][C]0.113798[/C][C]-0.198798[/C][/ROW]
[ROW][C]31[/C][C]89.48[/C][C]89.4699[/C][C]88.9608[/C][C]0.509058[/C][C]0.0101085[/C][/ROW]
[ROW][C]32[/C][C]89.65[/C][C]89.5591[/C][C]89.2075[/C][C]0.35161[/C][C]0.0908898[/C][/ROW]
[ROW][C]33[/C][C]89.34[/C][C]89.3434[/C][C]89.455[/C][C]-0.111567[/C][C]-0.00343316[/C][/ROW]
[ROW][C]34[/C][C]89.73[/C][C]89.5777[/C][C]89.7079[/C][C]-0.130265[/C][C]0.152348[/C][/ROW]
[ROW][C]35[/C][C]89.77[/C][C]89.6392[/C][C]89.9696[/C][C]-0.330369[/C][C]0.130786[/C][/ROW]
[ROW][C]36[/C][C]90.26[/C][C]89.9653[/C][C]90.2117[/C][C]-0.246411[/C][C]0.294744[/C][/ROW]
[ROW][C]37[/C][C]90.03[/C][C]90.1705[/C][C]90.4354[/C][C]-0.2649[/C][C]-0.140516[/C][/ROW]
[ROW][C]38[/C][C]91.09[/C][C]90.781[/C][C]90.6342[/C][C]0.146819[/C][C]0.309015[/C][/ROW]
[ROW][C]39[/C][C]90.94[/C][C]90.9493[/C][C]90.8308[/C][C]0.118433[/C][C]-0.00926649[/C][/ROW]
[ROW][C]40[/C][C]91.03[/C][C]90.8848[/C][C]91.0196[/C][C]-0.134796[/C][C]0.145213[/C][/ROW]
[ROW][C]41[/C][C]91.14[/C][C]91.154[/C][C]91.1754[/C][C]-0.0214106[/C][C]-0.0140061[/C][/ROW]
[ROW][C]42[/C][C]91.51[/C][C]91.4242[/C][C]91.3104[/C][C]0.113798[/C][C]0.0857856[/C][/ROW]
[ROW][C]43[/C][C]91.99[/C][C]91.9445[/C][C]91.4354[/C][C]0.509058[/C][C]0.0455252[/C][/ROW]
[ROW][C]44[/C][C]91.91[/C][C]91.8916[/C][C]91.54[/C][C]0.35161[/C][C]0.0183898[/C][/ROW]
[ROW][C]45[/C][C]91.8[/C][C]91.5138[/C][C]91.6254[/C][C]-0.111567[/C][C]0.28615[/C][/ROW]
[ROW][C]46[/C][C]91.8[/C][C]91.5785[/C][C]91.7088[/C][C]-0.130265[/C][C]0.221515[/C][/ROW]
[ROW][C]47[/C][C]91.44[/C][C]91.4709[/C][C]91.8013[/C][C]-0.330369[/C][C]-0.0308811[/C][/ROW]
[ROW][C]48[/C][C]91.83[/C][C]91.6553[/C][C]91.9017[/C][C]-0.246411[/C][C]0.174744[/C][/ROW]
[ROW][C]49[/C][C]91.46[/C][C]91.7443[/C][C]92.0092[/C][C]-0.2649[/C][C]-0.284266[/C][/ROW]
[ROW][C]50[/C][C]92.17[/C][C]92.2697[/C][C]92.1229[/C][C]0.146819[/C][C]-0.0997352[/C][/ROW]
[ROW][C]51[/C][C]91.91[/C][C]92.3576[/C][C]92.2392[/C][C]0.118433[/C][C]-0.4476[/C][/ROW]
[ROW][C]52[/C][C]92.06[/C][C]92.2265[/C][C]92.3613[/C][C]-0.134796[/C][C]-0.166454[/C][/ROW]
[ROW][C]53[/C][C]92.33[/C][C]92.4765[/C][C]92.4979[/C][C]-0.0214106[/C][C]-0.146506[/C][/ROW]
[ROW][C]54[/C][C]92.73[/C][C]92.74[/C][C]92.6263[/C][C]0.113798[/C][C]-0.0100477[/C][/ROW]
[ROW][C]55[/C][C]93.35[/C][C]93.2882[/C][C]92.7792[/C][C]0.509058[/C][C]0.0617752[/C][/ROW]
[ROW][C]56[/C][C]93.28[/C][C]93.3129[/C][C]92.9612[/C][C]0.35161[/C][C]-0.0328602[/C][/ROW]
[ROW][C]57[/C][C]93.22[/C][C]93.0388[/C][C]93.1504[/C][C]-0.111567[/C][C]0.18115[/C][/ROW]
[ROW][C]58[/C][C]93.31[/C][C]93.221[/C][C]93.3512[/C][C]-0.130265[/C][C]0.0890148[/C][/ROW]
[ROW][C]59[/C][C]93.21[/C][C]93.2017[/C][C]93.5321[/C][C]-0.330369[/C][C]0.00828559[/C][/ROW]
[ROW][C]60[/C][C]93.14[/C][C]93.454[/C][C]93.7004[/C][C]-0.246411[/C][C]-0.314006[/C][/ROW]
[ROW][C]61[/C][C]93.82[/C][C]93.5976[/C][C]93.8625[/C][C]-0.2649[/C][C]0.2224[/C][/ROW]
[ROW][C]62[/C][C]94.18[/C][C]94.1668[/C][C]94.02[/C][C]0.146819[/C][C]0.0131814[/C][/ROW]
[ROW][C]63[/C][C]94.44[/C][C]94.2868[/C][C]94.1683[/C][C]0.118433[/C][C]0.153234[/C][/ROW]
[ROW][C]64[/C][C]94.35[/C][C]94.1777[/C][C]94.3125[/C][C]-0.134796[/C][C]0.172296[/C][/ROW]
[ROW][C]65[/C][C]94.38[/C][C]94.449[/C][C]94.4704[/C][C]-0.0214106[/C][C]-0.0690061[/C][/ROW]
[ROW][C]66[/C][C]94.72[/C][C]94.7617[/C][C]94.6479[/C][C]0.113798[/C][C]-0.0417144[/C][/ROW]
[ROW][C]67[/C][C]95.25[/C][C]95.3653[/C][C]94.8562[/C][C]0.509058[/C][C]-0.115308[/C][/ROW]
[ROW][C]68[/C][C]95.16[/C][C]95.442[/C][C]95.0904[/C][C]0.35161[/C][C]-0.282027[/C][/ROW]
[ROW][C]69[/C][C]94.9[/C][C]95.2097[/C][C]95.3212[/C][C]-0.111567[/C][C]-0.309683[/C][/ROW]
[ROW][C]70[/C][C]95.09[/C][C]95.416[/C][C]95.5462[/C][C]-0.130265[/C][C]-0.325985[/C][/ROW]
[ROW][C]71[/C][C]95.22[/C][C]95.4596[/C][C]95.79[/C][C]-0.330369[/C][C]-0.239631[/C][/ROW]
[ROW][C]72[/C][C]95.39[/C][C]95.8069[/C][C]96.0533[/C][C]-0.246411[/C][C]-0.416923[/C][/ROW]
[ROW][C]73[/C][C]96.57[/C][C]96.0547[/C][C]96.3196[/C][C]-0.2649[/C][C]0.515317[/C][/ROW]
[ROW][C]74[/C][C]97.05[/C][C]96.736[/C][C]96.5892[/C][C]0.146819[/C][C]0.314015[/C][/ROW]
[ROW][C]75[/C][C]97.11[/C][C]96.9759[/C][C]96.8575[/C][C]0.118433[/C][C]0.134067[/C][/ROW]
[ROW][C]76[/C][C]97.08[/C][C]96.984[/C][C]97.1188[/C][C]-0.134796[/C][C]0.096046[/C][/ROW]
[ROW][C]77[/C][C]97.5[/C][C]97.3507[/C][C]97.3721[/C][C]-0.0214106[/C][C]0.149327[/C][/ROW]
[ROW][C]78[/C][C]97.92[/C][C]97.7334[/C][C]97.6196[/C][C]0.113798[/C][C]0.186619[/C][/ROW]
[ROW][C]79[/C][C]98.44[/C][C]98.3291[/C][C]97.82[/C][C]0.509058[/C][C]0.110942[/C][/ROW]
[ROW][C]80[/C][C]98.44[/C][C]98.3283[/C][C]97.9767[/C][C]0.35161[/C][C]0.111723[/C][/ROW]
[ROW][C]81[/C][C]98.06[/C][C]98.0426[/C][C]98.1542[/C][C]-0.111567[/C][C]0.0174002[/C][/ROW]
[ROW][C]82[/C][C]98.2[/C][C]98.1993[/C][C]98.3296[/C][C]-0.130265[/C][C]0.000681424[/C][/ROW]
[ROW][C]83[/C][C]98.19[/C][C]98.1688[/C][C]98.4992[/C][C]-0.330369[/C][C]0.0212023[/C][/ROW]
[ROW][C]84[/C][C]98.36[/C][C]98.4361[/C][C]98.6825[/C][C]-0.246411[/C][C]-0.0760894[/C][/ROW]
[ROW][C]85[/C][C]98.41[/C][C]98.6001[/C][C]98.865[/C][C]-0.2649[/C][C]-0.1901[/C][/ROW]
[ROW][C]86[/C][C]98.97[/C][C]99.1989[/C][C]99.0521[/C][C]0.146819[/C][C]-0.228902[/C][/ROW]
[ROW][C]87[/C][C]99.45[/C][C]99.3672[/C][C]99.2488[/C][C]0.118433[/C][C]0.0828168[/C][/ROW]
[ROW][C]88[/C][C]98.95[/C][C]99.319[/C][C]99.4538[/C][C]-0.134796[/C][C]-0.368954[/C][/ROW]
[ROW][C]89[/C][C]99.7[/C][C]99.6478[/C][C]99.6692[/C][C]-0.0214106[/C][C]0.0522439[/C][/ROW]
[ROW][C]90[/C][C]100.12[/C][C]100.005[/C][C]99.8912[/C][C]0.113798[/C][C]0.114952[/C][/ROW]
[ROW][C]91[/C][C]100.62[/C][C]100.625[/C][C]100.116[/C][C]0.509058[/C][C]-0.00489149[/C][/ROW]
[ROW][C]92[/C][C]100.75[/C][C]100.681[/C][C]100.33[/C][C]0.35161[/C][C]0.0688064[/C][/ROW]
[ROW][C]93[/C][C]100.47[/C][C]100.413[/C][C]100.525[/C][C]-0.111567[/C][C]0.0565668[/C][/ROW]
[ROW][C]94[/C][C]100.71[/C][C]100.612[/C][C]100.742[/C][C]-0.130265[/C][C]0.0977648[/C][/ROW]
[ROW][C]95[/C][C]100.85[/C][C]100.631[/C][C]100.962[/C][C]-0.330369[/C][C]0.218702[/C][/ROW]
[ROW][C]96[/C][C]101.03[/C][C]100.895[/C][C]101.141[/C][C]-0.246411[/C][C]0.135161[/C][/ROW]
[ROW][C]97[/C][C]101.13[/C][C]101.049[/C][C]101.314[/C][C]-0.2649[/C][C]0.0811502[/C][/ROW]
[ROW][C]98[/C][C]101.38[/C][C]101.623[/C][C]101.476[/C][C]0.146819[/C][C]-0.242652[/C][/ROW]
[ROW][C]99[/C][C]101.73[/C][C]101.752[/C][C]101.634[/C][C]0.118433[/C][C]-0.0221832[/C][/ROW]
[ROW][C]100[/C][C]101.89[/C][C]101.667[/C][C]101.802[/C][C]-0.134796[/C][C]0.223129[/C][/ROW]
[ROW][C]101[/C][C]102.02[/C][C]101.924[/C][C]101.945[/C][C]-0.0214106[/C][C]0.0959939[/C][/ROW]
[ROW][C]102[/C][C]102.11[/C][C]102.186[/C][C]102.072[/C][C]0.113798[/C][C]-0.0758811[/C][/ROW]
[ROW][C]103[/C][C]102.77[/C][C]NA[/C][C]NA[/C][C]0.509058[/C][C]NA[/C][/ROW]
[ROW][C]104[/C][C]102.49[/C][C]NA[/C][C]NA[/C][C]0.35161[/C][C]NA[/C][/ROW]
[ROW][C]105[/C][C]102.52[/C][C]NA[/C][C]NA[/C][C]-0.111567[/C][C]NA[/C][/ROW]
[ROW][C]106[/C][C]102.69[/C][C]NA[/C][C]NA[/C][C]-0.130265[/C][C]NA[/C][/ROW]
[ROW][C]107[/C][C]102.32[/C][C]NA[/C][C]NA[/C][C]-0.330369[/C][C]NA[/C][/ROW]
[ROW][C]108[/C][C]102.6[/C][C]NA[/C][C]NA[/C][C]-0.246411[/C][C]NA[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=284406&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=284406&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	84.71	NA	NA	-0.2649	NA
2	85.17	NA	NA	0.146819	NA
3	84.93	NA	NA	0.118433	NA
4	85.1	NA	NA	-0.134796	NA
5	85.19	NA	NA	-0.0214106	NA
6	85.38	NA	NA	0.113798	NA
7	85.95	86.0503	85.5412	0.509058	-0.100308
8	86.04	86.0212	85.6696	0.35161	0.0188064
9	85.68	85.7101	85.8217	-0.111567	-0.0300998
10	85.79	85.8552	85.9854	-0.130265	-0.0651519
11	85.79	85.8163	86.1467	-0.330369	-0.0262977
12	86.05	86.0523	86.2988	-0.246411	-0.00233941
13	86.14	86.1759	86.4408	-0.2649	-0.0359332
14	86.82	86.7235	86.5767	0.146819	0.0965148
15	86.93	86.8163	86.6979	0.118433	0.11365
16	87.03	86.6748	86.8096	-0.134796	0.355213
17	87.13	86.8973	86.9187	-0.0214106	0.232661
18	87.09	87.1492	87.0354	0.113798	-0.0592144
19	87.65	87.6561	87.1471	0.509058	-0.00614149
20	87.6	87.592	87.2404	0.35161	0.00797309
21	87.03	87.2263	87.3379	-0.111567	-0.19635
22	87.12	87.2885	87.4188	-0.130265	-0.168485
23	87.08	87.1605	87.4908	-0.330369	-0.0804644
24	87.56	87.3536	87.6	-0.246411	0.206411
25	87.31	87.4763	87.7413	-0.2649	-0.16635
26	87.89	88.0497	87.9029	0.146819	-0.159735
27	88.2	88.203	88.0846	0.118433	-0.00301649
28	87.7	88.1548	88.2896	-0.134796	-0.454787
29	88.19	88.489	88.5104	-0.0214106	-0.299006
30	88.65	88.8488	88.735	0.113798	-0.198798
31	89.48	89.4699	88.9608	0.509058	0.0101085
32	89.65	89.5591	89.2075	0.35161	0.0908898
33	89.34	89.3434	89.455	-0.111567	-0.00343316
34	89.73	89.5777	89.7079	-0.130265	0.152348
35	89.77	89.6392	89.9696	-0.330369	0.130786
36	90.26	89.9653	90.2117	-0.246411	0.294744
37	90.03	90.1705	90.4354	-0.2649	-0.140516
38	91.09	90.781	90.6342	0.146819	0.309015
39	90.94	90.9493	90.8308	0.118433	-0.00926649
40	91.03	90.8848	91.0196	-0.134796	0.145213
41	91.14	91.154	91.1754	-0.0214106	-0.0140061
42	91.51	91.4242	91.3104	0.113798	0.0857856
43	91.99	91.9445	91.4354	0.509058	0.0455252
44	91.91	91.8916	91.54	0.35161	0.0183898
45	91.8	91.5138	91.6254	-0.111567	0.28615
46	91.8	91.5785	91.7088	-0.130265	0.221515
47	91.44	91.4709	91.8013	-0.330369	-0.0308811
48	91.83	91.6553	91.9017	-0.246411	0.174744
49	91.46	91.7443	92.0092	-0.2649	-0.284266
50	92.17	92.2697	92.1229	0.146819	-0.0997352
51	91.91	92.3576	92.2392	0.118433	-0.4476
52	92.06	92.2265	92.3613	-0.134796	-0.166454
53	92.33	92.4765	92.4979	-0.0214106	-0.146506
54	92.73	92.74	92.6263	0.113798	-0.0100477
55	93.35	93.2882	92.7792	0.509058	0.0617752
56	93.28	93.3129	92.9612	0.35161	-0.0328602
57	93.22	93.0388	93.1504	-0.111567	0.18115
58	93.31	93.221	93.3512	-0.130265	0.0890148
59	93.21	93.2017	93.5321	-0.330369	0.00828559
60	93.14	93.454	93.7004	-0.246411	-0.314006
61	93.82	93.5976	93.8625	-0.2649	0.2224
62	94.18	94.1668	94.02	0.146819	0.0131814
63	94.44	94.2868	94.1683	0.118433	0.153234
64	94.35	94.1777	94.3125	-0.134796	0.172296
65	94.38	94.449	94.4704	-0.0214106	-0.0690061
66	94.72	94.7617	94.6479	0.113798	-0.0417144
67	95.25	95.3653	94.8562	0.509058	-0.115308
68	95.16	95.442	95.0904	0.35161	-0.282027
69	94.9	95.2097	95.3212	-0.111567	-0.309683
70	95.09	95.416	95.5462	-0.130265	-0.325985
71	95.22	95.4596	95.79	-0.330369	-0.239631
72	95.39	95.8069	96.0533	-0.246411	-0.416923
73	96.57	96.0547	96.3196	-0.2649	0.515317
74	97.05	96.736	96.5892	0.146819	0.314015
75	97.11	96.9759	96.8575	0.118433	0.134067
76	97.08	96.984	97.1188	-0.134796	0.096046
77	97.5	97.3507	97.3721	-0.0214106	0.149327
78	97.92	97.7334	97.6196	0.113798	0.186619
79	98.44	98.3291	97.82	0.509058	0.110942
80	98.44	98.3283	97.9767	0.35161	0.111723
81	98.06	98.0426	98.1542	-0.111567	0.0174002
82	98.2	98.1993	98.3296	-0.130265	0.000681424
83	98.19	98.1688	98.4992	-0.330369	0.0212023
84	98.36	98.4361	98.6825	-0.246411	-0.0760894
85	98.41	98.6001	98.865	-0.2649	-0.1901
86	98.97	99.1989	99.0521	0.146819	-0.228902
87	99.45	99.3672	99.2488	0.118433	0.0828168
88	98.95	99.319	99.4538	-0.134796	-0.368954
89	99.7	99.6478	99.6692	-0.0214106	0.0522439
90	100.12	100.005	99.8912	0.113798	0.114952
91	100.62	100.625	100.116	0.509058	-0.00489149
92	100.75	100.681	100.33	0.35161	0.0688064
93	100.47	100.413	100.525	-0.111567	0.0565668
94	100.71	100.612	100.742	-0.130265	0.0977648
95	100.85	100.631	100.962	-0.330369	0.218702
96	101.03	100.895	101.141	-0.246411	0.135161
97	101.13	101.049	101.314	-0.2649	0.0811502
98	101.38	101.623	101.476	0.146819	-0.242652
99	101.73	101.752	101.634	0.118433	-0.0221832
100	101.89	101.667	101.802	-0.134796	0.223129
101	102.02	101.924	101.945	-0.0214106	0.0959939
102	102.11	102.186	102.072	0.113798	-0.0758811
103	102.77	NA	NA	0.509058	NA
104	102.49	NA	NA	0.35161	NA
105	102.52	NA	NA	-0.111567	NA
106	102.69	NA	NA	-0.130265	NA
107	102.32	NA	NA	-0.330369	NA
108	102.6	NA	NA	-0.246411	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