samp <- read.FCSheader(system.file("extdata",
"0877408774.B08", package="flowCore"))
samp
samp <- read.FCSheader(system.file("extdata",
"0877408774.B08", package="flowCore"), keyword=c("$DATE", "$FIL"))
samp
Run the code above in your browser using DataLab