Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_autocorrelation.wasp

Title produced by software

(Partial) Autocorrelation Function

Date of computation

Sun, 02 May 2010 11:13:45 +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/2010/May/02/t1272799280lkx6g5q3jtptsz7.htm/, Retrieved Wed, 11 Feb 2026 00:45:20 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=75174, Retrieved Wed, 11 Feb 2026 00:45:20 +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

KDGP2W21

Estimated Impact

466

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

-       [(Partial) Autocorrelation Function] [autcorrelatie-zak...] [2010-05-02 11:13:45] [17264c076bcd9ffe53c701d21c08cfe9] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

2,06
2,06
2,05
2,04
2,04
2,03
2,03
2,03
2,02
2,02
2,02
2,02
2,01
2,01
2,01
2
2
1,99
1,99
1,99
1,98
1,97
1,97
1,96
1,96
1,96
1,96
1,95
1,94
1,94
1,93
1,93
1,93
1,92
1,92
1,9
1,9
1,9
1,9
1,89
1,88
1,88
1,87
1,86
1,86
1,85
1,83
1,82
1,8
1,8
1,79
1,78
1,78
1,78
1,77
1,77
1,76
1,75
1,75
1,75
1,75
1,75
1,74
1,74
1,74
1,74
1,73
1,73
1,73
1,73
1,73
1,72
1,71
1,71
1,71
1,7
1,7
1,7
1,7
1,7
1,69
1,68
1,67
1,65
1,61

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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

\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 & 'Sir Ronald Aylmer Fisher' @ 193.190.124.24 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=75174&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]'Sir Ronald Aylmer Fisher' @ 193.190.124.24[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=75174&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=75174&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	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Autocorrelation Function
Time lag k	ACF(k)	T-STAT	P-value
1	0.091672	0.8402	0.201594
2	0.050593	0.4637	0.322035
3	0.143138	1.3119	0.096567
4	-0.021959	-0.2013	0.420492
5	0.021678	0.1987	0.421495
6	-0.009794	-0.0898	0.464344
7	-0.065721	-0.6023	0.274286
8	0.013724	0.1258	0.450101
9	0.055614	0.5097	0.305794
10	-0.060574	-0.5552	0.290127
11	-0.067592	-0.6195	0.268635
12	0.109669	1.0051	0.158859
13	-0.006519	-0.0597	0.476249
14	-0.171616	-1.5729	0.059752
15	0.054554	0.5	0.309193
16	-0.099189	-0.9091	0.182954
17	-0.190923	-1.7498	0.041899
18	0.119963	1.0995	0.137351
19	-0.118497	-1.086	0.140284
20	-0.08796	-0.8062	0.211211
21	-0.081878	-0.7504	0.227549
22	-0.088896	-0.8147	0.208761
23	-0.069713	-0.6389	0.262303
24	-0.101185	-0.9274	0.178194
25	-0.034841	-0.3193	0.375137
26	-0.090767	-0.8319	0.203913
27	0.135402	1.241	0.109033
28	-0.041048	-0.3762	0.353854
29	-0.108328	-0.9928	0.161819
30	-0.004429	-0.0406	0.483858
31	-0.071709	-0.6572	0.256416
32	-0.103182	-0.9457	0.173514
33	0.07408	0.679	0.249517
34	0.0068	0.0623	0.475228
35	-0.009825	-0.0901	0.464231
36	0.17879	1.6386	0.052515
37	0.075702	0.6938	0.244855
38	0.106238	0.9737	0.166503
39	0.016251	0.1489	0.440979
40	-0.013475	-0.1235	0.451004
41	0.028415	0.2604	0.397584
42	0.047598	0.4362	0.331889
43	-0.006581	-0.0603	0.476022
44	0.010855	0.0995	0.460495
45	0.1034	0.9477	0.173007
46	-0.05995	-0.5495	0.292077
47	-0.078322	-0.7178	0.237426
48	0.038677	0.3545	0.361932

\begin{tabular}{lllllllll}
\hline
Autocorrelation Function \tabularnewline
Time lag k & ACF(k) & T-STAT & P-value \tabularnewline
1 & 0.091672 & 0.8402 & 0.201594 \tabularnewline
2 & 0.050593 & 0.4637 & 0.322035 \tabularnewline
3 & 0.143138 & 1.3119 & 0.096567 \tabularnewline
4 & -0.021959 & -0.2013 & 0.420492 \tabularnewline
5 & 0.021678 & 0.1987 & 0.421495 \tabularnewline
6 & -0.009794 & -0.0898 & 0.464344 \tabularnewline
7 & -0.065721 & -0.6023 & 0.274286 \tabularnewline
8 & 0.013724 & 0.1258 & 0.450101 \tabularnewline
9 & 0.055614 & 0.5097 & 0.305794 \tabularnewline
10 & -0.060574 & -0.5552 & 0.290127 \tabularnewline
11 & -0.067592 & -0.6195 & 0.268635 \tabularnewline
12 & 0.109669 & 1.0051 & 0.158859 \tabularnewline
13 & -0.006519 & -0.0597 & 0.476249 \tabularnewline
14 & -0.171616 & -1.5729 & 0.059752 \tabularnewline
15 & 0.054554 & 0.5 & 0.309193 \tabularnewline
16 & -0.099189 & -0.9091 & 0.182954 \tabularnewline
17 & -0.190923 & -1.7498 & 0.041899 \tabularnewline
18 & 0.119963 & 1.0995 & 0.137351 \tabularnewline
19 & -0.118497 & -1.086 & 0.140284 \tabularnewline
20 & -0.08796 & -0.8062 & 0.211211 \tabularnewline
21 & -0.081878 & -0.7504 & 0.227549 \tabularnewline
22 & -0.088896 & -0.8147 & 0.208761 \tabularnewline
23 & -0.069713 & -0.6389 & 0.262303 \tabularnewline
24 & -0.101185 & -0.9274 & 0.178194 \tabularnewline
25 & -0.034841 & -0.3193 & 0.375137 \tabularnewline
26 & -0.090767 & -0.8319 & 0.203913 \tabularnewline
27 & 0.135402 & 1.241 & 0.109033 \tabularnewline
28 & -0.041048 & -0.3762 & 0.353854 \tabularnewline
29 & -0.108328 & -0.9928 & 0.161819 \tabularnewline
30 & -0.004429 & -0.0406 & 0.483858 \tabularnewline
31 & -0.071709 & -0.6572 & 0.256416 \tabularnewline
32 & -0.103182 & -0.9457 & 0.173514 \tabularnewline
33 & 0.07408 & 0.679 & 0.249517 \tabularnewline
34 & 0.0068 & 0.0623 & 0.475228 \tabularnewline
35 & -0.009825 & -0.0901 & 0.464231 \tabularnewline
36 & 0.17879 & 1.6386 & 0.052515 \tabularnewline
37 & 0.075702 & 0.6938 & 0.244855 \tabularnewline
38 & 0.106238 & 0.9737 & 0.166503 \tabularnewline
39 & 0.016251 & 0.1489 & 0.440979 \tabularnewline
40 & -0.013475 & -0.1235 & 0.451004 \tabularnewline
41 & 0.028415 & 0.2604 & 0.397584 \tabularnewline
42 & 0.047598 & 0.4362 & 0.331889 \tabularnewline
43 & -0.006581 & -0.0603 & 0.476022 \tabularnewline
44 & 0.010855 & 0.0995 & 0.460495 \tabularnewline
45 & 0.1034 & 0.9477 & 0.173007 \tabularnewline
46 & -0.05995 & -0.5495 & 0.292077 \tabularnewline
47 & -0.078322 & -0.7178 & 0.237426 \tabularnewline
48 & 0.038677 & 0.3545 & 0.361932 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=75174&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.091672[/C][C]0.8402[/C][C]0.201594[/C][/ROW]
[ROW][C]2[/C][C]0.050593[/C][C]0.4637[/C][C]0.322035[/C][/ROW]
[ROW][C]3[/C][C]0.143138[/C][C]1.3119[/C][C]0.096567[/C][/ROW]
[ROW][C]4[/C][C]-0.021959[/C][C]-0.2013[/C][C]0.420492[/C][/ROW]
[ROW][C]5[/C][C]0.021678[/C][C]0.1987[/C][C]0.421495[/C][/ROW]
[ROW][C]6[/C][C]-0.009794[/C][C]-0.0898[/C][C]0.464344[/C][/ROW]
[ROW][C]7[/C][C]-0.065721[/C][C]-0.6023[/C][C]0.274286[/C][/ROW]
[ROW][C]8[/C][C]0.013724[/C][C]0.1258[/C][C]0.450101[/C][/ROW]
[ROW][C]9[/C][C]0.055614[/C][C]0.5097[/C][C]0.305794[/C][/ROW]
[ROW][C]10[/C][C]-0.060574[/C][C]-0.5552[/C][C]0.290127[/C][/ROW]
[ROW][C]11[/C][C]-0.067592[/C][C]-0.6195[/C][C]0.268635[/C][/ROW]
[ROW][C]12[/C][C]0.109669[/C][C]1.0051[/C][C]0.158859[/C][/ROW]
[ROW][C]13[/C][C]-0.006519[/C][C]-0.0597[/C][C]0.476249[/C][/ROW]
[ROW][C]14[/C][C]-0.171616[/C][C]-1.5729[/C][C]0.059752[/C][/ROW]
[ROW][C]15[/C][C]0.054554[/C][C]0.5[/C][C]0.309193[/C][/ROW]
[ROW][C]16[/C][C]-0.099189[/C][C]-0.9091[/C][C]0.182954[/C][/ROW]
[ROW][C]17[/C][C]-0.190923[/C][C]-1.7498[/C][C]0.041899[/C][/ROW]
[ROW][C]18[/C][C]0.119963[/C][C]1.0995[/C][C]0.137351[/C][/ROW]
[ROW][C]19[/C][C]-0.118497[/C][C]-1.086[/C][C]0.140284[/C][/ROW]
[ROW][C]20[/C][C]-0.08796[/C][C]-0.8062[/C][C]0.211211[/C][/ROW]
[ROW][C]21[/C][C]-0.081878[/C][C]-0.7504[/C][C]0.227549[/C][/ROW]
[ROW][C]22[/C][C]-0.088896[/C][C]-0.8147[/C][C]0.208761[/C][/ROW]
[ROW][C]23[/C][C]-0.069713[/C][C]-0.6389[/C][C]0.262303[/C][/ROW]
[ROW][C]24[/C][C]-0.101185[/C][C]-0.9274[/C][C]0.178194[/C][/ROW]
[ROW][C]25[/C][C]-0.034841[/C][C]-0.3193[/C][C]0.375137[/C][/ROW]
[ROW][C]26[/C][C]-0.090767[/C][C]-0.8319[/C][C]0.203913[/C][/ROW]
[ROW][C]27[/C][C]0.135402[/C][C]1.241[/C][C]0.109033[/C][/ROW]
[ROW][C]28[/C][C]-0.041048[/C][C]-0.3762[/C][C]0.353854[/C][/ROW]
[ROW][C]29[/C][C]-0.108328[/C][C]-0.9928[/C][C]0.161819[/C][/ROW]
[ROW][C]30[/C][C]-0.004429[/C][C]-0.0406[/C][C]0.483858[/C][/ROW]
[ROW][C]31[/C][C]-0.071709[/C][C]-0.6572[/C][C]0.256416[/C][/ROW]
[ROW][C]32[/C][C]-0.103182[/C][C]-0.9457[/C][C]0.173514[/C][/ROW]
[ROW][C]33[/C][C]0.07408[/C][C]0.679[/C][C]0.249517[/C][/ROW]
[ROW][C]34[/C][C]0.0068[/C][C]0.0623[/C][C]0.475228[/C][/ROW]
[ROW][C]35[/C][C]-0.009825[/C][C]-0.0901[/C][C]0.464231[/C][/ROW]
[ROW][C]36[/C][C]0.17879[/C][C]1.6386[/C][C]0.052515[/C][/ROW]
[ROW][C]37[/C][C]0.075702[/C][C]0.6938[/C][C]0.244855[/C][/ROW]
[ROW][C]38[/C][C]0.106238[/C][C]0.9737[/C][C]0.166503[/C][/ROW]
[ROW][C]39[/C][C]0.016251[/C][C]0.1489[/C][C]0.440979[/C][/ROW]
[ROW][C]40[/C][C]-0.013475[/C][C]-0.1235[/C][C]0.451004[/C][/ROW]
[ROW][C]41[/C][C]0.028415[/C][C]0.2604[/C][C]0.397584[/C][/ROW]
[ROW][C]42[/C][C]0.047598[/C][C]0.4362[/C][C]0.331889[/C][/ROW]
[ROW][C]43[/C][C]-0.006581[/C][C]-0.0603[/C][C]0.476022[/C][/ROW]
[ROW][C]44[/C][C]0.010855[/C][C]0.0995[/C][C]0.460495[/C][/ROW]
[ROW][C]45[/C][C]0.1034[/C][C]0.9477[/C][C]0.173007[/C][/ROW]
[ROW][C]46[/C][C]-0.05995[/C][C]-0.5495[/C][C]0.292077[/C][/ROW]
[ROW][C]47[/C][C]-0.078322[/C][C]-0.7178[/C][C]0.237426[/C][/ROW]
[ROW][C]48[/C][C]0.038677[/C][C]0.3545[/C][C]0.361932[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=75174&T=1

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

As an alternative you can also use a QR Code:

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

Autocorrelation Function
Time lag k	ACF(k)	T-STAT	P-value
1	0.091672	0.8402	0.201594
2	0.050593	0.4637	0.322035
3	0.143138	1.3119	0.096567
4	-0.021959	-0.2013	0.420492
5	0.021678	0.1987	0.421495
6	-0.009794	-0.0898	0.464344
7	-0.065721	-0.6023	0.274286
8	0.013724	0.1258	0.450101
9	0.055614	0.5097	0.305794
10	-0.060574	-0.5552	0.290127
11	-0.067592	-0.6195	0.268635
12	0.109669	1.0051	0.158859
13	-0.006519	-0.0597	0.476249
14	-0.171616	-1.5729	0.059752
15	0.054554	0.5	0.309193
16	-0.099189	-0.9091	0.182954
17	-0.190923	-1.7498	0.041899
18	0.119963	1.0995	0.137351
19	-0.118497	-1.086	0.140284
20	-0.08796	-0.8062	0.211211
21	-0.081878	-0.7504	0.227549
22	-0.088896	-0.8147	0.208761
23	-0.069713	-0.6389	0.262303
24	-0.101185	-0.9274	0.178194
25	-0.034841	-0.3193	0.375137
26	-0.090767	-0.8319	0.203913
27	0.135402	1.241	0.109033
28	-0.041048	-0.3762	0.353854
29	-0.108328	-0.9928	0.161819
30	-0.004429	-0.0406	0.483858
31	-0.071709	-0.6572	0.256416
32	-0.103182	-0.9457	0.173514
33	0.07408	0.679	0.249517
34	0.0068	0.0623	0.475228
35	-0.009825	-0.0901	0.464231
36	0.17879	1.6386	0.052515
37	0.075702	0.6938	0.244855
38	0.106238	0.9737	0.166503
39	0.016251	0.1489	0.440979
40	-0.013475	-0.1235	0.451004
41	0.028415	0.2604	0.397584
42	0.047598	0.4362	0.331889
43	-0.006581	-0.0603	0.476022
44	0.010855	0.0995	0.460495
45	0.1034	0.9477	0.173007
46	-0.05995	-0.5495	0.292077
47	-0.078322	-0.7178	0.237426
48	0.038677	0.3545	0.361932

Partial Autocorrelation Function
Time lag k	PACF(k)	T-STAT	P-value
1	0.091672	0.8402	0.201594
2	0.042546	0.3899	0.348782
3	0.136186	1.2482	0.107719
4	-0.049128	-0.4503	0.326839
5	0.016965	0.1555	0.438405
6	-0.031035	-0.2844	0.388387
7	-0.055094	-0.5049	0.307458
8	0.019853	0.182	0.428028
9	0.066234	0.607	0.272729
10	-0.058918	-0.54	0.295315
11	-0.072405	-0.6636	0.254381
12	0.117874	1.0803	0.141543
13	-0.004391	-0.0402	0.483997
14	-0.181916	-1.6673	0.049591
15	0.065591	0.6011	0.27468
16	-0.080749	-0.7401	0.230659
17	-0.171957	-1.576	0.059391
18	0.154194	1.4132	0.080645
19	-0.075978	-0.6963	0.244067
20	-0.082049	-0.752	0.22708
21	-0.138957	-1.2736	0.103166
22	0.009911	0.0908	0.463918
23	-0.053774	-0.4929	0.311702
24	-0.14005	-1.2836	0.10141
25	0.034445	0.3157	0.376509
26	-0.046638	-0.4274	0.335073
27	0.102938	0.9434	0.17408
28	-0.095187	-0.8724	0.192737
29	-0.024546	-0.225	0.411276
30	-0.119614	-1.0963	0.138045
31	-0.123703	-1.1338	0.130061
32	-0.013058	-0.1197	0.45251
33	0.057525	0.5272	0.299712
34	-0.006711	-0.0615	0.475551
35	-0.034118	-0.3127	0.377644
36	0.134403	1.2318	0.110725
37	0.035239	0.323	0.373761
38	0.01731	0.1586	0.437165
39	-0.082821	-0.7591	0.224968
40	-0.076685	-0.7028	0.242052
41	0.020209	0.1852	0.426751
42	0.019554	0.1792	0.429101
43	-0.008921	-0.0818	0.467514
44	0.071368	0.6541	0.257417
45	-0.066774	-0.612	0.271099
46	-0.131307	-1.2035	0.116091
47	-0.073391	-0.6726	0.25151
48	0.022019	0.2018	0.420277

\begin{tabular}{lllllllll}
\hline
Partial Autocorrelation Function \tabularnewline
Time lag k & PACF(k) & T-STAT & P-value \tabularnewline
1 & 0.091672 & 0.8402 & 0.201594 \tabularnewline
2 & 0.042546 & 0.3899 & 0.348782 \tabularnewline
3 & 0.136186 & 1.2482 & 0.107719 \tabularnewline
4 & -0.049128 & -0.4503 & 0.326839 \tabularnewline
5 & 0.016965 & 0.1555 & 0.438405 \tabularnewline
6 & -0.031035 & -0.2844 & 0.388387 \tabularnewline
7 & -0.055094 & -0.5049 & 0.307458 \tabularnewline
8 & 0.019853 & 0.182 & 0.428028 \tabularnewline
9 & 0.066234 & 0.607 & 0.272729 \tabularnewline
10 & -0.058918 & -0.54 & 0.295315 \tabularnewline
11 & -0.072405 & -0.6636 & 0.254381 \tabularnewline
12 & 0.117874 & 1.0803 & 0.141543 \tabularnewline
13 & -0.004391 & -0.0402 & 0.483997 \tabularnewline
14 & -0.181916 & -1.6673 & 0.049591 \tabularnewline
15 & 0.065591 & 0.6011 & 0.27468 \tabularnewline
16 & -0.080749 & -0.7401 & 0.230659 \tabularnewline
17 & -0.171957 & -1.576 & 0.059391 \tabularnewline
18 & 0.154194 & 1.4132 & 0.080645 \tabularnewline
19 & -0.075978 & -0.6963 & 0.244067 \tabularnewline
20 & -0.082049 & -0.752 & 0.22708 \tabularnewline
21 & -0.138957 & -1.2736 & 0.103166 \tabularnewline
22 & 0.009911 & 0.0908 & 0.463918 \tabularnewline
23 & -0.053774 & -0.4929 & 0.311702 \tabularnewline
24 & -0.14005 & -1.2836 & 0.10141 \tabularnewline
25 & 0.034445 & 0.3157 & 0.376509 \tabularnewline
26 & -0.046638 & -0.4274 & 0.335073 \tabularnewline
27 & 0.102938 & 0.9434 & 0.17408 \tabularnewline
28 & -0.095187 & -0.8724 & 0.192737 \tabularnewline
29 & -0.024546 & -0.225 & 0.411276 \tabularnewline
30 & -0.119614 & -1.0963 & 0.138045 \tabularnewline
31 & -0.123703 & -1.1338 & 0.130061 \tabularnewline
32 & -0.013058 & -0.1197 & 0.45251 \tabularnewline
33 & 0.057525 & 0.5272 & 0.299712 \tabularnewline
34 & -0.006711 & -0.0615 & 0.475551 \tabularnewline
35 & -0.034118 & -0.3127 & 0.377644 \tabularnewline
36 & 0.134403 & 1.2318 & 0.110725 \tabularnewline
37 & 0.035239 & 0.323 & 0.373761 \tabularnewline
38 & 0.01731 & 0.1586 & 0.437165 \tabularnewline
39 & -0.082821 & -0.7591 & 0.224968 \tabularnewline
40 & -0.076685 & -0.7028 & 0.242052 \tabularnewline
41 & 0.020209 & 0.1852 & 0.426751 \tabularnewline
42 & 0.019554 & 0.1792 & 0.429101 \tabularnewline
43 & -0.008921 & -0.0818 & 0.467514 \tabularnewline
44 & 0.071368 & 0.6541 & 0.257417 \tabularnewline
45 & -0.066774 & -0.612 & 0.271099 \tabularnewline
46 & -0.131307 & -1.2035 & 0.116091 \tabularnewline
47 & -0.073391 & -0.6726 & 0.25151 \tabularnewline
48 & 0.022019 & 0.2018 & 0.420277 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=75174&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.091672[/C][C]0.8402[/C][C]0.201594[/C][/ROW]
[ROW][C]2[/C][C]0.042546[/C][C]0.3899[/C][C]0.348782[/C][/ROW]
[ROW][C]3[/C][C]0.136186[/C][C]1.2482[/C][C]0.107719[/C][/ROW]
[ROW][C]4[/C][C]-0.049128[/C][C]-0.4503[/C][C]0.326839[/C][/ROW]
[ROW][C]5[/C][C]0.016965[/C][C]0.1555[/C][C]0.438405[/C][/ROW]
[ROW][C]6[/C][C]-0.031035[/C][C]-0.2844[/C][C]0.388387[/C][/ROW]
[ROW][C]7[/C][C]-0.055094[/C][C]-0.5049[/C][C]0.307458[/C][/ROW]
[ROW][C]8[/C][C]0.019853[/C][C]0.182[/C][C]0.428028[/C][/ROW]
[ROW][C]9[/C][C]0.066234[/C][C]0.607[/C][C]0.272729[/C][/ROW]
[ROW][C]10[/C][C]-0.058918[/C][C]-0.54[/C][C]0.295315[/C][/ROW]
[ROW][C]11[/C][C]-0.072405[/C][C]-0.6636[/C][C]0.254381[/C][/ROW]
[ROW][C]12[/C][C]0.117874[/C][C]1.0803[/C][C]0.141543[/C][/ROW]
[ROW][C]13[/C][C]-0.004391[/C][C]-0.0402[/C][C]0.483997[/C][/ROW]
[ROW][C]14[/C][C]-0.181916[/C][C]-1.6673[/C][C]0.049591[/C][/ROW]
[ROW][C]15[/C][C]0.065591[/C][C]0.6011[/C][C]0.27468[/C][/ROW]
[ROW][C]16[/C][C]-0.080749[/C][C]-0.7401[/C][C]0.230659[/C][/ROW]
[ROW][C]17[/C][C]-0.171957[/C][C]-1.576[/C][C]0.059391[/C][/ROW]
[ROW][C]18[/C][C]0.154194[/C][C]1.4132[/C][C]0.080645[/C][/ROW]
[ROW][C]19[/C][C]-0.075978[/C][C]-0.6963[/C][C]0.244067[/C][/ROW]
[ROW][C]20[/C][C]-0.082049[/C][C]-0.752[/C][C]0.22708[/C][/ROW]
[ROW][C]21[/C][C]-0.138957[/C][C]-1.2736[/C][C]0.103166[/C][/ROW]
[ROW][C]22[/C][C]0.009911[/C][C]0.0908[/C][C]0.463918[/C][/ROW]
[ROW][C]23[/C][C]-0.053774[/C][C]-0.4929[/C][C]0.311702[/C][/ROW]
[ROW][C]24[/C][C]-0.14005[/C][C]-1.2836[/C][C]0.10141[/C][/ROW]
[ROW][C]25[/C][C]0.034445[/C][C]0.3157[/C][C]0.376509[/C][/ROW]
[ROW][C]26[/C][C]-0.046638[/C][C]-0.4274[/C][C]0.335073[/C][/ROW]
[ROW][C]27[/C][C]0.102938[/C][C]0.9434[/C][C]0.17408[/C][/ROW]
[ROW][C]28[/C][C]-0.095187[/C][C]-0.8724[/C][C]0.192737[/C][/ROW]
[ROW][C]29[/C][C]-0.024546[/C][C]-0.225[/C][C]0.411276[/C][/ROW]
[ROW][C]30[/C][C]-0.119614[/C][C]-1.0963[/C][C]0.138045[/C][/ROW]
[ROW][C]31[/C][C]-0.123703[/C][C]-1.1338[/C][C]0.130061[/C][/ROW]
[ROW][C]32[/C][C]-0.013058[/C][C]-0.1197[/C][C]0.45251[/C][/ROW]
[ROW][C]33[/C][C]0.057525[/C][C]0.5272[/C][C]0.299712[/C][/ROW]
[ROW][C]34[/C][C]-0.006711[/C][C]-0.0615[/C][C]0.475551[/C][/ROW]
[ROW][C]35[/C][C]-0.034118[/C][C]-0.3127[/C][C]0.377644[/C][/ROW]
[ROW][C]36[/C][C]0.134403[/C][C]1.2318[/C][C]0.110725[/C][/ROW]
[ROW][C]37[/C][C]0.035239[/C][C]0.323[/C][C]0.373761[/C][/ROW]
[ROW][C]38[/C][C]0.01731[/C][C]0.1586[/C][C]0.437165[/C][/ROW]
[ROW][C]39[/C][C]-0.082821[/C][C]-0.7591[/C][C]0.224968[/C][/ROW]
[ROW][C]40[/C][C]-0.076685[/C][C]-0.7028[/C][C]0.242052[/C][/ROW]
[ROW][C]41[/C][C]0.020209[/C][C]0.1852[/C][C]0.426751[/C][/ROW]
[ROW][C]42[/C][C]0.019554[/C][C]0.1792[/C][C]0.429101[/C][/ROW]
[ROW][C]43[/C][C]-0.008921[/C][C]-0.0818[/C][C]0.467514[/C][/ROW]
[ROW][C]44[/C][C]0.071368[/C][C]0.6541[/C][C]0.257417[/C][/ROW]
[ROW][C]45[/C][C]-0.066774[/C][C]-0.612[/C][C]0.271099[/C][/ROW]
[ROW][C]46[/C][C]-0.131307[/C][C]-1.2035[/C][C]0.116091[/C][/ROW]
[ROW][C]47[/C][C]-0.073391[/C][C]-0.6726[/C][C]0.25151[/C][/ROW]
[ROW][C]48[/C][C]0.022019[/C][C]0.2018[/C][C]0.420277[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=75174&T=2

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

As an alternative you can also use a QR Code:

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

Partial Autocorrelation Function
Time lag k	PACF(k)	T-STAT	P-value
1	0.091672	0.8402	0.201594
2	0.042546	0.3899	0.348782
3	0.136186	1.2482	0.107719
4	-0.049128	-0.4503	0.326839
5	0.016965	0.1555	0.438405
6	-0.031035	-0.2844	0.388387
7	-0.055094	-0.5049	0.307458
8	0.019853	0.182	0.428028
9	0.066234	0.607	0.272729
10	-0.058918	-0.54	0.295315
11	-0.072405	-0.6636	0.254381
12	0.117874	1.0803	0.141543
13	-0.004391	-0.0402	0.483997
14	-0.181916	-1.6673	0.049591
15	0.065591	0.6011	0.27468
16	-0.080749	-0.7401	0.230659
17	-0.171957	-1.576	0.059391
18	0.154194	1.4132	0.080645
19	-0.075978	-0.6963	0.244067
20	-0.082049	-0.752	0.22708
21	-0.138957	-1.2736	0.103166
22	0.009911	0.0908	0.463918
23	-0.053774	-0.4929	0.311702
24	-0.14005	-1.2836	0.10141
25	0.034445	0.3157	0.376509
26	-0.046638	-0.4274	0.335073
27	0.102938	0.9434	0.17408
28	-0.095187	-0.8724	0.192737
29	-0.024546	-0.225	0.411276
30	-0.119614	-1.0963	0.138045
31	-0.123703	-1.1338	0.130061
32	-0.013058	-0.1197	0.45251
33	0.057525	0.5272	0.299712
34	-0.006711	-0.0615	0.475551
35	-0.034118	-0.3127	0.377644
36	0.134403	1.2318	0.110725
37	0.035239	0.323	0.373761
38	0.01731	0.1586	0.437165
39	-0.082821	-0.7591	0.224968
40	-0.076685	-0.7028	0.242052
41	0.020209	0.1852	0.426751
42	0.019554	0.1792	0.429101
43	-0.008921	-0.0818	0.467514
44	0.071368	0.6541	0.257417
45	-0.066774	-0.612	0.271099
46	-0.131307	-1.2035	0.116091
47	-0.073391	-0.6726	0.25151
48	0.022019	0.2018	0.420277

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 48 ; par2 = 1 ; par3 = 1 ; par4 = 0 ; par5 = 12 ; par6 = White Noise ; par7 = 0.95 ;

Parameters (R input):

par1 = 48 ; par2 = 1 ; par3 = 1 ; par4 = 0 ; par5 = 12 ; par6 = White Noise ; par7 = 0.95 ;

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 (par2 == 0) {
x <- log(x)
} else {
x <- (x ^ par2 - 1) / par2
}
if (par3 > 0) x <- diff(x,lag=1,difference=par3)
if (par4 > 0) x <- diff(x,lag=par5,difference=par4)
bitmap(file='pic1.png')
racf <- acf(x, par1, main='Autocorrelation', xlab='time lag', ylab='ACF', ci.type=par6, ci=par7, sub=paste('(lambda=',par2,', d=',par3,', D=',par4,', CI=', par7, ', CI type=',par6,')',sep=''))
dev.off()
bitmap(file='pic2.png')
rpacf <- pacf(x,par1,main='Partial Autocorrelation',xlab='lags',ylab='PACF')
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,hyperlink('basics.htm','ACF(k)','click here for more information about the Autocorrelation Function'),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,hyperlink('basics.htm','PACF(k)','click here for more information about the Partial Autocorrelation Function'),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')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code