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

fix for mo type translation

This commit is contained in:
2022-10-06 12:11:51 +02:00
parent b9342d103e
commit b753b84128
6 changed files with 22 additions and 20 deletions

View File

@ -115,10 +115,10 @@
#'
#' \donttest{
#' # Becker classification, see ?as.mo ----------------------------------------
#' mo_fullname("Staph. epi")
#' mo_fullname("Staph. epi", Becker = TRUE)
#' mo_shortname("Staph. epi")
#' mo_shortname("Staph. epi", Becker = TRUE)
#' mo_fullname("Staph. epidermidis")
#' mo_fullname("Staph. epidermidis", Becker = TRUE)
#' mo_shortname("Staph. epidermidis")
#' mo_shortname("Staph. epidermidis", Becker = TRUE)
#'
#' # Lancefield classification, see ?as.mo ------------------------------------
#' mo_fullname("S. pyo")
@ -137,7 +137,8 @@
#' # mo_type is equal to mo_kingdom, but mo_kingdom will remain official
#' mo_kingdom("Klebsiella pneumoniae")
#' mo_type("Klebsiella pneumoniae")
#' mo_type("Klebsiella pneumoniae", language = "nl")
#' mo_kingdom("Klebsiella pneumoniae", language = "zh") # Chinese, no effect
#' mo_type("Klebsiella pneumoniae", language = "zh") # Chinese, translated
#'
#' mo_fullname("S. pyogenes", Lancefield = TRUE, language = "de")
#' mo_fullname("S. pyogenes", Lancefield = TRUE, language = "uk")
@ -151,12 +152,12 @@
#' if (require("dplyr")) {
#' example_isolates %>%
#' filter(mo_is_gram_positive()) %>%
#' count(mo_genus(), count = TRUE)
#' count(mo_genus(), sort = TRUE)
#' }
#' if (require("dplyr")) {
#' example_isolates %>%
#' filter(mo_is_intrinsic_resistant(ab = "vanco")) %>%
#' count(mo_genus(), count = TRUE)
#' count(mo_genus(), sort = TRUE)
#' }
#'
#'