shiny_evolution/server.R at master · andyofsmeg/shiny_evolution · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
server <- function(input, output) {

  # ----------------------------------------------------------------------------
  # Import function Depends on file type
  source("import_handler.R", local = TRUE)

  # ----------------------------------------------------------------------------
  # IU Inputs
  source("ui_inputs.R", local=TRUE)

  # ----------------------------------------------------------------------------
  # Display
  source("display.R", local=TRUE)

  # ----------------------------------------------------------------------------
  # IU Export
  source("ui_export.R", local=TRUE)

  # ----------------------------------------------------------------------------
  # Export handling
  source("export_handler.R", local=TRUE)

}