Following code fails for length of x upto 6.
throws following error,-
Error in if (interpol == min(tablep)) warning("p-value smaller than printed p-value") else warning("p-value greater than printed p-value") :
missing value where TRUE/FALSE needed
Expected result is similar to(obtained for x<-c(1,3,5,2,4,5,7)),-
Augmented Dickey-Fuller Test
Dickey-Fuller = -1.3583, Lag order = 1, p-value = 0.8168
alternative hypothesis: stationary