data(rwalk)的回归结果
library(TSA)
data(rwalk)
lm_rwalk=lm(rwalk~time(rwalk))
summary(lm_rwalk)
win.graph(width = 4.8,height = 8,pointsize = 8)
plot(rwalk,ylab="Random walk",xlab="Time")
points(rwalk,col="red")
abline(lm_rwalk,col="blue")
data(rwalk)的回归结果
library(TSA)
data(rwalk)
lm_rwalk=lm(rwalk~time(rwalk))
summary(lm_rwalk)
win.graph(width = 4.8,height = 8,pointsize = 8)
plot(rwalk,ylab="Random walk",xlab="Time")
points(rwalk,col="red")
abline(lm_rwalk,col="blue")