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

(v1.2.0.9008) ab_class improvement

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-06-17 15:14:37 +02:00
parent c4d7412f36
commit ac12392da3
37 changed files with 619 additions and 362 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
R/eucast_rules.R
View File

@ -206,7 +206,7 @@ eucast_rules <- function(x,
"\n\nThis may overwrite your existing data if you use e.g.:",
"\ndata <- eucast_rules(data, verbose = TRUE)\n\nDo you want to continue?")
if ("rstudioapi" %in% rownames(utils::installed.packages())) {
showQuestion <- get("showQuestion", envir = asNamespace("rstudioapi"))
showQuestion <- import_fn("showQuestion", "rstudioapi")
q_continue <- showQuestion("Using verbose = TRUE with eucast_rules()", txt)
} else {
q_continue <- utils::menu(choices = c("OK", "Cancel"), graphics = FALSE, title = txt)