summaryrefslogtreecommitdiff
path: root/R/server.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/server.R')
-rw-r--r--R/server.R13
1 files changed, 0 insertions, 13 deletions
diff --git a/R/server.R b/R/server.R
index 9929010..e8d2970 100644
--- a/R/server.R
+++ b/R/server.R
@@ -1,19 +1,6 @@
#' @importFrom methods is
#' @importFrom utils read.csv write.csv
server <- function(input, output) {
- # Hide the sidebar if the 'About' tab is active.
- shiny::observeEvent(input$tabset, {
- if (input$tabset == "About") {
- shinyjs::hideElement(selector="#sidebar")
- shinyjs::removeCssClass("main", "col-sm-8")
- shinyjs::addCssClass("main", "col-sm-12")
- } else {
- shinyjs::showElement(selector="#sidebar")
- shinyjs::removeCssClass("main", "col-sm-12")
- shinyjs::addCssClass("main", "col-sm-8")
- }
- })
-
reactive <- shiny::reactiveValues(
data_table=data.frame(Name=character(0), `Reporting Frequency`=character(0), `Case Counts`=numeric(0), check.names=FALSE),
est_table=data.frame(Dataset=character(0)),