Convert Old gatingTemplates to New Format

Convert Old gatingTemplates to New Format

gatingTemplate_convert(gs, gatingTemplate)

Arguments

gs	object of class GatingSet.
gatingTemplate	name of the gatingTemplate csv file to convert.

Value

converted gatingTemplate saved to .csv file.

Examples

# 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(fs))
gs <- transform(gs, trans)

# Convert gatingTemplate CytoRSuite <= 0.9.5 to new format
gatingTemplate_convert(gs, "gatingTemplate.csv")

# Updated gatingTemplate will work as expected
gt <- gatingTemplate("gatingTemplate.csv")
gating(gt, gs)
# }