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