diff --git a/R/dash.R b/R/dash.R index bec2b78a..7fcb0208 100644 --- a/R/dash.R +++ b/R/dash.R @@ -649,6 +649,8 @@ Dash <- R6::R6Class( getServerParam <- function(value, type, default) { if (!is.null(value) && toupper(value) %in% c("TRUE", "FALSE")) value <- as.logical(toupper(value)) + if (type == "numeric") + value <- as.numeric(value) if (value != "" && length(value) != 0 && mode(value) == type && !is.na(value)) { return(value) } else {