Package 'pushbar'

Setup Pushbar

Description

Set up pushbar.

Creates element containing pushbar content.

Usage

pushbar_deps()

setup_pushbar(blur = FALSE, overlay = TRUE, esc_close = 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.
esc_close	Whether to enable pressing 'ESC' key to close the pushbar
...	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)

---

Style

Description

Default pushbar CSS, used in pushbar.

Usage

pushbar_style()

---

Pushbar Buttons

Description

Open and close pushbar programatically.

Usage

pushbar_open(id = c("left", "right", "top", "bottom"))

pushbar_close()

Arguments

id	Id of pushbar to open.

---