FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_autocorrelation.wasp
Title produced by software(Partial) Autocorrelation Function
Date of computationSat, 09 Dec 2017 15:06:43 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2017/Dec/09/t15128284674wlyxn37nq6dkqe.htm/, Retrieved Tue, 14 May 2024 17:08:26 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=308861, Retrieved Tue, 14 May 2024 17:08:26 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact89

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [(Partial) Autocorrelation Function] [Autocorrelation F...] [2017-12-09 14:06:43] [71733e7e3fc4cdee2971288e32d35d04] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
57.7
60.1
66.5
63.4
71.4
68.5
61.6
68.3
69.3
76.1
73.3
69.7
67.4
63.7
73
67.5
74.4
72.9
71.7
75.6
72.5
80
75.4
71
70.6
67.5
74.1
73.2
74
73
74
73
76
81.7
73.5
77
73.6
70.4
74.7
76.8
72.7
76
77.5
73.6
78.5
84.3
74.4
78.5
72.7
71.3
84.4
79.1
76.2
84.9
77.1
78.7
84.7
83.7
82.5
85.2
76
72.2
83.2
80.2
81.1
86
76
83.9
87.9
85
88.1
87.4
79.5
75.2
87.3
79.5
87.6
89.1
83
88.3
88.9
93.9
91.7
87.2
87.8
81
93.7
87.5
91.4
93.8
89.5
93.3
92.8
104.1
99.9
93.4
99
93.2
95.7
102.6
98.8
98
101.5
94.9
104.7
108.4
97
102.3
90.8
89.6
99.9
99.2
94
103
99.8
94.9
102
103.2
98
101.1
88.2
90.3
105.5
99.4
94.3
105.9
98
99
103.9
104.3
105.7
105.5
97.4
95.4
110.5
102.8
110
104.3
96.5
105.6
111.3
108.5
109.1
107.7
102.3
102.4
110.8
101.7
108.9
111.5
104
109.9
106.8
118.4
111.8
105
104.9
96.5
106.3
105.6
109.3
105.1
111.5
103.1
106.5
114.4
104.7
105.5
100.5
96.4
105.1
108.4
105.7
109
107.2
101.6
112.7
115.9
105
110.4
100.9
98.5
111.3
109.6
103.4
115.7
110.4
105.2
113.2
117.4
112.3
113.9
102.2
106.9
118
113.8
114.9
118.8
106.3
114.2
117.3
114.7
117
116.6
106.5
105.7
121
107.8
119.7
121
108.8
115

Tables (Output of Computation)





Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input view raw input (R code)  \tabularnewline
Raw Outputview raw output of R engine  \tabularnewline
Computing time1 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=308861&T=0

[TABLE]
[ROW]
Summary of computational transaction[/C][/ROW] [ROW]Raw Input[/C] view raw input (R code) [/C][/ROW] [ROW]Raw Output[/C]view raw output of R engine [/C][/ROW] [ROW]Computing time[/C]1 seconds[/C][/ROW] [ROW]R Server[/C]Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=308861&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=308861&T=0

As an alternative you can also use a QR Code:  
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 Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center






Autocorrelation Function
Time lag kACF(k)T-STATP-value
10.89950213.09690
20.87423512.72910
30.87646212.76150
40.8209911.95380
50.8473512.33760
60.8555512.4570
70.80766211.75970
80.78963111.49720
90.79806611.620
100.76467911.13390
110.78790811.47210
120.81280711.83470
130.74184410.80140
140.73229110.66230
150.70763510.30330
160.6656429.69190
170.69898910.17740
180.68915210.03420
190.6527579.50430
200.6496049.45840
210.6341029.23270
220.6183199.00290
230.648769.44610
240.6425429.35560
250.6013738.75610
260.5878638.55940
270.5511178.02440
280.5381937.83620
290.5568078.10720
300.5387927.84490
310.529217.70540
320.5106157.43470
330.4912027.1520
340.498537.25870
350.50357.33110
360.5035887.33240
370.4846157.05610
380.4432766.45420
390.4225636.15260
400.4189656.10020
410.4150486.04320
420.4088845.95340
430.407085.92720
440.3690615.37360
450.3627385.28160
460.3775135.49670
470.3569125.19670
480.376045.47520

\begin{tabular}{lllllllll}
\hline
Autocorrelation Function \tabularnewline
Time lag k & ACF(k) & T-STAT & P-value \tabularnewline
1 & 0.899502 & 13.0969 & 0 \tabularnewline
2 & 0.874235 & 12.7291 & 0 \tabularnewline
3 & 0.876462 & 12.7615 & 0 \tabularnewline
4 & 0.82099 & 11.9538 & 0 \tabularnewline
5 & 0.84735 & 12.3376 & 0 \tabularnewline
6 & 0.85555 & 12.457 & 0 \tabularnewline
7 & 0.807662 & 11.7597 & 0 \tabularnewline
8 & 0.789631 & 11.4972 & 0 \tabularnewline
9 & 0.798066 & 11.62 & 0 \tabularnewline
10 & 0.764679 & 11.1339 & 0 \tabularnewline
11 & 0.787908 & 11.4721 & 0 \tabularnewline
12 & 0.812807 & 11.8347 & 0 \tabularnewline
13 & 0.741844 & 10.8014 & 0 \tabularnewline
14 & 0.732291 & 10.6623 & 0 \tabularnewline
15 & 0.707635 & 10.3033 & 0 \tabularnewline
16 & 0.665642 & 9.6919 & 0 \tabularnewline
17 & 0.698989 & 10.1774 & 0 \tabularnewline
18 & 0.689152 & 10.0342 & 0 \tabularnewline
19 & 0.652757 & 9.5043 & 0 \tabularnewline
20 & 0.649604 & 9.4584 & 0 \tabularnewline
21 & 0.634102 & 9.2327 & 0 \tabularnewline
22 & 0.618319 & 9.0029 & 0 \tabularnewline
23 & 0.64876 & 9.4461 & 0 \tabularnewline
24 & 0.642542 & 9.3556 & 0 \tabularnewline
25 & 0.601373 & 8.7561 & 0 \tabularnewline
26 & 0.587863 & 8.5594 & 0 \tabularnewline
27 & 0.551117 & 8.0244 & 0 \tabularnewline
28 & 0.538193 & 7.8362 & 0 \tabularnewline
29 & 0.556807 & 8.1072 & 0 \tabularnewline
30 & 0.538792 & 7.8449 & 0 \tabularnewline
31 & 0.52921 & 7.7054 & 0 \tabularnewline
32 & 0.510615 & 7.4347 & 0 \tabularnewline
33 & 0.491202 & 7.152 & 0 \tabularnewline
34 & 0.49853 & 7.2587 & 0 \tabularnewline
35 & 0.5035 & 7.3311 & 0 \tabularnewline
36 & 0.503588 & 7.3324 & 0 \tabularnewline
37 & 0.484615 & 7.0561 & 0 \tabularnewline
38 & 0.443276 & 6.4542 & 0 \tabularnewline
39 & 0.422563 & 6.1526 & 0 \tabularnewline
40 & 0.418965 & 6.1002 & 0 \tabularnewline
41 & 0.415048 & 6.0432 & 0 \tabularnewline
42 & 0.408884 & 5.9534 & 0 \tabularnewline
43 & 0.40708 & 5.9272 & 0 \tabularnewline
44 & 0.369061 & 5.3736 & 0 \tabularnewline
45 & 0.362738 & 5.2816 & 0 \tabularnewline
46 & 0.377513 & 5.4967 & 0 \tabularnewline
47 & 0.356912 & 5.1967 & 0 \tabularnewline
48 & 0.37604 & 5.4752 & 0 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=308861&T=1

[TABLE]
[ROW][C]Autocorrelation Function[/C][/ROW]
[ROW][C]Time lag k[/C][C]ACF(k)[/C][C]T-STAT[/C][C]P-value[/C][/ROW]
[ROW][C]1[/C][C]0.899502[/C][C]13.0969[/C][C]0[/C][/ROW]
[ROW][C]2[/C][C]0.874235[/C][C]12.7291[/C][C]0[/C][/ROW]
[ROW][C]3[/C][C]0.876462[/C][C]12.7615[/C][C]0[/C][/ROW]
[ROW][C]4[/C][C]0.82099[/C][C]11.9538[/C][C]0[/C][/ROW]
[ROW][C]5[/C][C]0.84735[/C][C]12.3376[/C][C]0[/C][/ROW]
[ROW][C]6[/C][C]0.85555[/C][C]12.457[/C][C]0[/C][/ROW]
[ROW][C]7[/C][C]0.807662[/C][C]11.7597[/C][C]0[/C][/ROW]
[ROW][C]8[/C][C]0.789631[/C][C]11.4972[/C][C]0[/C][/ROW]
[ROW][C]9[/C][C]0.798066[/C][C]11.62[/C][C]0[/C][/ROW]
[ROW][C]10[/C][C]0.764679[/C][C]11.1339[/C][C]0[/C][/ROW]
[ROW][C]11[/C][C]0.787908[/C][C]11.4721[/C][C]0[/C][/ROW]
[ROW][C]12[/C][C]0.812807[/C][C]11.8347[/C][C]0[/C][/ROW]
[ROW][C]13[/C][C]0.741844[/C][C]10.8014[/C][C]0[/C][/ROW]
[ROW][C]14[/C][C]0.732291[/C][C]10.6623[/C][C]0[/C][/ROW]
[ROW][C]15[/C][C]0.707635[/C][C]10.3033[/C][C]0[/C][/ROW]
[ROW][C]16[/C][C]0.665642[/C][C]9.6919[/C][C]0[/C][/ROW]
[ROW][C]17[/C][C]0.698989[/C][C]10.1774[/C][C]0[/C][/ROW]
[ROW][C]18[/C][C]0.689152[/C][C]10.0342[/C][C]0[/C][/ROW]
[ROW][C]19[/C][C]0.652757[/C][C]9.5043[/C][C]0[/C][/ROW]
[ROW][C]20[/C][C]0.649604[/C][C]9.4584[/C][C]0[/C][/ROW]
[ROW][C]21[/C][C]0.634102[/C][C]9.2327[/C][C]0[/C][/ROW]
[ROW][C]22[/C][C]0.618319[/C][C]9.0029[/C][C]0[/C][/ROW]
[ROW][C]23[/C][C]0.64876[/C][C]9.4461[/C][C]0[/C][/ROW]
[ROW][C]24[/C][C]0.642542[/C][C]9.3556[/C][C]0[/C][/ROW]
[ROW][C]25[/C][C]0.601373[/C][C]8.7561[/C][C]0[/C][/ROW]
[ROW][C]26[/C][C]0.587863[/C][C]8.5594[/C][C]0[/C][/ROW]
[ROW][C]27[/C][C]0.551117[/C][C]8.0244[/C][C]0[/C][/ROW]
[ROW][C]28[/C][C]0.538193[/C][C]7.8362[/C][C]0[/C][/ROW]
[ROW][C]29[/C][C]0.556807[/C][C]8.1072[/C][C]0[/C][/ROW]
[ROW][C]30[/C][C]0.538792[/C][C]7.8449[/C][C]0[/C][/ROW]
[ROW][C]31[/C][C]0.52921[/C][C]7.7054[/C][C]0[/C][/ROW]
[ROW][C]32[/C][C]0.510615[/C][C]7.4347[/C][C]0[/C][/ROW]
[ROW][C]33[/C][C]0.491202[/C][C]7.152[/C][C]0[/C][/ROW]
[ROW][C]34[/C][C]0.49853[/C][C]7.2587[/C][C]0[/C][/ROW]
[ROW][C]35[/C][C]0.5035[/C][C]7.3311[/C][C]0[/C][/ROW]
[ROW][C]36[/C][C]0.503588[/C][C]7.3324[/C][C]0[/C][/ROW]
[ROW][C]37[/C][C]0.484615[/C][C]7.0561[/C][C]0[/C][/ROW]
[ROW][C]38[/C][C]0.443276[/C][C]6.4542[/C][C]0[/C][/ROW]
[ROW][C]39[/C][C]0.422563[/C][C]6.1526[/C][C]0[/C][/ROW]
[ROW][C]40[/C][C]0.418965[/C][C]6.1002[/C][C]0[/C][/ROW]
[ROW][C]41[/C][C]0.415048[/C][C]6.0432[/C][C]0[/C][/ROW]
[ROW][C]42[/C][C]0.408884[/C][C]5.9534[/C][C]0[/C][/ROW]
[ROW][C]43[/C][C]0.40708[/C][C]5.9272[/C][C]0[/C][/ROW]
[ROW][C]44[/C][C]0.369061[/C][C]5.3736[/C][C]0[/C][/ROW]
[ROW][C]45[/C][C]0.362738[/C][C]5.2816[/C][C]0[/C][/ROW]
[ROW][C]46[/C][C]0.377513[/C][C]5.4967[/C][C]0[/C][/ROW]
[ROW][C]47[/C][C]0.356912[/C][C]5.1967[/C][C]0[/C][/ROW]
[ROW][C]48[/C][C]0.37604[/C][C]5.4752[/C][C]0[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=308861&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=308861&T=1

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Autocorrelation Function
Time lag kACF(k)T-STATP-value
10.89950213.09690
20.87423512.72910
30.87646212.76150
40.8209911.95380
50.8473512.33760
60.8555512.4570
70.80766211.75970
80.78963111.49720
90.79806611.620
100.76467911.13390
110.78790811.47210
120.81280711.83470
130.74184410.80140
140.73229110.66230
150.70763510.30330
160.6656429.69190
170.69898910.17740
180.68915210.03420
190.6527579.50430
200.6496049.45840
210.6341029.23270
220.6183199.00290
230.648769.44610
240.6425429.35560
250.6013738.75610
260.5878638.55940
270.5511178.02440
280.5381937.83620
290.5568078.10720
300.5387927.84490
310.529217.70540
320.5106157.43470
330.4912027.1520
340.498537.25870
350.50357.33110
360.5035887.33240
370.4846157.05610
380.4432766.45420
390.4225636.15260
400.4189656.10020
410.4150486.04320
420.4088845.95340
430.407085.92720
440.3690615.37360
450.3627385.28160
460.3775135.49670
470.3569125.19670
480.376045.47520






Partial Autocorrelation Function
Time lag kPACF(k)T-STATP-value
10.89950213.09690
20.3411864.96771e-06
30.3052594.44467e-06
4-0.142737-2.07830.019443
50.3376554.91631e-06
60.159192.31780.010706
7-0.135319-1.97030.025054
8-0.184725-2.68960.003861
90.2475213.6040.000195
10-0.035048-0.51030.305182
110.1439632.09610.018629
120.144992.11110.017968
13-0.28424-4.13862.5e-05
14-0.146538-2.13360.017011
15-0.10588-1.54160.062328
160.0201030.29270.385019
170.0980681.42790.077398
180.0172880.25170.400749
190.006130.08930.46448
200.0071110.10350.458819
210.0303650.44210.329426
220.0552780.80490.210903
230.060070.87460.191381
24-0.035438-0.5160.303203
25-0.049224-0.71670.237172
26-0.135469-1.97250.024928
27-0.030238-0.44030.330092
280.070781.03060.151958
29-0.024736-0.36020.359544
30-0.024037-0.350.363347
310.1093221.59170.056466
32-0.082479-1.20090.115564
330.0260920.37990.352197
340.0668470.97330.165754
35-0.049433-0.71980.236234
360.0635970.9260.177753
37-0.005969-0.08690.465413
38-0.187852-2.73520.003381
390.0365330.53190.297666
400.0089430.13020.448262
41-0.025129-0.36590.357409
42-0.06716-0.97790.164627
430.1138931.65830.049367
44-0.069856-1.01710.155129
450.0065190.09490.462235
460.0736841.07290.142278
47-0.04091-0.59570.276018
480.0184320.26840.394335

\begin{tabular}{lllllllll}
\hline
Partial Autocorrelation Function \tabularnewline
Time lag k & PACF(k) & T-STAT & P-value \tabularnewline
1 & 0.899502 & 13.0969 & 0 \tabularnewline
2 & 0.341186 & 4.9677 & 1e-06 \tabularnewline
3 & 0.305259 & 4.4446 & 7e-06 \tabularnewline
4 & -0.142737 & -2.0783 & 0.019443 \tabularnewline
5 & 0.337655 & 4.9163 & 1e-06 \tabularnewline
6 & 0.15919 & 2.3178 & 0.010706 \tabularnewline
7 & -0.135319 & -1.9703 & 0.025054 \tabularnewline
8 & -0.184725 & -2.6896 & 0.003861 \tabularnewline
9 & 0.247521 & 3.604 & 0.000195 \tabularnewline
10 & -0.035048 & -0.5103 & 0.305182 \tabularnewline
11 & 0.143963 & 2.0961 & 0.018629 \tabularnewline
12 & 0.14499 & 2.1111 & 0.017968 \tabularnewline
13 & -0.28424 & -4.1386 & 2.5e-05 \tabularnewline
14 & -0.146538 & -2.1336 & 0.017011 \tabularnewline
15 & -0.10588 & -1.5416 & 0.062328 \tabularnewline
16 & 0.020103 & 0.2927 & 0.385019 \tabularnewline
17 & 0.098068 & 1.4279 & 0.077398 \tabularnewline
18 & 0.017288 & 0.2517 & 0.400749 \tabularnewline
19 & 0.00613 & 0.0893 & 0.46448 \tabularnewline
20 & 0.007111 & 0.1035 & 0.458819 \tabularnewline
21 & 0.030365 & 0.4421 & 0.329426 \tabularnewline
22 & 0.055278 & 0.8049 & 0.210903 \tabularnewline
23 & 0.06007 & 0.8746 & 0.191381 \tabularnewline
24 & -0.035438 & -0.516 & 0.303203 \tabularnewline
25 & -0.049224 & -0.7167 & 0.237172 \tabularnewline
26 & -0.135469 & -1.9725 & 0.024928 \tabularnewline
27 & -0.030238 & -0.4403 & 0.330092 \tabularnewline
28 & 0.07078 & 1.0306 & 0.151958 \tabularnewline
29 & -0.024736 & -0.3602 & 0.359544 \tabularnewline
30 & -0.024037 & -0.35 & 0.363347 \tabularnewline
31 & 0.109322 & 1.5917 & 0.056466 \tabularnewline
32 & -0.082479 & -1.2009 & 0.115564 \tabularnewline
33 & 0.026092 & 0.3799 & 0.352197 \tabularnewline
34 & 0.066847 & 0.9733 & 0.165754 \tabularnewline
35 & -0.049433 & -0.7198 & 0.236234 \tabularnewline
36 & 0.063597 & 0.926 & 0.177753 \tabularnewline
37 & -0.005969 & -0.0869 & 0.465413 \tabularnewline
38 & -0.187852 & -2.7352 & 0.003381 \tabularnewline
39 & 0.036533 & 0.5319 & 0.297666 \tabularnewline
40 & 0.008943 & 0.1302 & 0.448262 \tabularnewline
41 & -0.025129 & -0.3659 & 0.357409 \tabularnewline
42 & -0.06716 & -0.9779 & 0.164627 \tabularnewline
43 & 0.113893 & 1.6583 & 0.049367 \tabularnewline
44 & -0.069856 & -1.0171 & 0.155129 \tabularnewline
45 & 0.006519 & 0.0949 & 0.462235 \tabularnewline
46 & 0.073684 & 1.0729 & 0.142278 \tabularnewline
47 & -0.04091 & -0.5957 & 0.276018 \tabularnewline
48 & 0.018432 & 0.2684 & 0.394335 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=308861&T=2

[TABLE]
[ROW][C]Partial Autocorrelation Function[/C][/ROW]
[ROW][C]Time lag k[/C][C]PACF(k)[/C][C]T-STAT[/C][C]P-value[/C][/ROW]
[ROW][C]1[/C][C]0.899502[/C][C]13.0969[/C][C]0[/C][/ROW]
[ROW][C]2[/C][C]0.341186[/C][C]4.9677[/C][C]1e-06[/C][/ROW]
[ROW][C]3[/C][C]0.305259[/C][C]4.4446[/C][C]7e-06[/C][/ROW]
[ROW][C]4[/C][C]-0.142737[/C][C]-2.0783[/C][C]0.019443[/C][/ROW]
[ROW][C]5[/C][C]0.337655[/C][C]4.9163[/C][C]1e-06[/C][/ROW]
[ROW][C]6[/C][C]0.15919[/C][C]2.3178[/C][C]0.010706[/C][/ROW]
[ROW][C]7[/C][C]-0.135319[/C][C]-1.9703[/C][C]0.025054[/C][/ROW]
[ROW][C]8[/C][C]-0.184725[/C][C]-2.6896[/C][C]0.003861[/C][/ROW]
[ROW][C]9[/C][C]0.247521[/C][C]3.604[/C][C]0.000195[/C][/ROW]
[ROW][C]10[/C][C]-0.035048[/C][C]-0.5103[/C][C]0.305182[/C][/ROW]
[ROW][C]11[/C][C]0.143963[/C][C]2.0961[/C][C]0.018629[/C][/ROW]
[ROW][C]12[/C][C]0.14499[/C][C]2.1111[/C][C]0.017968[/C][/ROW]
[ROW][C]13[/C][C]-0.28424[/C][C]-4.1386[/C][C]2.5e-05[/C][/ROW]
[ROW][C]14[/C][C]-0.146538[/C][C]-2.1336[/C][C]0.017011[/C][/ROW]
[ROW][C]15[/C][C]-0.10588[/C][C]-1.5416[/C][C]0.062328[/C][/ROW]
[ROW][C]16[/C][C]0.020103[/C][C]0.2927[/C][C]0.385019[/C][/ROW]
[ROW][C]17[/C][C]0.098068[/C][C]1.4279[/C][C]0.077398[/C][/ROW]
[ROW][C]18[/C][C]0.017288[/C][C]0.2517[/C][C]0.400749[/C][/ROW]
[ROW][C]19[/C][C]0.00613[/C][C]0.0893[/C][C]0.46448[/C][/ROW]
[ROW][C]20[/C][C]0.007111[/C][C]0.1035[/C][C]0.458819[/C][/ROW]
[ROW][C]21[/C][C]0.030365[/C][C]0.4421[/C][C]0.329426[/C][/ROW]
[ROW][C]22[/C][C]0.055278[/C][C]0.8049[/C][C]0.210903[/C][/ROW]
[ROW][C]23[/C][C]0.06007[/C][C]0.8746[/C][C]0.191381[/C][/ROW]
[ROW][C]24[/C][C]-0.035438[/C][C]-0.516[/C][C]0.303203[/C][/ROW]
[ROW][C]25[/C][C]-0.049224[/C][C]-0.7167[/C][C]0.237172[/C][/ROW]
[ROW][C]26[/C][C]-0.135469[/C][C]-1.9725[/C][C]0.024928[/C][/ROW]
[ROW][C]27[/C][C]-0.030238[/C][C]-0.4403[/C][C]0.330092[/C][/ROW]
[ROW][C]28[/C][C]0.07078[/C][C]1.0306[/C][C]0.151958[/C][/ROW]
[ROW][C]29[/C][C]-0.024736[/C][C]-0.3602[/C][C]0.359544[/C][/ROW]
[ROW][C]30[/C][C]-0.024037[/C][C]-0.35[/C][C]0.363347[/C][/ROW]
[ROW][C]31[/C][C]0.109322[/C][C]1.5917[/C][C]0.056466[/C][/ROW]
[ROW][C]32[/C][C]-0.082479[/C][C]-1.2009[/C][C]0.115564[/C][/ROW]
[ROW][C]33[/C][C]0.026092[/C][C]0.3799[/C][C]0.352197[/C][/ROW]
[ROW][C]34[/C][C]0.066847[/C][C]0.9733[/C][C]0.165754[/C][/ROW]
[ROW][C]35[/C][C]-0.049433[/C][C]-0.7198[/C][C]0.236234[/C][/ROW]
[ROW][C]36[/C][C]0.063597[/C][C]0.926[/C][C]0.177753[/C][/ROW]
[ROW][C]37[/C][C]-0.005969[/C][C]-0.0869[/C][C]0.465413[/C][/ROW]
[ROW][C]38[/C][C]-0.187852[/C][C]-2.7352[/C][C]0.003381[/C][/ROW]
[ROW][C]39[/C][C]0.036533[/C][C]0.5319[/C][C]0.297666[/C][/ROW]
[ROW][C]40[/C][C]0.008943[/C][C]0.1302[/C][C]0.448262[/C][/ROW]
[ROW][C]41[/C][C]-0.025129[/C][C]-0.3659[/C][C]0.357409[/C][/ROW]
[ROW][C]42[/C][C]-0.06716[/C][C]-0.9779[/C][C]0.164627[/C][/ROW]
[ROW][C]43[/C][C]0.113893[/C][C]1.6583[/C][C]0.049367[/C][/ROW]
[ROW][C]44[/C][C]-0.069856[/C][C]-1.0171[/C][C]0.155129[/C][/ROW]
[ROW][C]45[/C][C]0.006519[/C][C]0.0949[/C][C]0.462235[/C][/ROW]
[ROW][C]46[/C][C]0.073684[/C][C]1.0729[/C][C]0.142278[/C][/ROW]
[ROW][C]47[/C][C]-0.04091[/C][C]-0.5957[/C][C]0.276018[/C][/ROW]
[ROW][C]48[/C][C]0.018432[/C][C]0.2684[/C][C]0.394335[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=308861&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=308861&T=2

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Partial Autocorrelation Function
Time lag kPACF(k)T-STATP-value
10.89950213.09690
20.3411864.96771e-06
30.3052594.44467e-06
4-0.142737-2.07830.019443
50.3376554.91631e-06
60.159192.31780.010706
7-0.135319-1.97030.025054
8-0.184725-2.68960.003861
90.2475213.6040.000195
10-0.035048-0.51030.305182
110.1439632.09610.018629
120.144992.11110.017968
13-0.28424-4.13862.5e-05
14-0.146538-2.13360.017011
15-0.10588-1.54160.062328
160.0201030.29270.385019
170.0980681.42790.077398
180.0172880.25170.400749
190.006130.08930.46448
200.0071110.10350.458819
210.0303650.44210.329426
220.0552780.80490.210903
230.060070.87460.191381
24-0.035438-0.5160.303203
25-0.049224-0.71670.237172
26-0.135469-1.97250.024928
27-0.030238-0.44030.330092
280.070781.03060.151958
29-0.024736-0.36020.359544
30-0.024037-0.350.363347
310.1093221.59170.056466
32-0.082479-1.20090.115564
330.0260920.37990.352197
340.0668470.97330.165754
35-0.049433-0.71980.236234
360.0635970.9260.177753
37-0.005969-0.08690.465413
38-0.187852-2.73520.003381
390.0365330.53190.297666
400.0089430.13020.448262
41-0.025129-0.36590.357409
42-0.06716-0.97790.164627
430.1138931.65830.049367
44-0.069856-1.01710.155129
450.0065190.09490.462235
460.0736841.07290.142278
47-0.04091-0.59570.276018
480.0184320.26840.394335


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 48 ; par2 = 1 ; par3 = 0 ; par4 = 0 ; par5 = 12 ; par6 = White Noise ; par7 = 0.95 ;
Parameters (R input):
par1 = 48 ; par2 = 1 ; par3 = 0 ; par4 = 0 ; par5 = 12 ; par6 = White Noise ; par7 = 0.95 ; par8 = ;
R code (references can be found in the software module):
if (par1 == 'Default') {
par1 = 10*log10(length(x))
} else {
par1 <- as.numeric(par1)
}
par2 <- as.numeric(par2)
par3 <- as.numeric(par3)
par4 <- as.numeric(par4)
par5 <- as.numeric(par5)
if (par6 == 'White Noise') par6 <- 'white' else par6 <- 'ma'
par7 <- as.numeric(par7)
if (par8 != '') par8 <- as.numeric(par8)
x <- na.omit(x)
ox <- x
if (par8 == '') {
if (par2 == 0) {
x <- log(x)
} else {
x <- (x ^ par2 - 1) / par2
}
} else {
x <- log(x,base=par8)
}
if (par3 > 0) x <- diff(x,lag=1,difference=par3)
if (par4 > 0) x <- diff(x,lag=par5,difference=par4)
bitmap(file='picts.png')
op <- par(mfrow=c(2,1))
plot(ox,type='l',main='Original Time Series',xlab='time',ylab='value')
if (par8=='') {
mytitle <- paste('Working Time Series (lambda=',par2,', d=',par3,', D=',par4,')',sep='')
mysub <- paste('(lambda=',par2,', d=',par3,', D=',par4,', CI=', par7, ', CI type=',par6,')',sep='')
} else {
mytitle <- paste('Working Time Series (base=',par8,', d=',par3,', D=',par4,')',sep='')
mysub <- paste('(base=',par8,', d=',par3,', D=',par4,', CI=', par7, ', CI type=',par6,')',sep='')
}
plot(x,type='l', main=mytitle,xlab='time',ylab='value')
par(op)
dev.off()
bitmap(file='pic1.png')
racf <- acf(x, par1, main='Autocorrelation', xlab='time lag', ylab='ACF', ci.type=par6, ci=par7, sub=mysub)
dev.off()
bitmap(file='pic2.png')
rpacf <- pacf(x,par1,main='Partial Autocorrelation',xlab='lags',ylab='PACF',sub=mysub)
dev.off()
(myacf <- c(racf$acf))
(mypacf <- c(rpacf$acf))
lengthx <- length(x)
sqrtn <- sqrt(lengthx)
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Autocorrelation Function',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Time lag k',header=TRUE)
a<-table.element(a,'ACF(k)',header=TRUE)
a<-table.element(a,'T-STAT',header=TRUE)
a<-table.element(a,'P-value',header=TRUE)
a<-table.row.end(a)
for (i in 2:(par1+1)) {
a<-table.row.start(a)
a<-table.element(a,i-1,header=TRUE)
a<-table.element(a,round(myacf[i],6))
mytstat <- myacf[i]*sqrtn
a<-table.element(a,round(mytstat,4))
a<-table.element(a,round(1-pt(abs(mytstat),lengthx),6))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Partial Autocorrelation Function',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Time lag k',header=TRUE)
a<-table.element(a,'PACF(k)',header=TRUE)
a<-table.element(a,'T-STAT',header=TRUE)
a<-table.element(a,'P-value',header=TRUE)
a<-table.row.end(a)
for (i in 1:par1) {
a<-table.row.start(a)
a<-table.element(a,i,header=TRUE)
a<-table.element(a,round(mypacf[i],6))
mytstat <- mypacf[i]*sqrtn
a<-table.element(a,round(mytstat,4))
a<-table.element(a,round(1-pt(abs(mytstat),lengthx),6))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable1.tab')