我想检查一下#34;鸟类之间是否存在相关性。 &安培; "狼吞虎咽"在不同的滞后。获得相关值很容易,但我如何解决滞后问题(我需要检查1:4滞后的相关值)?我寻找的输出是一个包含滞后值和相关相关值的数据表。
df <- read.table(text = " day birds wolfs
0 2 21
1 8 4
2 2 5
3 2 4
4 3 6
5 1 12
6 7 10
7 1 9
8 2 12 header = TRUE)
输出(不是实际结果): 滞后CorValue
0 0.9
1 0.8
2 0.7
3 0.9
答案 0 :(得分:2)
如果你这样做:
grepl('^[^0-9]+$', teststring)
它会返回:
系列'X'的自相关,滞后
corLag<-ccf(df$birds,df$wolfs,lag.max=max(df$day))
第一行是滞后,第二行是相关值。你可以检查-8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8
-0.028 0.123 -0.045 -0.019 0.145 -0.176 -0.082 -0.126 -0.296 0.757 -0.134 -0.180 0.070 -0.272 0.549 -0.170 -0.117
是否确实等于-0.296