R/shinyDashboardTemplate.R

In tiernanmartin/miscgis: A Collection of Functions and RStudio Add-ins for GIS Analysis in R

# SETUP -------------------------------------------------------------------------------------------

library(shiny)
library(shinydashboard)

# UI ---------
# +--- Header ---------
header <- dashboardHeader()
# +--- Sidebar ---------
sidebar <- dashboardSidebar()
# +--- Body ---------
body <- dashboardBody()
# +--- Create UI ---------
ui <- dashboardPage(header, sidebar, body)

# SERVER ---------
server <- function(input, output) {

}

# RUN ---------
shinyApp(ui, server)