Extract Saved Gate(s) from gatingTemplate.
cyto_gate_extract(parent, alias, gatingTemplate = NULL, ...)
parent | name of the parental population. |
---|---|
alias | name of the population for which the gate must be extracted. |
gatingTemplate | name of the |
... | not used. |
Dillon Hammill, Dillon.Hammill@anu.edu.au
library(CytoExploreRData) # Bypass working directory check for external files options("CytoExploreR_wd_check" = FALSE) # Load in samples fs <- Activation gs <- GatingSet(fs) # Apply compensation gs <- cyto_compensate(gs) # Transform fluorescent channels gs <- cyto_transform(gs)# Gate using cyto_gate_draw gt <- Activation_gatingTemplate gt_gating(gt, gs)#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#>#># gatingTemplate gtfile <- system.file("extdata", "Activation-gatingTemplate.csv", package = "CytoExploreRData" ) # Extract T Cells gate cyto_gate_extract("Live Cells", "T Cells", gatingTemplate = gtfile)#> [[1]] #> A list of 1 filters applied to a flowFrame. #>