RF1 test for VA

panzelon · Dec 21, 2013 · d0c8bcd · d0c8bcd
1 parent db7ac88
commit d0c8bcd
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/R/tests/testdir_algos/testdir_rf/runit_RF.VA_covtype_all.R b/R/tests/testdir_algos/testdir_rf/runit_RF.VA_covtype_all.R
@@ -0,0 +1,12 @@
+setwd(normalizePath(dirname(R.utils::commandArgs(asValues=TRUE)$"-f")))
+source('../../findNSourceUtils.R')
+
+test.RF.VA.covtype_class <- function(conn) {
+  covtype.hex = h2o.uploadFile.VA(conn, locate( "smalldata/covtype/covtype.20k.data"), "covtype.hex")
+  covtype.rf = h2o.randomForest.VA(y = 54, x = seq(1,53), data = covtype.hex, ntree = 50, depth = 100) 
+  print(covtype.rf)
+  testEnd()
+}
+
+doTest("RF1 VA test covtype all", test.RF.VA.covtype_class)
+