2019-01-03 23:56:19 +01:00
% Generated by roxygen2: do not edit by hand
2019-01-11 20:37:23 +01:00
% Please edit documentation in R/guess_ab_col.R
\name{guess_ab_col}
\alias{guess_ab_col}
2021-01-18 16:57:56 +01:00
\title{Guess Antibiotic Column}
2019-01-03 23:56:19 +01:00
\usage{
2021-02-02 23:57:35 +01:00
guess_ab_col(
x = NULL,
search_string = NULL,
verbose = FALSE,
2021-02-08 14:18:42 +01:00
only_rsi_columns = FALSE
2021-02-02 23:57:35 +01:00
)
2019-01-03 23:56:19 +01:00
}
\arguments{
2020-09-18 16:05:53 +02:00
\item{x}{a \link{data.frame}}
2019-01-03 23:56:19 +01:00
2019-11-28 22:32:17 +01:00
\item{search_string}{a text to search \code{x} for, will be checked with \code{\link[=as.ab]{as.ab()}} if this value is not a column in \code{x}}
2019-01-03 23:56:19 +01:00
2021-05-12 18:15:03 +02:00
\item{verbose}{a \link{logical} to indicate whether additional info should be printed}
2021-02-02 23:57:35 +01:00
2021-05-12 18:15:03 +02:00
\item{only_rsi_columns}{a \link{logical} to indicate whether only antibiotic columns must be detected that were transformed to class \verb{<rsi>} (see \code{\link[=as.rsi]{as.rsi()}}) on beforehand (defaults to \code{FALSE})}
2019-01-03 23:56:19 +01:00
}
2019-05-13 10:10:16 +02:00
\value{
A column name of \code{x}, or \code{NULL} when no result is found.
}
2019-01-03 23:56:19 +01:00
\description{
2019-11-28 22:32:17 +01:00
This tries to find a column name in a data set based on information from the \link{antibiotics} data set. Also supports WHONET abbreviations.
2019-05-31 14:40:15 +02:00
}
\details{
2022-08-29 09:35:36 +02:00
You can look for an antibiotic (trade) name or abbreviation and it will search \code{x} and the \link{antibiotics} data set for any column containing a name or code of that antibiotic.
2019-01-03 23:56:19 +01:00
}
2019-01-11 20:37:23 +01:00
\examples{
2022-08-28 10:31:50 +02:00
df <- data.frame(
amox = "S",
tetr = "R"
)
2019-01-11 20:37:23 +01:00
guess_ab_col(df, "amoxicillin")
2019-05-10 16:44:59 +02:00
guess_ab_col(df, "J01AA07") # ATC code of tetracycline
2019-01-11 20:37:23 +01:00
guess_ab_col(df, "J01AA07", verbose = TRUE)
2020-12-03 16:59:04 +01:00
# NOTE: Using column 'tetr' as input for J01AA07 (tetracycline).
2019-01-29 00:06:50 +01:00
# WHONET codes
2022-08-28 10:31:50 +02:00
df <- data.frame(
AMP_ND10 = "R",
AMC_ED20 = "S"
)
2019-01-29 00:06:50 +01:00
guess_ab_col(df, "ampicillin")
guess_ab_col(df, "J01CR02")
2019-05-10 16:44:59 +02:00
guess_ab_col(df, as.ab("augmentin"))
2019-01-11 20:37:23 +01:00
}