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

(v1.2.0.9000) eucast_rules() fix for tibbles

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-06-02 16:05:56 +02:00
parent b44e2c9202
commit 02d07b9fb3
13 changed files with 284 additions and 253 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
R/eucast_rules.R
View File

@ -518,6 +518,8 @@ eucast_rules <- function(x,
# save original table
x_original <- x
x_original_attr <- attributes(x)
x_original <- as.data.frame(x_original, stringsAsFactors = FALSE) # no tibbles, data.tables, etc.
# join to microorganisms data set
x <- as.data.frame(x, stringsAsFactors = FALSE)
@ -922,6 +924,8 @@ eucast_rules <- function(x,
rownames(verbose_info) <- NULL
verbose_info
} else {
# reset original attributes
attributes(x_original) <- x_original_attr
x_original
}
}