P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-12-18 21:00:32 +01:00
Code Releases Activity

small fixes

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2022-08-29 09:35:36 +02:00
parent e7af5fc716
commit fbd5d32541
24 changed files with 590 additions and 62 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
man/guess_ab_col.Rd
View File

@@ -27,7 +27,7 @@ A column name of \code{x}, or \code{NULL} when no result is found.
This tries to find a column name in a data set based on information from the \link{antibiotics} data set. Also supports WHONET abbreviations.
}
\details{
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. \strong{Longer columns names take precedence over shorter column names.}
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.
}
\examples{
df <- data.frame(
@@ -36,13 +36,10 @@ df <- data.frame(
)
guess_ab_col(df, "amoxicillin")
# [1] "amox"
guess_ab_col(df, "J01AA07") # ATC code of tetracycline
# [1] "tetr"
guess_ab_col(df, "J01AA07", verbose = TRUE)
# NOTE: Using column 'tetr' as input for J01AA07 (tetracycline).
# [1] "tetr"
# WHONET codes
df <- data.frame(
@@ -50,17 +47,6 @@ df <- data.frame(
AMC_ED20 = "S"
)
guess_ab_col(df, "ampicillin")
# [1] "AMP_ND10"
guess_ab_col(df, "J01CR02")
# [1] "AMC_ED20"
guess_ab_col(df, as.ab("augmentin"))
# [1] "AMC_ED20"
# Longer names take precendence:
df <- data.frame(
AMP_ED2 = "S",
AMP_ED20 = "S"
)
guess_ab_col(df, "ampicillin")
# [1] "AMP_ED20"
}