闪亮的滑块输入一直显示小数答案

【问题标题】：Shiny sliderInput keeps displaying decimals闪亮的滑块输入一直显示小数
【发布时间】：2021-11-18 19:59:18
【问题描述】：

我正在尝试创建一个滑块。我正在使用的所有基值都没有小数，所以我不知道为什么会继续发生这种情况。我还在函数中将round 参数设置为round = TRUE。

library(shiny)

test_df <- 19:45

ui <- fluidPage(

sliderInput("range1", label = h3("Select Range"), min(test_df), 
            max(test_df), value = c(min(test_df), max(test_df)), round = TRUE)
)

server <- function(input, output, session){
    
}

shinyApp(ui, server)

但是正如你所看到的，当你运行它时，它一直在滑块范围内显示带小数的数字。

我显然遗漏了一些东西，但不知道它是什么。

【问题讨论】：

标签： r shiny

【解决方案1】：

看起来inputSlider 在您的滑块上打了 10 个刻度，不管这是否有意义。 45-19=26、26/10=2.6，我们在滑块上看到 steps 为 2.6。我们可以添加一个step 参数来修复滑块，使其以1 或任何您选择的增量移动。

library(shiny)

test_df <- 19:45

ui <- fluidPage(
  
  sliderInput("range1", label = h3("Select Range"), min(test_df), 
              max(test_df), value = c(min(test_df), max(test_df)), round = TRUE,
              step = 1)
)

server <- function(input, output, session){
  
}

shinyApp(ui, server)

【讨论】：

啊，好吧。这成功了。