global.R.bak

# Global
#
# Add package from UI and Server
#
# Erik.Leppo@tetratech.com
# 2022-08-17
#~~~~~~~~~~~~~~~~~~~~~~~~
 
# Packages ----

# ## UI----
library(shiny)
library(shinyWidgets)
library(shinyjs) # fails without it
library(shinyalert)
library(shinythemes)
library(shinydashboard)
library(dplyr)
library(ggplot2)
library(ggthemes)
library(DT)
library(plotly)
library(xts)
#library(shinycustomloader)
library(shinycssloaders)
library("shinyjqui")
#
# ## Server----
library("readxl")        # to read excel files
library("writexl")
library("data.table")
#library("DT")
library("tidyverse") # fails without dplyr, stringr
library("tibbletime")
#library("shiny")
#library("shinydashboard")
#library("shinyjs")
library("shinyBS")
library("shinyvalidate")
#library("shinythemes")
#library("shinyalert")
library("conflicted") # fails without it
library("dataRetrieval")
library("doBy")
library("knitr")
library("htmltools")
library("rmarkdown")
library("highr")
library("survival")
library("shinyFiles")
#library("plotly")
library("zip")
library("reshape2")
library("ContDataQC")
library("ContDataSumViz")
library("StreamThermal")
library("IHA")
library("XLConnect")
library("daymetr")
library("lubridate")
library("promises")
library("future")
library("tinytex")
library("purrr")
#library("ggtext")
library("qpcR")
library("readr")
library("padr")
#library("ggh4x")
plan(multisession)
#options(scipen=999) 



# fails without dplyr and stringr from tidyverse

# Functions ----
source("_moved/import_raw_data.R")
source("update_ContDataQC/config.R")
source("update_ContDataQC/CompSiteCDF.updated.R")
source("update_ContDataQC/SumStats.updated.R")
source("update_ContDataQC/ReportMetaData.R")
source("update_ContDataQC/build_summary_updated.R")


source("update_ContDataQC/fun.ConvertDateFormat.R")
source("constants.R")

list.files("modules", recursive = TRUE) %>%
purrr::map(~ source(paste0("modules/", .)))


# Other ----
options(shiny.maxRequestSize = 100*1024^2)