tests/testsuite/test_adf.test.R

In Fuzzy-Logix/AdapteR: Converts R syntax to SQL to provide fast analytics using in-database C++ library DB Lytix.

Renv=new.env(parent=globalenv())
Renv$x<-rnorm(1000)
FLenv<-as.FL(Renv)
Renv$k<-8
FLenv$k <- 8

## fails presently. Need to figure out why.
test_that("test for Augmented Dickey Fuller test",{
	result=eval_expect_equal({
		obj<-adf.test(x, k= k)
		},Renv,FLenv)
	})