1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-18 10:43:16 +02:00

Support for German and Spanish microorganism properties, cleanup

This commit is contained in:
2018-09-04 11:33:30 +02:00
parent 5405002119
commit b388e3fee7
20 changed files with 256 additions and 157 deletions

View File

@ -16,9 +16,11 @@ test_that("deprecated functions work", {
old_mo <- "ESCCOL"
class(old_mo) <- "bactid"
df_oldmo <- data.frame(test = old_mo)
# print
expect_output(print(old_mo))
# test data.frame and pull
expect_equal(as.character(dplyr::pull(data.frame(test = old_mo), test)), "ESCCOL")
# test pull
library(dplyr)
expect_identical(df_oldmo %>% pull(test), old_mo)
})