tests/testsuite/test_FLVarCluster.R

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

test_that("FLVarCluster works ",{
    deeptable  <- FLTable(getTestTableName("tblLogRegr"), 
                    "ObsID",
                    "VarID",
                    "Num_Val",
                    whereconditions=c("ObsID < 1001"))
    clustervector <- FLVarCluster(deeptable,
                                    0.75,
                                    "COVAR",
                                    whereconditions=" VarID>0 ")
})