pushbar {pushbar}

Setup Pushbar

Description

Set up pushbar.

Creates element containing pushbar content.

Usage

pushbar_deps()

setup_pushbar(blur = FALSE, overlay = TRUE)

pushbar(..., id = from, from = c("left", "right", "top", "bottom"),
  class = NULL, style = pushbar_style())

Arguments

blur

Whether to blur the background when pushbar is opened.

overlay

Whether to darken the background when pushbar is opened.

...

Any other valid tags.

id

Id of pushbar.

from

Wherefrom the pushbar should open.

class

Additional class to pass to div.

style

Valid css defaults to pushbar_style.

Details

Creates a div.

Note

You are advised to add padding inside your pushbar i.e.: style="padding:20px;"

Examples

library(shiny)

ui <- fluidPage(
  pushbar_deps(),
  actionButton("open", "Open pushbar"),
  pushbar(
    h4("HELLO")
  )
)

server <- function(input, output, session){

  setup_pushbar()
 
  observeEvent(input$open, {
    pushbar_open()
  })  
}

if(interactive()) shinyApp(ui, server)