Anpassen `sliderInput()` Aussehen

Question

Ich möchte Schieberegler als "likert-type Fragen" verwenden, wenn Sie glänzend als Umfrage-Tool verwenden.
Daher möchte ich die Beschriftung der Enden des Schiebereglers zu etwas wie "Ich stimme absolut" und "Ich stimme überhaupt nicht zu" anpassen. Gibt es dafür einen reibungslosen Weg?

Answer 1

wollen Sie so etwas? Stellen Sie sicher, dass Ihre width entsprechend

library(shiny) 
ui <- fluidPage(
    sliderInput('slider', 
       label = div(style='width:500px;', 
          div(style='float:left;', 'I totally disagree'), 
          div(style='float:right;', 'I totaly aggree')), min = 0, max = 10, value = 7, width = '500px') 

) 

server <- function(input, output) {} 
shinyApp(ui, server)