P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2024-12-27 12:06:14 +01:00
Code Releases Activity

unit test

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends 2023-04-15 10:32:37 +02:00
parent 1a02d302d4
commit ad3061c754
3 changed files with 4 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
DESCRIPTION
View File

@ -1,5 +1,5 @@
Package: AMR Package: AMR
Version: 2.0.0.9007 Version: 2.0.0.9008
Date: 2023-04-15 Date: 2023-04-15
Title: Antimicrobial Resistance Data Analysis Title: Antimicrobial Resistance Data Analysis
Description: Functions to simplify and standardise antimicrobial resistance (AMR) Description: Functions to simplify and standardise antimicrobial resistance (AMR)

2
NEWS.md
View File

@ -1,4 +1,4 @@
# AMR 2.0.0.9007 # AMR 2.0.0.9008
## Changed ## Changed
* formatting fix for `sir_interpretation_history()` * formatting fix for `sir_interpretation_history()`

9
inst/tinytest/test-mo.R
View File

@ -279,13 +279,8 @@ expect_equal(suppressWarnings(as.mo("Virus")), as.mo("UNKNOWN"))
expect_equal(length(summary(example_isolates$mo)), 6) expect_equal(length(summary(example_isolates$mo)), 6)
# WHONET codes and NA/NaN # WHONET codes and NA/NaN
expect_equal( expect_true(all(is.na(as.mo(c("xxx", "na", "nan")))))
as.character(as.mo(c("xxx", "na", "nan"))), expect_equal(as.character(as.mo(c("con", "eco"))), c("UNKNOWN", "B_ESCHR_COLI"))
rep(NA_character_, 3)
)
expect_equal(as.character(as.mo("con")), "UNKNOWN")
expect_equal(as.character(as.mo("xxx")), NA_character_)
expect_equal(as.character(as.mo(c("xxx", "con", "eco"))), c(NA_character_, "UNKNOWN", "B_ESCHR_COLI"))
expect_equal( expect_equal(
as.character(suppressWarnings(as.mo(c("other", "none", "unknown")))), as.character(suppressWarnings(as.mo(c("other", "none", "unknown")))),
rep("UNKNOWN", 3) rep("UNKNOWN", 3)