library(plateCore)
data(plateCore)
# Create a flowPlate from the sample data in plateCore
fp <- flowPlate(pbmcPlate,wellAnnotation,plateName="P1")
## Create a rectangle filter
rectGate <- rectangleGate("FSC-H"=c(300,700),"SSC-H"=c(50,400))
## Apply the filter only to sample A01. The other flowFrames
## are not filtered.
fp <- Subset(fp,rectGate,'A01')
Run the code above in your browser using DataLab