From 36b85b24a89b6f14e20ca2b6a7ad98c121d69f24 Mon Sep 17 00:00:00 2001 From: "friedemann.blume" Date: Fri, 12 Jan 2024 23:29:03 +0100 Subject: [PATCH] made slider steps of brew time 0.2 --- eprilog.r | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/eprilog.r b/eprilog.r index c6dbd34..766144a 100644 --- a/eprilog.r +++ b/eprilog.r @@ -34,9 +34,9 @@ ui <- navbarPage("EpriLog", selectInput("alias", "Whats the nick name of the coffee?", choices = coffees$alias, multiple = FALSE, selected = lastUsedParameters$Alias), #selectInput("coffeeName", "Whats the name of the coffee?", coffees$coffeeName, multiple = FALSE), # Grind Time - sliderInput("grindTime", "Ginding Time", value = 14, min = 0, max = 30), - # Grind Size - sliderInput("grindSize", "Ginding Size", value = 7, min = 0, max = 70), + sliderInput("grindTime", "Ginding Time", value = 14, min = 0, max = 30, step = 0.2), + # Grind Size (my Grinder can go up to 70 but thats no longer Espresso..) + sliderInput("grindSize", "Ginding Size", value = 7, min = 0, max = 30), # Flow rate (0 = none, 10 = perfect, 20 = water) sliderInput("flowResult", "Flow rate (10 is Perfect):", value = 10, min = 0, max = 20), # Taste Rating (sour = none, 10 = perfect, 20 = bitter)