shinydashboard
is a package that could be used to create elegant dashboards with little effort.
library(shiny) ui<-dashboardPage( header = dashboardHeader(title = "Demo"), sidebar = dashboardSidebar(...), body = dashboardBody(...) ) server <- function(input,output,session){} shinyApp(ui = ui, server = server)