1
0
mirror of https://github.com/msberends/AMR.git synced 2025-12-18 20:20:23 +01:00

Built site for AMR@3.0.1.9003: ba30b08

This commit is contained in:
github-actions
2025-11-24 10:42:21 +00:00
parent 7d16891987
commit 141fc468f8
161 changed files with 21798 additions and 313 deletions

725
reference/mo_property.md Normal file
View File

@@ -0,0 +1,725 @@
# Get Properties of a Microorganism
Use these functions to return a specific property of a microorganism
based on the latest accepted taxonomy. All input values will be
evaluated internally with
[`as.mo()`](https://amr-for-r.org/reference/as.mo.md), which makes it
possible to use microbial abbreviations, codes and names as input. See
*Examples*.
## Usage
``` r
mo_name(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_fullname(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_shortname(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_subspecies(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_species(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_genus(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_family(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_order(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_class(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_phylum(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_kingdom(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_domain(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_type(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_status(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_pathogenicity(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_gramstain(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_is_gram_negative(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_is_gram_positive(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_is_yeast(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_is_intrinsic_resistant(x, ab, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_oxygen_tolerance(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_is_anaerobic(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_snomed(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_ref(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_authors(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_year(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_lpsn(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_mycobank(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_gbif(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_rank(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_taxonomy(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_synonyms(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_current(x, language = get_AMR_locale(), ...)
mo_group_members(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_info(x, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_url(x, open = FALSE, language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
mo_property(x, property = "fullname", language = get_AMR_locale(),
keep_synonyms = getOption("AMR_keep_synonyms", FALSE), ...)
```
## Arguments
- x:
Any [character](https://rdrr.io/r/base/character.html) (vector) that
can be coerced to a valid microorganism code with
[`as.mo()`](https://amr-for-r.org/reference/as.mo.md). Can be left
blank for auto-guessing the column containing microorganism codes if
used in a data set, see *Examples*.
- language:
Language to translate text like "no growth", which defaults to the
system language (see
[`get_AMR_locale()`](https://amr-for-r.org/reference/translate.md)).
- keep_synonyms:
A [logical](https://rdrr.io/r/base/logical.html) to indicate if old,
previously valid taxonomic names must be preserved and not be
corrected to currently accepted names. The default is `FALSE`, which
will return a note if old taxonomic names were processed. The default
can be set with the package option
[`AMR_keep_synonyms`](https://amr-for-r.org/reference/AMR-options.md),
i.e. `options(AMR_keep_synonyms = TRUE)` or
`options(AMR_keep_synonyms = FALSE)`.
- ...:
Other arguments passed on to
[`as.mo()`](https://amr-for-r.org/reference/as.mo.md), such as
'minimum_matching_score', 'ignore_pattern', and 'remove_from_input'.
- ab:
Any (vector of) text that can be coerced to a valid antibiotic drug
code with [`as.ab()`](https://amr-for-r.org/reference/as.ab.md).
- open:
Browse the URL using
[`browseURL()`](https://rdrr.io/r/utils/browseURL.html).
- property:
One of the column names of the
[microorganisms](https://amr-for-r.org/reference/microorganisms.md)
data set: "mo", "fullname", "status", "kingdom", "phylum", "class",
"order", "family", "genus", "species", "subspecies", "rank", "ref",
"oxygen_tolerance", "source", "lpsn", "lpsn_parent",
"lpsn_renamed_to", "mycobank", "mycobank_parent",
"mycobank_renamed_to", "gbif", "gbif_parent", "gbif_renamed_to",
"prevalence", or "snomed", or must be `"shortname"`.
## Value
- An [integer](https://rdrr.io/r/base/integer.html) in case of
`mo_year()`
- An [ordered factor](https://rdrr.io/r/base/factor.html) in case of
`mo_pathogenicity()`
- A [list](https://rdrr.io/r/base/list.html) in case of `mo_taxonomy()`,
`mo_synonyms()`, `mo_snomed()`, and `mo_info()`
- A [logical](https://rdrr.io/r/base/logical.html) in case of
`mo_is_anaerobic()`, `mo_is_gram_negative()`, `mo_is_gram_positive()`,
`mo_is_intrinsic_resistant()`, and `mo_is_yeast()`
- A named [character](https://rdrr.io/r/base/character.html) in case of
`mo_synonyms()` and `mo_url()`
- A [character](https://rdrr.io/r/base/character.html) in all other
cases
## Details
All functions will, at default, **not** keep old taxonomic properties,
as synonyms are automatically replaced with the current taxonomy. Take
for example *Enterobacter aerogenes*, which was initially named in 1960
but renamed to *Klebsiella aerogenes* in 2017:
- `mo_genus("Enterobacter aerogenes")` will return `"Klebsiella"` (with
a note about the renaming)
- `mo_genus("Enterobacter aerogenes", keep_synonyms = TRUE)` will return
`"Enterobacter"` (with a once-per-session warning that the name is
outdated)
- `mo_ref("Enterobacter aerogenes")` will return
`"Tindall et al., 2017"` (with a note about the renaming)
- `mo_ref("Enterobacter aerogenes", keep_synonyms = TRUE)` will return
`"Hormaeche et al., 1960"` (with a once-per-session warning that the
name is outdated)
The short name (`mo_shortname()`) returns the first character of the
genus and the full species, such as `"E. coli"`, for species and
subspecies. Exceptions are abbreviations of staphylococci (such as
*"CoNS"*, Coagulase-Negative Staphylococci) and beta-haemolytic
streptococci (such as *"GBS"*, Group B Streptococci). Please bear in
mind that e.g. *E. coli* could mean *Escherichia coli* (kingdom of
Bacteria) as well as *Entamoeba coli* (kingdom of Protozoa). Returning
to the full name will be done using
[`as.mo()`](https://amr-for-r.org/reference/as.mo.md) internally, giving
priority to bacteria and human pathogens, i.e. `"E. coli"` will be
considered *Escherichia coli*. As a result,
`mo_fullname(mo_shortname("Entamoeba coli"))` returns
`"Escherichia coli"`.
Since the top-level of the taxonomy is sometimes referred to as
'kingdom' and sometimes as 'domain', the functions `mo_kingdom()` and
`mo_domain()` return the exact same results.
Determination of human pathogenicity (`mo_pathogenicity()`) is strongly
based on Bartlett *et al.* (2022,
[doi:10.1099/mic.0.001269](https://doi.org/10.1099/mic.0.001269) ). This
function returns a [factor](https://rdrr.io/r/base/factor.html) with the
levels *Pathogenic*, *Potentially pathogenic*, *Non-pathogenic*, and
*Unknown*.
Determination of the Gram stain (`mo_gramstain()`) will be based on the
taxonomic kingdom and phylum. Originally, Cavalier-Smith defined the
so-called subkingdoms Negibacteria and Posibacteria (2002, [PMID
11837318](https://pubmed.ncbi.nlm.nih.gov/11837318/)), and only
considered these phyla as Posibacteria: Actinobacteria, Chloroflexi,
Firmicutes, and Tenericutes. These phyla were later renamed to
Actinomycetota, Chloroflexota, Bacillota, and Mycoplasmatota (2021,
[PMID 34694987](https://pubmed.ncbi.nlm.nih.gov/34694987/)). Bacteria in
these phyla are considered Gram-positive in this `AMR` package, except
for members of the class Negativicutes (within phylum Bacillota) which
are Gram-negative. All other bacteria are considered Gram-negative.
Species outside the kingdom of Bacteria will return a value `NA`.
Functions `mo_is_gram_negative()` and `mo_is_gram_positive()` always
return `TRUE` or `FALSE` (or `NA` when the input is `NA` or the MO code
is `UNKNOWN`), thus always return `FALSE` for species outside the
taxonomic kingdom of Bacteria.
Determination of yeasts (`mo_is_yeast()`) will be based on the taxonomic
kingdom and class. *Budding yeasts* are yeasts that reproduce asexually
through a process called budding, where a new cell develops from a small
protrusion on the parent cell. Taxonomically, these are members of the
phylum Ascomycota, class Saccharomycetes (also called Hemiascomycetes)
or Pichiomycetes. *True yeasts* quite specifically refers to yeasts in
the underlying order Saccharomycetales (such as *Saccharomyces
cerevisiae*). Thus, for all microorganisms that are member of the
taxonomic class Saccharomycetes or Pichiomycetes, the function will
return `TRUE`. It returns `FALSE` otherwise (or `NA` when the input is
`NA` or the MO code is `UNKNOWN`).
Determination of intrinsic resistance (`mo_is_intrinsic_resistant()`)
will be based on the
[intrinsic_resistant](https://amr-for-r.org/reference/intrinsic_resistant.md)
data set, which is based on ['EUCAST Expected Resistant Phenotypes'
v1.2](https://www.eucast.org/expert_rules_and_expected_phenotypes)
(2023). The `mo_is_intrinsic_resistant()` function can be vectorised
over both argument `x` (input for microorganisms) and `ab` (input for
antimicrobials).
Determination of bacterial oxygen tolerance (`mo_oxygen_tolerance()`)
will be based on BacDive, see *Source*. The function `mo_is_anaerobic()`
only returns `TRUE` if the oxygen tolerance is `"anaerobe"`, indicting
an obligate anaerobic species or genus. It always returns `FALSE` for
species outside the taxonomic kingdom of Bacteria.
The function `mo_url()` will return the direct URL to the online
database entry, which also shows the scientific reference of the
concerned species. [This MycoBank URL](https://www.mycobank.org) will be
used for fungi wherever available , [this LPSN
URL](https://www.mycobank.org) for bacteria wherever available, and
[this GBIF link](https://www.gbif.org) otherwise.
SNOMED codes (`mo_snomed()`) was last updated on July 16th, 2024. See
*Source* and the
[microorganisms](https://amr-for-r.org/reference/microorganisms.md) data
set for more info.
Old taxonomic names (so-called 'synonyms') can be retrieved with
`mo_synonyms()` (which will have the scientific reference as
[name](https://rdrr.io/r/base/names.html)), the current taxonomic name
can be retrieved with `mo_current()`. Both functions return full names.
All output [will be
translated](https://amr-for-r.org/reference/translate.md) where
possible.
## Matching Score for Microorganisms
This function uses [`as.mo()`](https://amr-for-r.org/reference/as.mo.md)
internally, which uses an advanced algorithm to translate arbitrary user
input to valid taxonomy using a so-called matching score. You can read
about this public algorithm on the [MO matching score
page](https://amr-for-r.org/reference/mo_matching_score.md).
## Source
- Berends MS *et al.* (2022). **AMR: An R Package for Working with
Antimicrobial Resistance Data**. *Journal of Statistical Software*,
104(3), 1-31;
[doi:10.18637/jss.v104.i03](https://doi.org/10.18637/jss.v104.i03)
- Parte, AC *et al.* (2020). **List of Prokaryotic names with Standing
in Nomenclature (LPSN) moves to the DSMZ.** International Journal of
Systematic and Evolutionary Microbiology, 70, 5607-5612;
[doi:10.1099/ijsem.0.004332](https://doi.org/10.1099/ijsem.0.004332) .
Accessed from <https://lpsn.dsmz.de> on June 24th, 2024.
- Vincent, R *et al* (2013). **MycoBank gearing up for new horizons.**
IMA Fungus, 4(2), 371-9;
[doi:10.5598/imafungus.2013.04.02.16](https://doi.org/10.5598/imafungus.2013.04.02.16)
. Accessed from <https://www.mycobank.org> on June 24th, 2024.
- GBIF Secretariat (2023). GBIF Backbone Taxonomy. Checklist dataset
[doi:10.15468/39omei](https://doi.org/10.15468/39omei) . Accessed from
<https://www.gbif.org> on June 24th, 2024.
- Reimer, LC *et al.* (2022). ***BacDive* in 2022: the knowledge base
for standardized bacterial and archaeal data.** Nucleic Acids Res.,
50(D1):D741-D74;
[doi:10.1093/nar/gkab961](https://doi.org/10.1093/nar/gkab961) .
Accessed from <https://bacdive.dsmz.de> on July 16th, 2024.
- Public Health Information Network Vocabulary Access and Distribution
System (PHIN VADS). US Edition of SNOMED CT from 1 September 2020.
Value Set Name 'Microorganism', OID 2.16.840.1.114222.4.11.1009 (v12).
URL: <https://www.cdc.gov/phin/php/phinvads/>
- Bartlett A *et al.* (2022). **A comprehensive list of bacterial
pathogens infecting humans** *Microbiology* 168:001269;
[doi:10.1099/mic.0.001269](https://doi.org/10.1099/mic.0.001269)
## Download Our Reference Data
All reference data sets in the AMR package - including information on
microorganisms, antimicrobials, and clinical breakpoints - are freely
available for download in multiple formats: R, MS Excel, Apache Feather,
Apache Parquet, SPSS, and Stata.
For maximum compatibility, we also provide machine-readable,
tab-separated plain text files suitable for use in any software,
including laboratory information systems.
Visit [our website for direct download
links](https://amr-for-r.org/articles/datasets.html), or explore the
actual files in [our GitHub
repository](https://github.com/msberends/AMR/tree/main/data-raw/datasets).
## See also
Data set
[microorganisms](https://amr-for-r.org/reference/microorganisms.md)
## Examples
``` r
# taxonomic tree -----------------------------------------------------------
mo_kingdom("Klebsiella pneumoniae")
#> [1] "Bacteria"
mo_phylum("Klebsiella pneumoniae")
#> [1] "Pseudomonadota"
mo_class("Klebsiella pneumoniae")
#> [1] "Gammaproteobacteria"
mo_order("Klebsiella pneumoniae")
#> [1] "Enterobacterales"
mo_family("Klebsiella pneumoniae")
#> [1] "Enterobacteriaceae"
mo_genus("Klebsiella pneumoniae")
#> [1] "Klebsiella"
mo_species("Klebsiella pneumoniae")
#> [1] "pneumoniae"
mo_subspecies("Klebsiella pneumoniae")
#> [1] ""
# full names and short names -----------------------------------------------
mo_name("Klebsiella pneumoniae")
#> [1] "Klebsiella pneumoniae"
mo_fullname("Klebsiella pneumoniae")
#> [1] "Klebsiella pneumoniae"
mo_shortname("Klebsiella pneumoniae")
#> [1] "K. pneumoniae"
# other properties ---------------------------------------------------------
mo_pathogenicity("Klebsiella pneumoniae")
#> [1] Pathogenic
#> Levels: Pathogenic < Potentially pathogenic < Non-pathogenic < Unknown
mo_gramstain("Klebsiella pneumoniae")
#> [1] "Gram-negative"
mo_snomed("Klebsiella pneumoniae")
#> [[1]]
#> [1] "1098101000112102" "446870005" "1098201000112108" "409801009"
#> [5] "56415008" "714315002" "713926009"
#>
mo_type("Klebsiella pneumoniae")
#> [1] "Bacteria"
mo_rank("Klebsiella pneumoniae")
#> [1] "species"
mo_url("Klebsiella pneumoniae")
#> Klebsiella pneumoniae
#> "https://lpsn.dsmz.de/species/klebsiella-pneumoniae"
mo_is_yeast(c("Candida", "Trichophyton", "Klebsiella"))
#> [1] TRUE FALSE FALSE
mo_group_members(c(
"Streptococcus group A",
"Streptococcus group C",
"Streptococcus group G",
"Streptococcus group L"
))
#> $`Streptococcus Group A`
#> [1] "Streptococcus pyogenes"
#>
#> $`Streptococcus Group C`
#> [1] "Streptococcus dysgalactiae"
#> [2] "Streptococcus dysgalactiae dysgalactiae"
#> [3] "Streptococcus dysgalactiae equisimilis"
#> [4] "Streptococcus equi"
#> [5] "Streptococcus equi equi"
#> [6] "Streptococcus equi ruminatorum"
#> [7] "Streptococcus equi zooepidemicus"
#>
#> $`Streptococcus Group G`
#> [1] "Streptococcus canis"
#> [2] "Streptococcus dysgalactiae"
#> [3] "Streptococcus dysgalactiae dysgalactiae"
#> [4] "Streptococcus dysgalactiae equisimilis"
#>
#> $`Streptococcus Group L`
#> [1] "Streptococcus dysgalactiae"
#> [2] "Streptococcus dysgalactiae dysgalactiae"
#> [3] "Streptococcus dysgalactiae equisimilis"
#>
# scientific reference -----------------------------------------------------
mo_ref("Klebsiella aerogenes")
#> [1] "Tindall et al., 2017"
mo_authors("Klebsiella aerogenes")
#> [1] "Tindall et al."
mo_year("Klebsiella aerogenes")
#> [1] 2017
mo_synonyms("Klebsiella aerogenes")
#> Hormaeche et al., 1960 Bascomb et al., 1971
#> "Enterobacter aerogenes" "Klebsiella mobilis"
mo_lpsn("Klebsiella aerogenes")
#> [1] "777146"
mo_gbif("Klebsiella aerogenes")
#> [1] "9281703"
mo_mycobank("Candida albicans")
#> [1] "256187"
mo_mycobank("Candida krusei")
#> [1] "337013"
mo_mycobank("Candida krusei", keep_synonyms = TRUE)
#> Warning: Function `as.mo()` returned one old taxonomic name. Use `as.mo(...,
#> keep_synonyms = FALSE)` to clean the input to currently accepted taxonomic
#> names, or set the R option `AMR_keep_synonyms` to `FALSE`. This warning
#> will be shown once per session.
#> [1] "268707"
# abbreviations known in the field -----------------------------------------
mo_genus("MRSA")
#> [1] "Staphylococcus"
mo_species("MRSA")
#> [1] "aureus"
mo_shortname("VISA")
#> [1] "S. aureus"
mo_gramstain("VISA")
#> [1] "Gram-positive"
mo_genus("EHEC")
#> [1] "Escherichia"
mo_species("EIEC")
#> [1] "coli"
mo_name("UPEC")
#> [1] "Escherichia coli"
# known subspecies ---------------------------------------------------------
mo_fullname("K. pneu rh")
#> [1] "Klebsiella pneumoniae rhinoscleromatis"
mo_shortname("K. pneu rh")
#> [1] "K. pneumoniae"
# \donttest{
# Becker classification, see ?as.mo ----------------------------------------
mo_fullname("Staph epidermidis")
#> [1] "Staphylococcus epidermidis"
mo_fullname("Staph epidermidis", Becker = TRUE)
#> [1] "Coagulase-negative Staphylococcus (CoNS)"
mo_shortname("Staph epidermidis")
#> [1] "S. epidermidis"
mo_shortname("Staph epidermidis", Becker = TRUE)
#> [1] "CoNS"
# Lancefield classification, see ?as.mo ------------------------------------
mo_fullname("Strep agalactiae")
#> [1] "Streptococcus agalactiae"
mo_fullname("Strep agalactiae", Lancefield = TRUE)
#> [1] "Streptococcus Group B"
mo_shortname("Strep agalactiae")
#> [1] "S. agalactiae"
mo_shortname("Strep agalactiae", Lancefield = TRUE)
#> [1] "GBS"
# language support --------------------------------------------------------
mo_gramstain("Klebsiella pneumoniae", language = "de") # German
#> [1] "Gramnegativ"
mo_gramstain("Klebsiella pneumoniae", language = "nl") # Dutch
#> [1] "Gram-negatief"
mo_gramstain("Klebsiella pneumoniae", language = "es") # Spanish
#> [1] "Gram negativo"
mo_gramstain("Klebsiella pneumoniae", language = "el") # Greek
#> [1] "Αρνητικό κατά Gram"
mo_gramstain("Klebsiella pneumoniae", language = "uk") # Ukrainian
#> [1] "Грамнегативні"
# mo_type is equal to mo_kingdom, but mo_kingdom will remain untranslated
mo_kingdom("Klebsiella pneumoniae")
#> [1] "Bacteria"
mo_type("Klebsiella pneumoniae")
#> [1] "Bacteria"
mo_kingdom("Klebsiella pneumoniae", language = "zh") # Chinese, no effect
#> [1] "Bacteria"
mo_type("Klebsiella pneumoniae", language = "zh") # Chinese, translated
#> [1] "细菌"
mo_fullname("S. pyogenes", Lancefield = TRUE, language = "de")
#> [1] "Streptococcus Gruppe A"
mo_fullname("S. pyogenes", Lancefield = TRUE, language = "uk")
#> [1] "Streptococcus Група A"
# other --------------------------------------------------------------------
# gram stains and intrinsic resistance can be used as a filter in dplyr verbs
if (require("dplyr")) {
example_isolates %>%
filter(mo_is_gram_positive()) %>%
count(mo_genus(), sort = TRUE)
}
#> Using column 'mo' as input for `mo_is_gram_positive()`
#> Using column 'mo' as input for `mo_genus()`
#> # A tibble: 18 × 2
#> `mo_genus()` n
#> <chr> <int>
#> 1 Staphylococcus 840
#> 2 Streptococcus 275
#> 3 Enterococcus 83
#> 4 Corynebacterium 17
#> 5 Micrococcus 6
#> 6 Gemella 3
#> 7 Aerococcus 2
#> 8 Cutibacterium 1
#> 9 Dermabacter 1
#> 10 Fusibacter 1
#> 11 Globicatella 1
#> 12 Granulicatella 1
#> 13 Lactobacillus 1
#> 14 Leuconostoc 1
#> 15 Listeria 1
#> 16 Paenibacillus 1
#> 17 Rothia 1
#> 18 Schaalia 1
if (require("dplyr")) {
example_isolates %>%
filter(mo_is_intrinsic_resistant(ab = "vanco")) %>%
count(mo_genus(), sort = TRUE)
}
#> Using column 'mo' as input for `mo_is_intrinsic_resistant()`
#> Using column 'mo' as input for `mo_genus()`
#> # A tibble: 19 × 2
#> `mo_genus()` n
#> <chr> <int>
#> 1 Escherichia 467
#> 2 Klebsiella 77
#> 3 Proteus 39
#> 4 Pseudomonas 30
#> 5 Serratia 25
#> 6 Enterobacter 23
#> 7 Citrobacter 11
#> 8 Haemophilus 9
#> 9 Acinetobacter 6
#> 10 Morganella 6
#> 11 Pantoea 4
#> 12 Salmonella 3
#> 13 Neisseria 2
#> 14 Stenotrophomonas 2
#> 15 Campylobacter 1
#> 16 Enterococcus 1
#> 17 Hafnia 1
#> 18 Leuconostoc 1
#> 19 Pseudescherichia 1
# get a list with the complete taxonomy (from kingdom to subspecies)
mo_taxonomy("Klebsiella pneumoniae")
#> $kingdom
#> [1] "Bacteria"
#>
#> $phylum
#> [1] "Pseudomonadota"
#>
#> $class
#> [1] "Gammaproteobacteria"
#>
#> $order
#> [1] "Enterobacterales"
#>
#> $family
#> [1] "Enterobacteriaceae"
#>
#> $genus
#> [1] "Klebsiella"
#>
#> $species
#> [1] "pneumoniae"
#>
#> $subspecies
#> [1] ""
#>
# get a list with the taxonomy, the authors, Gram-stain,
# SNOMED codes, and URL to the online database
mo_info("Klebsiella pneumoniae")
#> $mo
#> [1] "B_KLBSL_PNMN"
#>
#> $rank
#> [1] "species"
#>
#> $kingdom
#> [1] "Bacteria"
#>
#> $phylum
#> [1] "Pseudomonadota"
#>
#> $class
#> [1] "Gammaproteobacteria"
#>
#> $order
#> [1] "Enterobacterales"
#>
#> $family
#> [1] "Enterobacteriaceae"
#>
#> $genus
#> [1] "Klebsiella"
#>
#> $species
#> [1] "pneumoniae"
#>
#> $subspecies
#> [1] ""
#>
#> $status
#> [1] "accepted"
#>
#> $synonyms
#> NULL
#>
#> $gramstain
#> [1] "Gram-negative"
#>
#> $oxygen_tolerance
#> [1] "facultative anaerobe"
#>
#> $url
#> [1] "https://lpsn.dsmz.de/species/klebsiella-pneumoniae"
#>
#> $ref
#> [1] "Trevisan, 1887"
#>
#> $snomed
#> [1] "1098101000112102" "446870005" "1098201000112108" "409801009"
#> [5] "56415008" "714315002" "713926009"
#>
#> $lpsn
#> [1] "777151"
#>
#> $mycobank
#> [1] NA
#>
#> $gbif
#> [1] "3221874"
#>
#> $group_members
#> character(0)
#>
# }
```