Create multi sections.
multiSection(..., menu = NULL, align = "none") multiSectionImage(..., img, side, menu = NULL, align = "none")
| ... | any element. |
|---|---|
| menu | named vector of menu links. |
| align | text alignment, takes |
| img | path to image. |
| side | image side. |
if(interactive()){ library(shiny) options <- list( sectionsColor = c("#f3f3f3", "#d3d3d3", "#000") ) ui <- multiPage( opts = options, multiLeft( align = "right", multiSection( h1("multi") ), multiSection( h2("Section ") ), multiSection( h2("Image ") ) ), multiRight( align = "left", multiSection( h1("page()") ), multiSection( h2(" 2") ), multiSectionImage( img = "https://alvarotrigo.com/multiScroll/imgs/tiger.jpg", side = "right", h2("Background") ) ) ) server <- function(input, output){} shinyApp(ui, server) }