mirror of
https://github.com/msberends/AMR.git
synced 2025-07-08 16:42:10 +02:00
added Becker 2019
This commit is contained in:
@ -28,7 +28,7 @@ test_that("get_locale works", {
|
||||
expect_identical(mo_fullname("CoNS", "en"), "Coagulase-negative Staphylococcus (CoNS)")
|
||||
expect_identical(mo_fullname("CoNS", "de"), "Koagulase-negative Staphylococcus (KNS)")
|
||||
expect_identical(mo_fullname("CoNS", "nl"), "Coagulase-negatieve Staphylococcus (CNS)")
|
||||
expect_identical(mo_fullname("CoNS", "es"), "Staphylococcus coagulasa negativo (CoNS)")
|
||||
expect_identical(mo_fullname("CoNS", "es"), "Staphylococcus coagulasa negativo (SCN)")
|
||||
expect_identical(mo_fullname("CoNS", "it"), "Staphylococcus negativo coagulasi (CoNS)")
|
||||
# expect_identical(mo_fullname("CoNS", "fr"), "Staphylococcus \u00e0 coagulase n\u00e9gative (CoNS)")
|
||||
expect_identical(mo_fullname("CoNS", "pt"), "Staphylococcus coagulase negativo (CoNS)")
|
||||
|
@ -22,13 +22,23 @@
|
||||
context("mo_history.R")
|
||||
|
||||
test_that("mo_history works", {
|
||||
clean_mo_history()
|
||||
clean_mo_history(force = TRUE)
|
||||
expect_equal(read_mo_history(force = TRUE),
|
||||
NULL)
|
||||
|
||||
set_mo_history("testsubject", "B_ESCHR_COL", force = TRUE)
|
||||
expect_equal(get_mo_history("testsubject", force = TRUE),
|
||||
expect_equal(as.character(suppressWarnings(as.mo("testsubject"))), "UNKNOWN")
|
||||
|
||||
set_mo_history("testsubject", "B_ESCHR_COL",
|
||||
uncertainty_level = translate_allow_uncertain(TRUE),
|
||||
force = TRUE)
|
||||
|
||||
expect_equal(get_mo_history("testsubject",
|
||||
uncertainty_level = translate_allow_uncertain(TRUE),
|
||||
force = TRUE),
|
||||
"B_ESCHR_COL")
|
||||
|
||||
expect_equal(as.character(suppressWarnings(as.mo("testsubject"))), "B_ESCHR_COL")
|
||||
|
||||
expect_equal(colnames(read_mo_history(force = TRUE)),
|
||||
c("x", "mo", "package_version"))
|
||||
c("x", "mo", "uncertainty_level", "package_version"))
|
||||
})
|
||||
|
Reference in New Issue
Block a user