bulmaSidebar(..., header_title = NULL, footer_content = NULL)

Arguments

...

Any element to include in the sidebar (such as input elements, ...)

header_title

Sidebar header.

footer_content

Footer content.

Note

Not compatible with mobile display.

Author

David Granjon, dgranjon@ymail.com

Examples

if (interactive()) { library(shiny) ui <- bulmaPage( bulmaContainer( bulmaTitle("Right sidebar demo"), bulmaSidebarTrigger() ), bulmaSidebar( header_title = "test", bulmaSubtitle("Input elements"), bulmaSliderInput("slider", color = "warning", 10, 3, 150), bulmaSwitchInput( inputId = "switch3", label = "switch 3", value = TRUE, color = "danger", size = "small", style = "thin", rtl = FALSE, disabled = FALSE), bulmaSubtitle("Other Stuff") ), plotOutput("plot") ) server <- function(input, output, session) { data <- reactive({ rnorm(input$slider, 20, 4) }) output$plot <- renderPlot({ hist(data()) }) } shinyApp(ui = ui, server = server) }