From d78a441cfd8e9819a4d7dfa0a285b8456ee8e7fc Mon Sep 17 00:00:00 2001 From: Yunuuuu Date: Wed, 8 Jan 2025 00:44:10 +0800 Subject: [PATCH] fix erro for passing NULL to if condition --- R/align-hclust.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/align-hclust.R b/R/align-hclust.R index b8d7d9a1..487a51cd 100644 --- a/R/align-hclust.R +++ b/R/align-hclust.R @@ -252,7 +252,7 @@ AlignHclust <- ggproto("AlignHclust", Align, # merge children tree ------------------------------ if (nlevels(panel) == 1L) { statistics <- .subset2(statistics, 1L) - } else if (self$merge_dendro) { + } else if (isTRUE(self$merge_dendro)) { # we have a function named merge_dendrogram(), so we use # `merge_dendro` as the argument name # `merge_dendrogram` will follow the order of the parent