From 4c81264daf0bd5e478f0ecf4502e2db5d61bca8a Mon Sep 17 00:00:00 2001
From: Richard Iannone <riannone@me.com>
Date: Fri, 1 Dec 2023 17:40:39 -0500
Subject: [PATCH] Remove use of `jitter()` in `get_extreme_value()`

---
 R/utils_plots.R | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/R/utils_plots.R b/R/utils_plots.R
index 6d313b610c..1d63002037 100644
--- a/R/utils_plots.R
+++ b/R/utils_plots.R
@@ -1463,10 +1463,6 @@ get_extreme_value <- function(..., stat = c("max", "min")) {
 
   value_list_vec <- unlist(value_list)
 
-  if (length(unique(value_list_vec)) == 1) {
-    value_list_vec <- jitter(value_list_vec, amount = 1 / 100000)
-  }
-
   if (stat == "max") {
     extreme_val <- max(value_list_vec, na.rm = TRUE)
   } else {