From 6e8e27bd8a877fb75ab547c9c11d62a101b98599 Mon Sep 17 00:00:00 2001 From: Maxime Wack Date: Tue, 7 Mar 2017 08:16:27 +0100 Subject: [PATCH] Play plus lent --- app.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app.R b/app.R index d25ba4b..1e684f1 100644 --- a/app.R +++ b/app.R @@ -66,7 +66,7 @@ ui <- bootstrapPage( checkboxGroupInput("check_sexe", "Sexe", c("Homme", "Femme"), c("Homme", "Femme")) ), absolutePanel(bottom = 10, left = "2.5%", width = "75%", - sliderInput("slider_date", "Dates", width = "100%", min = min_date, max = max_date, value = c(max_date - years(1), max_date), animate = animationOptions(interval = 0)) + sliderInput("slider_date", "Dates", width = "100%", step = 30, min = min_date, max = max_date, value = c(max_date - years(1), max_date), animate = animationOptions(interval = 1000)) ) )