From 2678188aac0de1aca3c7b120304438c9d155d429 Mon Sep 17 00:00:00 2001
From: Daniel <mail@danielluedecke.de>
Date: Mon, 10 Jun 2024 08:54:47 +0200
Subject: [PATCH] minor

---
 R/plot.check_normality.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/plot.check_normality.R b/R/plot.check_normality.R
index f24100597..dfb571cd2 100644
--- a/R/plot.check_normality.R
+++ b/R/plot.check_normality.R
@@ -279,7 +279,7 @@ plot.see_check_normality <- function(x,
     # to scale the detrended qq plot
     N <- length(x$y)
     SD <- stats::sd(x$y) * sqrt((N - 1) / N)
-    y_range <- c(min(pretty(range(x$y), n = 2)), max(pretty(range(x$y), n = 2)))
+    y_range <- round(range(x$y), 1)
 
     gg_init <- ggplot2::ggplot(x, ggplot2::aes(sample = .data$y))