Is it possible to lock the minimum value of a crosstalk::filter_slider?

[Uriah]

I want to take advantage of the amazing interactivity of crosstalk, but unfortunately the filter_slider is the only available as a range slider.

Is there anyway to force the minimum value to be 0?

An example:

if (interactive()) {
  
  sd <- SharedData$new(mtcars)
  filter_slider("mpg", "Miles per gallon", sd, "mpg",dragRange=T )
  
}