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.