R/ici_immunomodulators_ui.R

In CRI-iAtlas/iatlas-app: What the Package Does (One Line, Title Case)

ici_immunomodulators_ui <- function(id){

  ns <- shiny::NS(id)

  shiny::tagList(
    iatlas.modules::titleBox(
      "CRI iAtlas Explorer — Immunomodulators Expression in Immune Checkpoint Inhibitors datasets"
    ),
    iatlas.modules::textBox(
      width = 12,
      p("Explore the expression of genes that code for immunomodulating proteins, including checkpoint proteins.")
    ),
    iatlas.modules::sectionBox(
      title = "Distributions",
      iatlas.modules::messageBox(width = 12,
                 shiny::includeMarkdown("inst/markdown/ici_immunomodulators.markdown")
                 ),
      ici_distribution_ui(ns("ici_immunomodulators_distribution"))
        )
      )
}