From 1e42d5c3bee7e14af809d523a6c4524d1e1f8e16 Mon Sep 17 00:00:00 2001 From: trvinh Date: Mon, 26 Aug 2024 14:56:16 +0200 Subject: [PATCH] class2tree checks duplicated taxa in higher levels, resolve #934 --- R/class2tree.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/class2tree.R b/R/class2tree.R index 28bfcec1..94a20820 100644 --- a/R/class2tree.R +++ b/R/class2tree.R @@ -414,9 +414,9 @@ taxonomy_table_creator <- function (nameList, rankList) { ) if (length(unlist(duplicatedTaxa)) > 0) { msg <- paste("WARNING:", length(unlist(duplicatedTaxa))) - msg <- "duplicated taxa have been ignored!" + msg <- paste(msg, "duplicated taxa have been ignored!") if (length(unlist(duplicatedTaxa)) == 1) - msg <- "duplicated taxon has been ignored!" + msg <- paste(msg, "duplicated taxon has been ignored!") if (length(unlist(duplicatedTaxa)) < 5) { msg <- paste(msg, "Including: ") msg <- c(msg, paste(unlist(duplicatedTaxa), collapse = "; "))