(v1.6.0.9028) new unit test flow

2025-09-04 13:29:46 +02:00 · 2021-05-13 22:44:11 +02:00
parent 5b9fb8daf4
commit 9ed2f6490f
31 changed files with 108 additions and 99 deletions
--- a/tests/testthat/test-mo_property.R
+++ b/tests/testthat/test-mo_property.R
@@ -131,7 +131,7 @@ test_that("mo_property works", {
  expect_equal(mo_name("test", reference_df = data.frame(col1 = "test", mo = "B_ESCHR_COLI")), 
               "Escherichia coli")
  
-  if (require("dplyr")) {
+  if (suppressWarnings(require("dplyr"))) {
    expect_equal(example_isolates %>% filter(mo_is_gram_negative()) %>% nrow(),
                 730)
    expect_equal(example_isolates %>% filter(mo_is_gram_positive()) %>% nrow(),