Description Usage Arguments Examples
Create multi sections.
1 2 3  | 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.  | 
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41  | 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)
}
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.