From 1922fb5ff2734e2f706b5660fb2332412db85e29 Mon Sep 17 00:00:00 2001 From: Matthijs Berends Date: Wed, 10 Sep 2025 15:06:51 +0200 Subject: [PATCH] (v3.0.0.9028) fix as.ab() warning --- DESCRIPTION | 2 +- NEWS.md | 2 +- R/ab.R | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index fc906449c..66844f443 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,5 +1,5 @@ Package: AMR -Version: 3.0.0.9027 +Version: 3.0.0.9028 Date: 2025-09-10 Title: Antimicrobial Resistance Data Analysis Description: Functions to simplify and standardise antimicrobial resistance (AMR) diff --git a/NEWS.md b/NEWS.md index 9ad1a3f65..a7598d50b 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,4 +1,4 @@ -# AMR 3.0.0.9027 +# AMR 3.0.0.9028 This is a bugfix release following the release of v3.0.0 in June 2025. diff --git a/R/ab.R b/R/ab.R index 3132561cc..c873935cb 100755 --- a/R/ab.R +++ b/R/ab.R @@ -202,7 +202,7 @@ as.ab <- function(x, flag_multiple_results = TRUE, language = get_AMR_locale(), if (sum(already_known) < length(x)) { progress <- progress_ticker(n = sum(!already_known), n_min = 25, print = info) # start if n >= 25 on.exit(close(progress)) - if (any(x_new[!already_known] %in% unlist(AMR_env$AV_lookup$generalised_all, use.names = FALSE), na.rm = TRUE)) { + if (any(x_new[!already_known & !is.na(x_new)] %in% unlist(AMR_env$AV_lookup$generalised_all, use.names = FALSE), na.rm = TRUE)) { warning_("in `as.ab()`: some input seem to resemble antiviral drugs - use `as.av()` or e.g. `av_name()` for these, not `as.ab()` or e.g. `ab_name()`.") } }