(v2.1.1.9229) unit tests

This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2025-03-28 11:40:09 +01:00
1 parent 49da312506
commit bd873ac1bc
6 files changed
+13 -8

No files matched your search

+2 -1
View File
@@ -117,7 +117,7 @@ test_that("test-eucast_rules.R", {
TIC = as.sir("R"),
PIP = as.sir("S")
) %>%
eucast_rules(col_mo = "mo", version_expertrules = 3.1, info = FALSE, overwrite = TRUE) %>%
eucast_rules(col_mo = "mo", version_expertrules = 3.1, rules = "expert", info = FALSE, overwrite = TRUE) %>%
pull(PIP) %>%
unique() %>%
as.character()
@@ -136,6 +136,7 @@ test_that("test-eucast_rules.R", {
stringsAsFactors = FALSE
),
version_expertrules = 3.1,
rules = "expert",
overwrite = TRUE,
only_sir_columns = FALSE
)$CLR))