unit tests

2025-07-12 07:41:58 +02:00 · 2019-02-21 23:32:30 +01:00
parent bd2a256969
commit 6c542268be
16 changed files with 534 additions and 296 deletions
--- a/tests/testthat/test-mo_property.R
+++ b/tests/testthat/test-mo_property.R
@ -75,6 +75,9 @@ test_that("mo_property works", {
  expect_identical(mo_property("E. coli", property = "species"),
                   mo_species("E. coli"))

+  expect_identical(suppressWarnings(mo_ref("Chlamydia psittaci")), "Page, 1968")
+  expect_identical(mo_ref("Chlamydophila psittaci"), "Everett et al., 1999")
+
  # check vector with random values
  #library(dplyr)
  #df_sample <- AMR::microorganisms %>% sample_n(100)