bactid speed improvement

2025-07-09 02:03:04 +02:00 · 2018-07-30 00:14:06 +02:00
parent 826694323b
commit d0a115d995
2 changed files with 76 additions and 45 deletions
--- a/tests/testthat/test-bactid.R
+++ b/tests/testthat/test-bactid.R
@ -68,4 +68,8 @@ test_that("as.bactid works", {
  expect_equal(nrow(data.frame(test = as.bactid("ESCCOL"))),
               1)

+  # check empty values
+  expect_equal(as.character(suppressWarnings(as.bactid(""))),
+               NA_character_)
+
 })