26 lines
529 B
R
26 lines
529 B
R
#
|
|
# Main Server File
|
|
#
|
|
|
|
# Import files
|
|
source("Server/Results.R")
|
|
source("Server/DataProcessor.R")
|
|
source("Server/SummaryStatistics.R")
|
|
source("Server/InteractiveMapStatistics.R")
|
|
|
|
# Server logic
|
|
server <- function(input, output) {
|
|
# Tab 1
|
|
balanceForTeamBarplot(input, output)
|
|
matchesForTeam(input, output)
|
|
summaryStatistics(input, output)
|
|
|
|
# Tab 2
|
|
balanceBetweenTeams(input, output)
|
|
balancePercentage(input, output)
|
|
resultsWithPagination(input, output)
|
|
|
|
# Tab 3
|
|
interactiveMapStatistics(input, output)
|
|
}
|