1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-09 13:42:04 +02:00

fixes for microorganisms.codes

This commit is contained in:
2019-05-28 16:50:40 +02:00
parent 7e0e171512
commit 27380fa021
73 changed files with 679 additions and 412 deletions

View File

@ -396,7 +396,7 @@ mo_validate <- function(x, property, ...) {
tryCatch(x[1L] %in% AMR::microorganisms[1, property],
error = function(e) stop(e$message, call. = FALSE))
if (!all(x %in% AMR::microorganisms[, property])
if (!all(x %in% pull(AMR::microorganisms, property))
| Becker %in% c(TRUE, "all")
| Lancefield %in% c(TRUE, "all")) {
exec_as.mo(x, property = property, ...)