use expect_null

KlausVigo · Dec 2, 2024 · 6649fc1 · 6649fc1
1 parent 714b369
commit 6649fc1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/inst/tinytest/test_bootstrap.R b/inst/tinytest/test_bootstrap.R
@@ -18,7 +18,7 @@ expect_true(all(tree1$node.label[-1] <= tree2$node.label[-1]))
 tree3 <- addConfidences(tree, bs_trees)
 expect_equal(tree1, tree3)
 nnet2 <- addConfidences(nnet, bs_trees)
-expect_true(is.null(attr(nnet$splits, "confidences")))
+expect_null(attr(nnet$splits, "confidences"))
 expect_false(is.null(attr(nnet2$splits, "confidences")))
 
 dat <- Laurasiatherian[sample(47, 10)] |> as.character() |> phyDat()