(v0.7.1.9093) as.ab() fix

This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2019-10-06 21:07:38 +02:00
1 parent 8bc4081b03
commit b6653a620a
13 files changed
+43 -41

No files matched your search

+3 -3
View File
@@ -23,11 +23,11 @@ context("data.R")
test_that("data sets are valid", {
# IDs should always be unique
expect_identical(nrow(antibiotics), length(unique(antibiotics$ab)))
expect_identical(class(antibiotics$ab), "ab")
expect_identical(nrow(microorganisms), length(unique(microorganisms$mo)))
expect_identical(class(microorganisms$mo), "mo")
expect_identical(nrow(antibiotics), length(unique(antibiotics$ab)))
expect_identical(class(antibiotics$ab), "ab")
# check cross table reference
expect_true(all(microorganisms.codes$mo %in% microorganisms$mo))
expect_true(all(example_isolates$mo %in% microorganisms$mo))