expect nodes in node_rank_hclust

thomasp85 · Nov 17, 2023 · c0ab7d7 · c0ab7d7
1 parent 1e3a43e
commit c0ab7d7
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/node_rank.R b/R/node_rank.R
@@ -49,6 +49,7 @@ NULL
 #' @importFrom stats hclust
 #' @export
 node_rank_hclust <- function(method = 'average', dist = 'shortest', mode = 'out', weights = NULL, algorithm = 'automatic') {
+  expect_nodes()
   weights <- enquo(weights)
   weights <- eval_tidy(weights, .E())
   if (is.null(weights)) {