运行 ADF 时在 R-Studio 上解析数据时出错

Question

在 R-Studio 上尝试运行 ADF (Augmented Dickey Fuller) 测试时，我似乎无法通过或理解此错误有什么问题。将不胜感激评论。

library(AER)
library("dynlm", lib.loc="~/R/win-library/3.2")
x<-read.table("C://R Files/protein.csv", header=T, sep=",")
"adf" <- function(x,k = 0, int = TRUE, trend = FALSE){
     require(dynlm)
     dx <- diff(x)
     formula <- paste("dx ~ L(x)")
     if(k > 0)
         formula <- paste(formula,"  L(dx,1:k)")
     if(trend){
         s <- time(x)
         t <- ts(s - s[1],start = s[1],freq = frequency(x))
         formula <- paste(formula,"  t")
     }
     if(!int) formula <- paste(formula," - 1")
     summary(dynlm(as.formula(formula)))
 }

a<-ts(x$a)
adf(a, k=1, int=T, trend=T)

之后我得到的错误信息是：

解析错误（text = x，keep.source = FALSE）： :1:13: 意外的符号 1: dx ~ L(x) L ^

Answer 1

可能是这样的： formula <- paste(formula," L(dx,1:k)")

您不能只向模型添加一些东西。尝试做： formula <- paste(formula,"+ L(dx,1:k)") 看看是否有帮助。如果不是，您可能想分享 protein.csv 的内容，以便我可以尝试重现您的问题。

运行 ADF 时在 R-Studio 上解析数据时出错

Error in parsing data on R-Studio while running ADF

r

rstudio