[R] additional and modified tests

This commit is contained in:
Vadim Khotilovich
2016-06-27 02:00:46 -05:00
parent 3b6b344561
commit fd4300b95a
5 changed files with 295 additions and 143 deletions

View File

@@ -11,13 +11,13 @@ dtest <- xgb.DMatrix(agaricus.test$data, label = agaricus.test$label)
bst <- xgboost(data = dtrain,
max_depth = 2,
eta = 1,
nround = 10,
nrounds = 10,
nthread = 1,
verbose = 0,
objective = "binary:logistic")
test_that("call is exposed to R", {
expect_true(!is.null(bst$call))
expect_false(is.null(bst$call))
expect_is(bst$call, "call")
})