Come posso ridurre l'altezza dei widget di input lucidi?

Question

In un'app dashboard lucida, desidero inserire diversi (> 5) input di scorrimento all'interno di una casella con un'altezza specifica. L'argomento altezza in box() sembra solo controllare l'altezza della scatola stessa, e il contenuto (cursori) si riversa sotto la scatola. Come posso ridurre i cursori in modo che si adattino tutti all'interno della scatola? (Ho altre cose per adattarsi alla pagina). Ecco il mio esempio ui:

dashboardPage(
    dashboardHeader(), 
    dashboardSidebar(), 
    dashboardBody(
     fluidRow(
     box(title="inputs",height="200px", 
      sliderInput("in1","1",min = 0,max = 1, step=0.01,value = 0), 
      sliderInput("in2","2",min = 0,max = 1, step=0.01,value = 0), 
      sliderInput("in3","3",min = 0,max = 1, step=0.01,value = 0), 
      sliderInput("in4","4",min = 0,max = 1, step=0.01,value = 0), 
      sliderInput("in5","5",min = 0,max = 1, step=0.01,value = 0), 
      sliderInput("in6","6",min = 0,max = 1, step=0.01,value = 0), 
      sliderInput("in7","7",min = 0,max = 1, step=0.01,value = 0) 
    ) 
))) 

Rendere tutte le etichette aiuta NULL un po ', ma idealmente ho potuto avere più controllo sulle dimensioni/altezza (e hanno etichette).

Grazie per eventuali suggerimenti.

Answer 1

ho scoperto che l'altezza di un widget può essere cambiato mettendolo all'interno di un div() e impostare l'altezza c'è:

div(style="height: 27px;", 
     sliderInput("in1",NULL,min = 0,max = 1, step=0.05,value = 0,ticks=F)) 

Sembra dovrebbe anche essere possibile (e più efficiente?) per fare ciò con i tag, ad es https://groups.google.com/forum/#!msg/shiny-discuss/3m7cq96mcBY/OEICaO_7Na0J, ma non posso farlo funzionare.