r - 从 R 中的 ACF 中提取数值

Question

这就是我想要做的:

x <- c(1,2,3,3,2,3,4,5,6)

my_acf = acf(x,plot=F)


> my_acf

Autocorrelations of series ‘x’, by lag

     0      1      2      3      4      5      6      7      8 
 1.000  0.497  0.097 -0.047 -0.050 -0.075 -0.231 -0.376 -0.316 

我只想提取第一个滞后的相关系数 0.497，我想将其作为数值。我怎样才能做到这一点？

谢谢你

Answer 1

答案是使用my_acf$acf[2] .这是引导我找到解决方案的原因:

> attributes(my_acf)
$names
[1] "acf"    "type"   "n.used" "lag"    "series" "snames"

$class
[1] "acf"

> my_acf$acf
, , 1

             [,1]
 [1,]  1.00000000
 [2,]  0.49747475
 [3,]  0.09722222
 [4,] -0.04734848
 [5,] -0.04987374
 [6,] -0.07512626
 [7,] -0.23106061
 [8,] -0.37563131
 [9,] -0.31565657

> my_acf$acf[2]
[1] 0.4974747