R/weekly_ae_ui.R

Defines functions weekly_ae_ui

weekly_ae_ui<-function(){
library(shiny)
library(DT)
shinyUI(fluidPage(
    titlePanel("Applied Engineering Weekly Breakdown"),
        mainPanel(
            p('%Time per Project'),
            h4(textOutput("weekchosen")),
            dateInput('dates','dates'),
            DTOutput('testDT') 
        )
    
))
}
JARS3N/LiveLongAndProsper documentation built on June 21, 2020, 12:49 p.m.