Edit Existing Gate(s).
gate_edit(x, select = NULL, parent = NULL, alias = NULL, overlay = NULL, type = NULL, gatingTemplate = NULL, display = NULL, ...)
x | an object of class |
---|---|
select | vector containing the indicies of samples within gs to use for plotting. |
parent | name of the parental population. |
alias | name(s) of the gate to edit (e.g. "Single Cells"). |
overlay | name(s) of the population(s) to overlay onto the plot. |
type | vector of gate type names used to construct the gates. Multiple
|
gatingTemplate | name of the |
display | numeric [0,1] to control the percentage of events to be
plotted. Specifying a value for |
... | additional arguments passed to cyto_plot, see ?cyto_plot for details. |
an object of class GatingSet
with edited gate applied, as well
as gatingTemplate file with edited gate saved.
# 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) # Edit CD4 T Cells Gate - replace gatingTemplate name gate_edit(gs, parent = "T Cells", alias = "CD4 T Cells", gatingTemplate = "gatingTemplate.csv" ) # }