R/immune_features_server.R

Defines functions immune_features_server

immune_features_server <- function(
  id,
  cohort_obj
){
  shiny::moduleServer(
    id,
    function(input, output, session) {

      call_module_server(
        "immune_feature_distributions",
        cohort_obj,
        server_function = immune_feature_distributions_server,
        ui_function = immune_feature_distributions_ui
      )

      call_module_server(
        "immune_feature_correlations",
        cohort_obj,
        server_function = immune_feature_correlations_server,
        ui_function = immune_feature_correlations_ui
      )
    }
  )
}
CRI-iAtlas/iatlas-app documentation built on Feb. 7, 2025, 9:02 p.m.