R/app_server.R

In risktoollib/RTLappStrat: Asset Strategy

#' The application server-side
#'
#' @param input,output,session Internal parameters for {shiny}.
#'     DO NOT REMOVE.
#' @import shiny
#' @noRd
app_server <- function(input, output, session) {
  r <- shiny::reactiveValues()
  mod_compute_server("compute_1", r = r)
  mod_context_server("context_1", r = r)
  mod_markowitz_server("markowitz_1", r = r)
  mod_npvAtRisk_server("npvAtRisk_1", r = r)
  mod_portfolio_server("portfolio_1", r = r)
  }