Styjun

Does a "melee spell attack" use my spellcasting ability, or my Strength?

You have no, but can try for yes

How to use AppendTo in a While loop?

Killing a star safely

Stolen passports having US, UK, CANADA Valid Visas

Did the 1202 error and associated reboot prevent disaster on Apollo 11 landing?

"Bootstrapping" an unbounded class of inaccessible cardinals

What should I watch before playing Alien: Isolation?

Which dice game has a board with 9x9 squares that has different colors on the diagonals and midway on some edges?

Is there any direct train from LHR Airport to Newcastle Gateshead?

Why is the UH-60 tail rotor canted?

1025th term of the given sequence.

ESTA Travel not Authorized. Accepted twice before!

Longest to Shortest tractates of Yerushalmi by daf

Project Euler # 25 The 1000 digit Fibonacci index

Is it better to deliver many low-value stories or few high-value stories?

Do we have to introduce the character's name before using their names in a dialogue tag?

What do Unicorns want?

Why are Oscar, India, and X-Ray (O, I, and X) not used as taxiway identifiers?

Book in which the "mountain" in the distance was a hole in the flat world

What is the metal bit in the front of this propeller spinner?

What would be the effects of (relatively) widespread precognition on the stock market?

Are there foods that astronauts are explicitly never allowed to eat?

Finding Greatest Common Divisor using LuaLatex

Need to have two different steps in a single slider

Shiny Slider Customized Valueshow to add css to each step of jquery slider?What advantages does the new ion.RangeSlider bring to Shiny?How to add scroll bar for sidebarPanel in shiny?Using columns to control tabBox content in Shiny dashboardShiny Slider Input step by monthR Shiny DateRange Input month year onlyshinydashboard: execute data import x seconds after pressing a buttonValueBox in R - Only number is shownHow to change colour and font of shiny dashboard title?How to add multiple inputs (knobs) to a single slider?

.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty margin-bottom:0;

1

I am building a shiny dashboard in R Shiny where i need to include a slider with 2 different 'steps'

What i need is the slider from 0-10 in increments of 1

i.e.: 1,2,3,4,5,6,7,8,9,10

and then from 11-30 in increments of 5 i.e.: 11-15, 16-20, 21-25, 26-30

Is there a way for me to take care of the same?

r shiny slider shinydashboard

share|improve this question

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  
  Possible duplicate of stackoverflow.com/q/45776668/680068
  
  – zx8754
  Mar 26 at 13:08
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Possible duplicate of Shiny Slider Customized Values
  
  – Megan
  Mar 26 at 13:47
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Am I correct in understanding that you want the slider to show ranges for the second set of values?
  
  – phalteman
  Mar 26 at 17:33
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Thanks @phalteman this helps.. If say i had to have a range up to 500 then how would i be able to do so? For example if i had to have 1 - 200 in increments of 1 and then 201 -500 in increments of 5.. then it would not be feasable for me to manually insert all the options.. is there a way i can handle this'?
  
  – Roosh
  Mar 27 at 5:07
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  @phalteman is there some way to include a step argument to the seq in the choices = c(seq(1,10), "11-15", "16-20", "21-25", "26-30")) statement that you have included in your answer?
  
  – Roosh
  Mar 27 at 7:58
  

  
  
  
  

 | 
show 1 more comment

1

I am building a shiny dashboard in R Shiny where i need to include a slider with 2 different 'steps'

What i need is the slider from 0-10 in increments of 1

i.e.: 1,2,3,4,5,6,7,8,9,10

and then from 11-30 in increments of 5 i.e.: 11-15, 16-20, 21-25, 26-30

Is there a way for me to take care of the same?

r shiny slider shinydashboard

share|improve this question

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  
  Possible duplicate of stackoverflow.com/q/45776668/680068
  
  – zx8754
  Mar 26 at 13:08
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Possible duplicate of Shiny Slider Customized Values
  
  – Megan
  Mar 26 at 13:47
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Am I correct in understanding that you want the slider to show ranges for the second set of values?
  
  – phalteman
  Mar 26 at 17:33
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Thanks @phalteman this helps.. If say i had to have a range up to 500 then how would i be able to do so? For example if i had to have 1 - 200 in increments of 1 and then 201 -500 in increments of 5.. then it would not be feasable for me to manually insert all the options.. is there a way i can handle this'?
  
  – Roosh
  Mar 27 at 5:07
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  @phalteman is there some way to include a step argument to the seq in the choices = c(seq(1,10), "11-15", "16-20", "21-25", "26-30")) statement that you have included in your answer?
  
  – Roosh
  Mar 27 at 7:58
  

  
  
  
  

 | 
show 1 more comment

I am building a shiny dashboard in R Shiny where i need to include a slider with 2 different 'steps'

What i need is the slider from 0-10 in increments of 1

i.e.: 1,2,3,4,5,6,7,8,9,10

and then from 11-30 in increments of 5 i.e.: 11-15, 16-20, 21-25, 26-30

Is there a way for me to take care of the same?

r shiny slider shinydashboard

share|improve this question

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

share|improve this question

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

share|improve this question

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

edited Mar 26 at 13:05

zx8754

32.1k88 gold badges7070 silver badges111111 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

asked Mar 26 at 12:48

RooshRoosh

1566 bronze badges

1 Answer
1

active

oldest

votes

1

As noted in the comments, this is a very similar question to others asked on the site, and the answer is also quite similar. However, note that while sliderTextInput() will allow you to display the values you want to see, you will have to deal with data of different types:

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)

share|improve this answer

edited Mar 27 at 15:22

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges

add a comment | 

Your Answer

StackExchange.ifUsing("editor", function ()
StackExchange.using("externalEditor", function ()
StackExchange.using("snippets", function ()
StackExchange.snippets.init();
);
);
, "code-snippets");

StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "1"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f55357606%2fneed-to-have-two-different-steps-in-a-single-slider%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

1

As noted in the comments, this is a very similar question to others asked on the site, and the answer is also quite similar. However, note that while sliderTextInput() will allow you to display the values you want to see, you will have to deal with data of different types:

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)

share|improve this answer

edited Mar 27 at 15:22

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges

add a comment | 

1

As noted in the comments, this is a very similar question to others asked on the site, and the answer is also quite similar. However, note that while sliderTextInput() will allow you to display the values you want to see, you will have to deal with data of different types:

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)

share|improve this answer

edited Mar 27 at 15:22

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges

add a comment | 

As noted in the comments, this is a very similar question to others asked on the site, and the answer is also quite similar. However, note that while sliderTextInput() will allow you to display the values you want to see, you will have to deal with data of different types:

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)

share|improve this answer

edited Mar 27 at 15:22

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges

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)

share|improve this answer

edited Mar 27 at 15:22

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges

answered Mar 26 at 17:42

phaltemanphalteman

1,71411 gold badge1515 silver badges2323 bronze badges