Fehler beim Analysieren von Daten in R-Studio beim Ausführen von ADF

Question

Ich kann nicht scheinen, zu verstehen, was mit diesem Fehler beim Versuch, den ADF-Test (Augmented Dickey Fuller) auf R-Studio auszuführen, nicht funktioniert. Will Kommentare zu schätzen wissen.

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) 

Die Fehlermeldung, die ich danach bekommen ist:

Fehler in Parse (text = x, keep.source = false): : 1: 13: unerwartetes Symbol 1: dx ~ L (x) L ^

Answer 1

Es könnte sein: formula <- paste(formula," L(dx,1:k)")

Sie können nicht nur etwas zu einem Modell hinzufügen. Versuchen Sie es: formula <- paste(formula,"+ L(dx,1:k)") und sehen, ob das hilft. Wenn nicht, möchten Sie vielleicht den Inhalt von protein.csv teilen, damit ich versuchen kann, Ihr Problem zu reproduzieren.