R语言 平稳性检验 差分

data = read.csv("/Users/Mac/Desktop/xu.csv")
library(tseries)
x=diff(data$lnx1)

setwd("/Users/Mac/Desktop/") 输出在桌面
write.table(x,"sample1.csv",sep=",")　　输出表格

adf.test(data$a) adf检验

data
pp.test(data$b) pp检验
?diff
w=diff(data$b,2) 二阶差分

a = diff(data$a, lag = 1,differences=1) 一阶差分

plot(w ~ x + y + z) 线性图
plot(data$a)
plot(a)
fx <- lm(data$b ~ data$a + data$c + data$d)
insta
library(car)
scatterplotMatrix(data$b ~ data$a + data$c + data$d,main = "plot")

R语言 平稳性检验 差分

原文：https://www.cnblogs.com/ahualualua/p/12458648.html