Directly render a set of dq_boxes into an uiOutput element. All given dq_boxes will be prepared automatically, meaning that they become 'collapsible' and 'open_callback'ed.
render_dq_box_group(..., open = NULL)
a set of dq_boxes
optional integer or character of length one, specifying the initially opened box
fluidRow containing the grouped dq_boxes
# NOT RUN {
## Only run examples in interactive R sessions
if (interactive()) {
library(shiny)
shinyApp(
ui = fluidPage(
fluidRow(column(6, uiOutput("myGroup")))
),
server = function(input, output) {
output$myGroup <- render_dq_box_group(
dq_box("Random Input1", dq_space(), "End of Content",
title = "TestBox1", width = 12),
dq_box("Random Input2", dq_space(), "End of Content",
title = "TestBox2", width = 9),
dq_box("Random Input3", dq_space(), "End of Content",
title = "TestBox3", width = 12),
open = 3L)
}
)
}
# }
Run the code above in your browser using DataLab