1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 14:01:55 +02:00
This commit is contained in:
2019-01-03 23:56:19 +01:00
parent 6b2d464f8c
commit 80ea555663
14 changed files with 533 additions and 270 deletions

View File

@ -25,22 +25,27 @@
\usage{
eucast_rules(tbl, col_mo = NULL, info = TRUE,
rules = c("breakpoints", "expert", "other", "all"), verbose = FALSE,
amcl = "amcl", amik = "amik", amox = "amox", ampi = "ampi",
azit = "azit", azlo = "azlo", aztr = "aztr", cefa = "cefa",
cfep = "cfep", cfot = "cfot", cfox = "cfox", cfra = "cfra",
cfta = "cfta", cftr = "cftr", cfur = "cfur", chlo = "chlo",
cipr = "cipr", clar = "clar", clin = "clin", clox = "clox",
coli = "coli", czol = "czol", dapt = "dapt", doxy = "doxy",
erta = "erta", eryt = "eryt", fosf = "fosf", fusi = "fusi",
gent = "gent", imip = "imip", kana = "kana", levo = "levo",
linc = "linc", line = "line", mero = "mero", mezl = "mezl",
mino = "mino", moxi = "moxi", nali = "nali", neom = "neom",
neti = "neti", nitr = "nitr", norf = "norf", novo = "novo",
oflo = "oflo", oxac = "oxac", peni = "peni", pipe = "pipe",
pita = "pita", poly = "poly", pris = "pris", qida = "qida",
rifa = "rifa", roxi = "roxi", siso = "siso", teic = "teic",
tetr = "tetr", tica = "tica", tige = "tige", tobr = "tobr",
trim = "trim", trsu = "trsu", vanc = "vanc")
amcl = guess_ab(), amik = guess_ab(), amox = guess_ab(),
ampi = guess_ab(), azit = guess_ab(), azlo = guess_ab(),
aztr = guess_ab(), cefa = guess_ab(), cfep = guess_ab(),
cfot = guess_ab(), cfox = guess_ab(), cfra = guess_ab(),
cfta = guess_ab(), cftr = guess_ab(), cfur = guess_ab(),
chlo = guess_ab(), cipr = guess_ab(), clar = guess_ab(),
clin = guess_ab(), clox = guess_ab(), coli = guess_ab(),
czol = guess_ab(), dapt = guess_ab(), doxy = guess_ab(),
erta = guess_ab(), eryt = guess_ab(), fosf = guess_ab(),
fusi = guess_ab(), gent = guess_ab(), imip = guess_ab(),
kana = guess_ab(), levo = guess_ab(), linc = guess_ab(),
line = guess_ab(), mero = guess_ab(), mezl = guess_ab(),
mino = guess_ab(), moxi = guess_ab(), nali = guess_ab(),
neom = guess_ab(), neti = guess_ab(), nitr = guess_ab(),
norf = guess_ab(), novo = guess_ab(), oflo = guess_ab(),
oxac = guess_ab(), peni = guess_ab(), pipe = guess_ab(),
pita = guess_ab(), poly = guess_ab(), pris = guess_ab(),
qida = guess_ab(), rifa = guess_ab(), roxi = guess_ab(),
siso = guess_ab(), teic = guess_ab(), tetr = guess_ab(),
tica = guess_ab(), tige = guess_ab(), tobr = guess_ab(),
trim = guess_ab(), trsu = guess_ab(), vanc = guess_ab())
EUCAST_rules(...)
@ -69,7 +74,7 @@ Apply susceptibility rules as defined by the European Committee on Antimicrobial
}
\section{Antibiotics}{
To define antibiotics column names, input a text (case-insensitive) or use \code{NULL} to skip a column (e.g. \code{tica = NULL}). Non-existing columns will anyway be skipped with a warning.
To define antibiotics column names, leave as it is to determine it automatically with \code{\link{guess_ab}} or input a text (case-insensitive) or use \code{NULL} to skip a column (e.g. \code{tica = NULL}). Non-existing columns will anyway be skipped with a warning.
Abbrevations of the column containing antibiotics in the form: \strong{abbreviation}: generic name (\emph{ATC code})

24
man/guess_ab.Rd Normal file
View File

@ -0,0 +1,24 @@
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/guess_ab.R
\name{guess_ab}
\alias{guess_ab}
\title{Guess antibiotic column}
\usage{
guess_ab(tbl = NULL, col = NULL, verbose = FALSE)
}
\arguments{
\item{tbl}{a \code{data.frame}}
\item{col}{a character to look for}
\item{verbose}{a logical to indicate whether additional info should be printed}
}
\description{
This tries to find a column name in a data set based on information from the \code{\link{antibiotics}} data set.
}
\section{Read more on our website!}{
\if{html}{\figure{logo.png}{options: height=40px style=margin-bottom:5px} \cr}
On our website \url{https://msberends.gitlab.io/AMR} you can find \href{https://msberends.gitlab.io/AMR/articles/AMR.html}{a omprehensive tutorial} about how to conduct AMR analysis and find \href{https://msberends.gitlab.io/AMR/reference}{the complete documentation of all functions}, which reads a lot easier than in R.
}

View File

@ -5,13 +5,17 @@
\alias{key_antibiotics_equal}
\title{Key antibiotics for first \emph{weighted} isolates}
\usage{
key_antibiotics(tbl, col_mo = NULL, universal_1 = "amox",
universal_2 = "amcl", universal_3 = "cfur", universal_4 = "pita",
universal_5 = "cipr", universal_6 = "trsu", GramPos_1 = "vanc",
GramPos_2 = "teic", GramPos_3 = "tetr", GramPos_4 = "eryt",
GramPos_5 = "oxac", GramPos_6 = "rifa", GramNeg_1 = "gent",
GramNeg_2 = "tobr", GramNeg_3 = "coli", GramNeg_4 = "cfot",
GramNeg_5 = "cfta", GramNeg_6 = "mero", warnings = TRUE, ...)
key_antibiotics(tbl, col_mo = NULL, universal_1 = guess_ab(tbl,
"amox"), universal_2 = guess_ab(tbl, "amcl"),
universal_3 = guess_ab(tbl, "cfur"), universal_4 = guess_ab(tbl,
"pita"), universal_5 = guess_ab(tbl, "cipr"),
universal_6 = guess_ab(tbl, "trsu"), GramPos_1 = guess_ab(tbl,
"vanc"), GramPos_2 = guess_ab(tbl, "teic"), GramPos_3 = guess_ab(tbl,
"tetr"), GramPos_4 = guess_ab(tbl, "eryt"), GramPos_5 = guess_ab(tbl,
"oxac"), GramPos_6 = guess_ab(tbl, "rifa"), GramNeg_1 = guess_ab(tbl,
"gent"), GramNeg_2 = guess_ab(tbl, "tobr"), GramNeg_3 = guess_ab(tbl,
"coli"), GramNeg_4 = guess_ab(tbl, "cfot"), GramNeg_5 = guess_ab(tbl,
"cfta"), GramNeg_6 = guess_ab(tbl, "mero"), warnings = TRUE, ...)
key_antibiotics_equal(x, y, type = c("keyantibiotics", "points"),
ignore_I = TRUE, points_threshold = 2, info = FALSE)

View File

@ -8,21 +8,26 @@
\title{Determine multidrug-resistant organisms (MDRO)}
\usage{
mdro(tbl, country = NULL, col_mo = NULL, info = TRUE,
amcl = "amcl", amik = "amik", amox = "amox", ampi = "ampi",
azit = "azit", aztr = "aztr", cefa = "cefa", cfra = "cfra",
cfep = "cfep", cfot = "cfot", cfox = "cfox", cfta = "cfta",
cftr = "cftr", cfur = "cfur", chlo = "chlo", cipr = "cipr",
clar = "clar", clin = "clin", clox = "clox", coli = "coli",
czol = "czol", dapt = "dapt", doxy = "doxy", erta = "erta",
eryt = "eryt", fosf = "fosf", fusi = "fusi", gent = "gent",
imip = "imip", kana = "kana", levo = "levo", linc = "linc",
line = "line", mero = "mero", metr = "metr", mino = "mino",
moxi = "moxi", nali = "nali", neom = "neom", neti = "neti",
nitr = "nitr", novo = "novo", norf = "norf", oflo = "oflo",
peni = "peni", pipe = "pipe", pita = "pita", poly = "poly",
qida = "qida", rifa = "rifa", roxi = "roxi", siso = "siso",
teic = "teic", tetr = "tetr", tica = "tica", tige = "tige",
tobr = "tobr", trim = "trim", trsu = "trsu", vanc = "vanc")
amcl = guess_ab(), amik = guess_ab(), amox = guess_ab(),
ampi = guess_ab(), azit = guess_ab(), aztr = guess_ab(),
cefa = guess_ab(), cfra = guess_ab(), cfep = guess_ab(),
cfot = guess_ab(), cfox = guess_ab(), cfta = guess_ab(),
cftr = guess_ab(), cfur = guess_ab(), chlo = guess_ab(),
cipr = guess_ab(), clar = guess_ab(), clin = guess_ab(),
clox = guess_ab(), coli = guess_ab(), czol = guess_ab(),
dapt = guess_ab(), doxy = guess_ab(), erta = guess_ab(),
eryt = guess_ab(), fosf = guess_ab(), fusi = guess_ab(),
gent = guess_ab(), imip = guess_ab(), kana = guess_ab(),
levo = guess_ab(), linc = guess_ab(), line = guess_ab(),
mero = guess_ab(), metr = guess_ab(), mino = guess_ab(),
moxi = guess_ab(), nali = guess_ab(), neom = guess_ab(),
neti = guess_ab(), nitr = guess_ab(), novo = guess_ab(),
norf = guess_ab(), oflo = guess_ab(), peni = guess_ab(),
pipe = guess_ab(), pita = guess_ab(), poly = guess_ab(),
qida = guess_ab(), rifa = guess_ab(), roxi = guess_ab(),
siso = guess_ab(), teic = guess_ab(), tetr = guess_ab(),
tica = guess_ab(), tige = guess_ab(), tobr = guess_ab(),
trim = guess_ab(), trsu = guess_ab(), vanc = guess_ab())
brmo(..., country = "nl")
@ -172,7 +177,7 @@ When \code{country} will be left blank, guidelines will be taken from EUCAST Exp
}
\section{Antibiotics}{
To define antibiotics column names, input a text (case-insensitive) or use \code{NULL} to skip a column (e.g. \code{tica = NULL}). Non-existing columns will anyway be skipped with a warning.
To define antibiotics column names, leave as it is to determine it automatically with \code{\link{guess_ab}} or input a text (case-insensitive) or use \code{NULL} to skip a column (e.g. \code{tica = NULL}). Non-existing columns will anyway be skipped with a warning.
Abbrevations of the column containing antibiotics in the form: \strong{abbreviation}: generic name (\emph{ATC code})