1# cescelia
我把你的数据保存为text文档后得到的的eacf结果
> data=read.table("11.txt",head=TRUE)
> x=data$X
> eacf(x,7,13)
AR/MA
0 1 2 3 4 5 6 7 8 9 10 11 12 13
0 o o o o o o o o o o o o o o
1 x o o o o o o o o o o o o o
2 x o o o o o o o o o o o o o
3 x x x o o o o o o o o o o o
4 x x x x o o o o o o o o o o
5 x x x x o o o o o o o o o o
6 x o x o o o o o o o o o o o
7 x o x x x x x o o o o o o o
基本上可以认为你的数据是不相关的,通过ACF和PACF图形也可以看到,基本上都在显著性水平以内
par(mfrow=c(2,2))
plot(x)
acf(x)
pacf(x)
qqnorm(x);abline(0,1)
x1=factor(sign(x)[which(sign(x)!=0)])
x.m=arima(x,order=c(0,0,0))
tsdiag(x.m,gof=16,omit.initial=FALSE) # 有警告信息