R/ui.R

In lanceupton/shinyROI: shinyROI

#' @import bs4Dash
ui <- function() {
  bs4DashPage(
    title   = "shinyROI",
    body    = bs4DashBody(uiOutput("ui_body")),
    navbar  = bs4DashNavbar(),
    sidebar = bs4DashSidebar(uiOutput("ui_sidebar")),
    enable_preloader = TRUE
  )
}