Нужно сделать два разных шага в одном слайдере - PullRequest
1 голос
/ 26 марта 2019

Я строю блестящую приборную панель в R Shiny, где мне нужно включить слайдер с 2 различными «шагами»

Мне нужен ползунок от 0 до 10 с шагом 1

т.е.: 1,2,3,4,5,6,7,8,9,10

, а затем с 11-30 с шагом 5, т. Е .: 11-15, 16-20, 21-25, 26-30

Есть ли способ для меня позаботиться о том же?

1 Ответ

1 голос
/ 26 марта 2019

Как отмечается в комментариях, это очень похожий вопрос на другие, задаваемые на сайте, и ответ также довольно похож.Однако учтите, что, хотя sliderTextInput() позволит вам отображать значения, которые вы хотите увидеть, вам придется иметь дело с данными разных типов:

library(shiny)
library(shinyWidgets)

ui <- fluidPage(
  sliderTextInput(inputId = "values", 
                  label = "Values:", 
                  choices = c(seq(1,10), "11-15", "16-20", "21-25", "26-30")),
  sliderTextInput(inputId = "values2", 
                  label = "Values:", 
                  choices = c(seq(1,100,by=1), seq(105,500,by=5))),
  verbatimTextOutput("sliderval"),
  verbatimTextOutput("sliderval2")
)

server <- function(input, output) {
  output$sliderval <- renderText({paste("Slider 1", input$values, class(input$values), sep="; ")})
  output$sliderval2 <- renderText({paste("Slider 2", input$values2, class(input$values2), sep="; ")})
}

shinyApp(ui, server)
...