In the following shiny app, the choices in selectInput
are hidden by dq_accordion
.
library(shiny)
library(dqshiny)
ui <- fluidPage(
dq_accordion(
id = "foo",
titles = list(
"Something",
"Something else"
),
contents = tagList(
tagList(
selectInput("test",
"Test",
choices = names(mtcars))
),
tagList(
checkboxInput('foo2', "foo2")
)
)
)
)
server <- function(input, output){}
shinyApp(ui, server)
How can I make the choices overlay dq_accordion
when the user clicks on selectInput
?
I tried to use the CSS code provided in this answer but no success.