Remove Gate(s) and Edit gatingTemplate csv File
gate_remove(gs, alias = NULL, gatingTemplate = NULL)
gs | an object of class |
---|---|
alias | name(s) of the population(s) to remove (e.g. "Single Cells"). By default all descendant populations will be removed as well. |
gatingTemplate | name of the |
an object of class gatingSet
with gate and children removed,
as well as gatingTemplate file with population removed.
# NOT RUN { library(CytoRSuiteData) # Load in samples fs <- Activation gs <- GatingSet(fs) # Apply compensation gs <- compensate(gs, fs[[1]]@description$SPILL) # Transform fluorescent channels trans <- estimateLogicle(gs[[4]], cyto_fluor_channels(gs)) gs <- transform(gs, trans) # Gate using gate_draw gt <- Activation_gatingTemplate gating(gt, gs) # Remove T Cells population - replace gatingTemplate name gate_remove(gs, "T Cells", gatingTemplate = "gatingTemplate.csv") # }