TPD-InternationalFootballRe.../UI/main.R

24 lines
367 B
R
Raw Normal View History

2019-05-15 00:35:53 +02:00
#
# Main UI File
#
# Import files
source("UI/SidebarPanel.R")
# UI
ui <- fluidPage(
# Application title
titlePanel("International football results 1872-2018"),
2019-05-15 00:35:53 +02:00
# Sidebar layout elements
sidebarLayout(
2019-05-15 00:35:53 +02:00
teamsSidebarPanel(),
2019-05-15 00:35:53 +02:00
# Main panel
mainPanel(
plotOutput("balance"),
DT::dataTableOutput("results_pagination")
)
)
)