intens <- matrix(runif(100), ncol=4)
colnames(intens) <- c("FL1-H", "FL2-H", "FL3-H", "FL4-H")
a <- new("cytoFrame",
exprs=intens,
description=c(name="example data", date=date()))
description(a)
dim(exprs(a))
a[1:3, -4]
plot(a)
## Not run:
# g1 <- drawGate(a, name="Gate1")
# ## End(Not run)
Run the code above in your browser using DataLab