example_rules <- list("B_ESCHR_COLI" = list(
"AMK" = list(min = 2, max = 32),
"CHL" = list(min = 4, max = 64),
"GEN" = list(min = 1, max = 16),
"CIP" = list(min = 0.015, max = 4),
"MEM" = list(min = 0.016, max = 16),
"AMX" = list(min = 2, max = 64),
"AMC" = list(min = 2, max = 64),
"FEP" = list(min = 0.5, max = 64),
"CAZ" = list(min = 1, max = 128),
"TGC" = list(min = 0.25, max = 1)
))
mic_censor(AMR::as.mic(512),
"AMK",
"B_ESCHR_COLI",
example_rules) == AMR::as.mic(">32")
Run the code above in your browser using DataLab