From 6435807b1e4e4e5d130d3da94ab38442e47e4689 Mon Sep 17 00:00:00 2001
From: cvanvelt <43354945+cvanvelt@users.noreply.github.com>
Date: Wed, 19 Oct 2022 13:08:54 -0700
Subject: [PATCH] fix dplyr error

---
 R/KNN.graph.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/KNN.graph.R b/R/KNN.graph.R
index bcdd741..74cdf08 100644
--- a/R/KNN.graph.R
+++ b/R/KNN.graph.R
@@ -153,7 +153,7 @@ plot_constellation <- function(knn.cl.df,
   g <- ggplot_build(p.nodes)
   dots <-g[["data"]][[1]] #dataframe with geom_point size, color, coords
   
-  nodes <- left_join(cl.center.df, dots, by=c("x","y"))
+  nodes <- left_join(cl.center.df, dots, by=c("x","y")) %>% ungroup()
 
   
   ###==== if node.dodge==TRUE new xy coords are calculated for overlapping nodes.