26 lines
469 B
R
26 lines
469 B
R
# St. Andrews Shiny App - Main entry point
|
|
# Modularized version with separate UI and server components
|
|
|
|
# Load libraries
|
|
library(shiny)
|
|
library(shinyMobile)
|
|
library(leaflet)
|
|
library(sf)
|
|
library(dplyr)
|
|
library(leafpop)
|
|
library(DT)
|
|
|
|
# Load configuration
|
|
source("./R/config.R")
|
|
|
|
# Load UI and server components
|
|
source("./R/app_ui.R")
|
|
source("./R/app_server.R")
|
|
|
|
# Create the app
|
|
ui <- create_ui()
|
|
server <- create_server
|
|
|
|
# Run the app
|
|
shinyApp(ui = ui, server = server)
|