CompensationUI: Visualize, import, export and edit compensation matrices...

Description Usage Arguments Value Examples

View source: R/Compensation_module.R

Description

Visualize, import, export and edit compensation matrices associated with a GatingSet

Compensation server function

Usage

1
2
3
CompensationUI(id)

Compensation(input, output, session, rval)

Arguments

id

shiny id

input

shiny input

output

shiny output

session

shiny session

rval

A reactive values object

Value

The updated reactiveValues object rval

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
## Not run: 
library(shiny)
library(shinydashboard)

if (interactive()){

  ui <- dashboardPage(
    dashboardHeader(title = "Compensation"),
    sidebar = dashboardSidebar(disable = TRUE),
    body = dashboardBody(
      CompensationUI("module")
    )
  )

  server <- function(input, output, session) {
    rval <- reactiveValues()
    observe({
      utils::data("GvHD", package = "flowCore")
      rval$gating_set <- GatingSet(GvHD)
    })

    res <- callModule(Compensation, "module", rval = rval)
  }

  shinyApp(ui, server)

}

## End(Not run)

VoisinneG/flowR documentation built on June 1, 2021, 6:42 p.m.