Add a container.
fullContainer(...) pageContainer(...) multiContainer(...)
... | any element. |
---|
Pass within your grid, sections or slides.
if(interactive()){ library(shiny) ui <- fullPage( center = TRUE, fullSection( h1("Containers") ), fullSection( h1("Without container"), plotOutput("plot1") ), fullSection( fullContainer( h1("With container"), plotOutput("plot2"), pre( code( "fullContainer()" ) ) ) ) ) server <- function(input, output){ output$plot1 <- renderPlot({ plot(mtcars$wt, mtcars$mpg) }) output$plot2 <- renderPlot({ plot(mtcars$wt, mtcars$mpg) }) } shinyApp(ui, server) }