push again to make image public

global.R

@@ -5,7 +5,7 @@
 # [email protected]
 # 2022-08-17
 #~~~~~~~~~~~~~~~~~~~~~~~~
-
+ 
 # Packages ----
 
 # ## UI----

global.R.bak

@@ -0,0 +1,94 @@
+# Global
+#
+# Add package from UI and Server
+#
+# [email protected]
+# 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)