P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-09 08:11:58 +02:00
Code Releases Activity

as.mo fix

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2019-02-27 14:22:07 +01:00
parent 54162522bd
commit 642f6571fe
11 changed files with 291 additions and 273 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
R/zzz.R
View File

@ -28,6 +28,7 @@
if (!all(c("microorganismsDT", "microorganisms.oldDT") %in% ls(envir = asNamespace("AMR")))) {
microorganisms.oldDT <- as.data.table(AMR::microorganisms.old)
microorganisms.oldDT$fullname_lower <- tolower(microorganisms.oldDT$fullname)
setkey(microorganisms.oldDT, col_id, fullname)
assign(x = "microorganisms",
@ -84,6 +85,7 @@ make <- function() {
#' @importFrom data.table as.data.table setkey
make_DT <- function() {
microorganismsDT <- as.data.table(make())
microorganismsDT$fullname_lower <- tolower(microorganismsDT$fullname)
setkey(microorganismsDT,
kingdom,
prevalence,