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

(v1.7.1.9007) Updated antibiotics dataset, fixes #41

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-06-23 10:03:17 +02:00
parent 1dc9d237f6
commit 95050ee3e0
34 changed files with 91 additions and 86 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
data-raw/reproduction_of_antibiotics.R
View File

@ -647,6 +647,7 @@ antibiotics <- antibiotics %>%
# update DDDs from WHOCC website
# last time checked: 2021-06-23
ddd_oral <- double(length = nrow(antibiotics))
ddd_iv <- double(length = nrow(antibiotics))
progress <- progress_ticker(nrow(antibiotics))
@ -667,7 +668,7 @@ antibiotics$iv_ddd <- ddd_iv
# set as data.frame again
antibiotics <- as.data.frame(antibiotics, stringsAsFactors = FALSE)
class(antibiotics$ab) <- c("ab", "character")
antibiotics <- antibiotics %>% dplyr::arrange(name)
antibiotics <- dplyr::arrange(antibiotics, name)
# make all abbreviations and synonyms lower case, unique and alphabetically sorted ----
for (i in 1:nrow(antibiotics)) {
@ -683,5 +684,5 @@ for (i in 1:nrow(antibiotics)) {
# REFER TO data-raw/loinc.R FOR ADDING LOINC CODES
usethis::use_data(antibiotics, overwrite = TRUE, version = 2)
usethis::use_data(antibiotics, overwrite = TRUE, version = 2, compress = "xz")
rm(antibiotics)