samp <- read.FCS(system.file("extdata",
"0877408774.B08", package="flowCore"))
linearTrans <- linearTransform(transformationId="Linear-transformation", a=2, b=0)
dataTransform <- transform(samp, transformList('FSC-H' ,linearTrans))
Run the code above in your browser using DataLab