Merge pull request #629 from m-dz/patch-1

Suppress warnings where not needed (in test_confusionMatrix.R)
topepo · Apr 19, 2017 · e34ba27 · e34ba27
2 parents 1a03c17 + e2acbf5
commit e34ba27
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/pkg/caret/tests/testthat/test_confusionMatrix.R b/pkg/caret/tests/testthat/test_confusionMatrix.R
@@ -27,9 +27,9 @@ test_that("Confusion matrix works", {
   dat5[200] <- "Class4"
   dat5 <- factor(dat5, levels = c("Class1", "Class4"))
   cm1 <- confusionMatrix(dat, ref)
-  cm2 <- confusionMatrix(dat2, ref2)
-  cm3 <- confusionMatrix(dat3, ref2)
-  cm4 <- confusionMatrix(dat4, ref2)
+  cm2 <- suppressWarnings(confusionMatrix(dat2, ref2))
+  cm3 <- suppressWarnings(confusionMatrix(dat3, ref2))
+  cm4 <- suppressWarnings(confusionMatrix(dat4, ref2))
   expect_true(class(cm1) == "confusionMatrix")
   expect_true(class(cm2) == "confusionMatrix")
   expect_true(class(cm3) == "confusionMatrix")