R Shiny 滑块步进参数

Question

我的数据框中有一列只是年份和月份的组合

Yearmonth 
----------
200912
201001
201002
201003
201004
201005
.
.
.
.

我的 R 闪亮仪表板中需要一个滑块，该滑块从该列的最小值到最大值，但在该列中的值递增。

例如， 我希望我的滑块从 200912 到 201001 到 201002 等一直到最大值。

我已经尝试过了，但在这种情况下，我的步长是 1，所以我得到了值之间的所有中间值。

ui <- fluidPage(
  titlePanel("censusVis"),

  sidebarLayout(
    sidebarPanel(

      sliderInput("month",
                  "Month:",
                  min = min(Yearmonth),
                  max = max(Yearmonth),
                  value =min(Yearmonth),
                  step = 1),
    ),
    mainPanel(
    )
  )
)

有人可以帮我吗？我最近才开始使用 Shiny！

Answer 1

我之前使用了shinyWidgets 包中的sliderTextInput 来实现这个效果。根据您的 data.frame 的名称，它应该转换为以下内容

  sliderTextInput("month",
                  "Month:",
                  choices = sort(unique(my_data$Yearmonth)))

请注意，如果您这样做，您需要将 input$month 的值转换回您想要的数字。