Returns Detector Gains, Laser Delay and Scalings from individual .fcs files in a CytoSet.

Returns Detector Gains, Laser Delay and Scalings from individual .fcs files in a CytoSet.

Usage

QC_Retrieval(x, sample.name)

Arguments

x

A CytoSet (when mapped) or an individual cytoset, example (x=MyCytoSet[[1]])

sample.name

The keyword value that distinguishes individual .fcs files

Value

A dataframe row

Examples

library(flowWorkspace)

File_Location <- system.file("extdata", package = "Luciernaga")
FCS_Pattern <- ".fcs$"
FCS_Files <- list.files(path = File_Location, pattern = FCS_Pattern,
full.names = TRUE, recursive = FALSE)
QCBeads <- FCS_Files[grep("Before", FCS_Files)]
MyCytoSet <- load_cytoset_from_fcs(QCBeads[1], truncate_max_range = FALSE,
transformation = FALSE)
MyGatingSet <- GatingSet(MyCytoSet)

SingleSpecimen <- QC_Retrieval(x=MyGatingSet[[1]], sample.name="TUBENAME")