From 339a53d9d4f8ac2a4d71b9034231f57477d24245 Mon Sep 17 00:00:00 2001 From: "Yuan Tang (Terry)" Date: Sun, 6 Sep 2015 20:00:25 -0400 Subject: [PATCH] fixed unit test in R --- R-package/tests/testthat/test_glm.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R-package/tests/testthat/test_glm.R b/R-package/tests/testthat/test_glm.R index 485aad82d..dc7b6efab 100644 --- a/R-package/tests/testthat/test_glm.R +++ b/R-package/tests/testthat/test_glm.R @@ -13,7 +13,7 @@ test_that("glm works", { nthread = 2, alpha = 0.0001, lambda = 1) watchlist <- list(eval = dtest, train = dtrain) num_round <- 2 - expect_that(bst <- xgb.train(param, dtrain, num_round, watchlist), not(throws_error())) - expect_that(ypred <- predict(bst, dtest), not(throws_error())) + bst <- xgb.train(param, dtrain, num_round, watchlist) + ypred <- predict(bst, dtest) expect_equal(length(getinfo(dtest, 'label')), 1611) })