R/tessaApp.R

In lajh87/tessa: Tender Evaluation Strategy Scenario Analysis

#' Tender Evaluation Scenario Analysis
#'
#' @return A Shiny Application
#' @export
#'
#' @examples tessaApp()
tessaApp <- function(){

  ui <- tessaUI(id = "tessa")

  server <- function(input, output, session) {

    callModule(
      module = tessa,
      id = "tessa"
    )

  }

  shinyApp(ui, server)

}