round slider properties in RangeFilterState

insightsengineering · Feb 10, 2023 · 27910b1 · 27910b1
1 parent 470f0b6
commit 27910b1
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/R/FilterStateRange.R b/R/FilterStateRange.R
@@ -58,13 +58,13 @@ RangeFilterState <- R6::R6Class( # nolint
 
       if (identical(diff(x_range), 0)) {
         private$set_choices(x_range)
-        private$slider_ticks <- x_range
+        private$slider_ticks <- signif(x_range, digits = 10)
         private$slider_step <- NULL
         self$set_selected(x_range)
       } else {
         private$set_choices(range(x_pretty))
-        private$slider_ticks <- x_pretty
-        private$slider_step <- private$get_pretty_range_step(x_pretty)
+        private$slider_ticks <- signif(x_pretty, digits = 10)
+        private$slider_step <- signif(private$get_pretty_range_step(x_pretty), digits = 10)
         self$set_selected(range(x_pretty))
       }