UI utilities for Bootstrap 5 and Shiny.
# install.packages("devtools")
devtools::install_github("JohnCoene/bsutils")
Run bsutils::gallery()
for a demo.
Make sure you use Bootstrap version 5.
library(shiny)
library(bsutils)
ui <- fluidPage(
theme = bslib::bs_theme(version = 5L),
offcanvas(
offcanvasButton(
"Open"
),
offcanvasContent(
offcanvasHeader(
"Off canvas"
),
p(
"Hello world"
)
)
)
)
server <- \(input, output, session){}
shinyApp(ui, server)