有没有办法使用shinyqui R包中的orderInput()函数以垂直顺序而不是水平顺序排列输入。
在包和函数文档中，我找不到任何关于它的信息。

library(shinyjqui)
library(shiny)

server <- function(input, output) {
  output$order <- renderPrint({input$foo})
}

ui <- fluidPage(
  orderInput(inputId = 'foo', label = 'A simple example', items = c('A', 'B', 'C')),
  verbatimTextOutput('order')
)

shinyApp(ui, server)