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

(v2.1.1.9195) add BTL-S, fix ranks in unknown microorganisms

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2025-03-13 14:30:14 +01:00
parent a7ef22a21e
commit 9aab129ea6
48 changed files with 1789 additions and 1710 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
data-raw/reproduction_of_antimicrobials.R
View File

@@ -789,6 +789,21 @@ antimicrobials[which(antimicrobials$ab == "CLI-S"), "abbreviations"][[1]] <- lis
# add all screenings
antimicrobials <- antimicrobials |>
bind_rows(
antimicrobials |>
filter(ab == "EFF") |>
mutate(ab = "BTL-S",
name = paste("Beta-lactamase", "screening test"),
cid = NA_real_,
atc = list(character(0)),
atc_group1 = NA_character_,
atc_group2 = NA_character_,
abbreviations = list(c("beta-lactamase", "betalactamase", "bl screen", "blt screen")),
synonyms = list(character(0)),
oral_ddd = NA_real_,
oral_units = NA_character_,
iv_ddd = NA_real_,
iv_units = NA_character_,
loinc = list(character(0))),
antimicrobials |>
filter(ab == "PEN") |>
mutate(ab = "PEN-S",