samp <- read.FCS(system.file("extdata","0877408774.B08", package="flowCore"))
keyword(samp)
keyword(samp, compact = TRUE)
keyword(samp, "FCSversion")
keyword(samp, function(x,...) paste(keyword(x, "SAMPLE ID"), keyword(x,
"GUID"), sep="_"))
keyword(samp) <- list(foo="bar")
data(GvHD)
keyword(GvHD, list("GUID", cellnumber=function(x) nrow(x)))
keyword(GvHD) <- list(sample=sampleNames(GvHD))
Run the code above in your browser using DataLab