powered by
LM test for serial correlation
bp2(object, nlags, fill = NULL, type = c("F", "Chi2"))
fitted lm model
positive integer number of lags
starting values for the lagged residuals in the auxiliary regression. By default 0.
Fisher or Chisquare statistics
# NOT RUN { reg<-nardl(food~inf,fod,ic="aic",maxlag = 4,graph = TRUE,case=3) lm2<-bp2(reg$fits,reg$nl,fill=0,type="F") # }
Run the code above in your browser using DataLab