mirror of
https://github.com/msberends/AMR.git
synced 2025-07-09 00:02:38 +02:00
AI improvements for microorganisms
This commit is contained in:
@ -1,6 +1,13 @@
|
||||
context("mo.R")
|
||||
|
||||
test_that("as.mo works", {
|
||||
|
||||
library(dplyr)
|
||||
MOs <- AMR::microorganisms %>% filter(!is.na(mo))
|
||||
|
||||
expect_identical(as.character(MOs$mo), as.character(as.mo(MOs$mo)))
|
||||
expect_identical(MOs$fullname, mo_fullname(MOs$fullname, language = "en"))
|
||||
|
||||
expect_identical(
|
||||
as.character(as.mo(c("E. coli", "H. influenzae"))),
|
||||
c("ESCCOL", "HAEINF"))
|
||||
|
Reference in New Issue
Block a user