## Not run:
# #f is a xml file name of a flowJo workspace
# ws <- openWorkspace(f)
# #parse the second group
# gs <- parseWorkspace(ws, name = 2); #assume that the fcs files are under the same folder as workspace
#
#
# gs <- parseWorkspace(ws, name = 4
# , path = dataDir #specify the FCS path
# , subset = "CytoTrol_CytoTrol_1.fcs" #subset the parsing by FCS filename
# , isNcdf = FALSE)#turn off cdf storage mode (normally you don't want to do this for parsing large dataset)
#
#
#
# gs <- parseWorkspace(ws, path = dataDir, name = 4
# , keywords = c("PATIENT ID", "SAMPLE ID", "$TOT", "EXPERIMENT NAME") #tell the parser to extract keywords as pData
# , keywords.source = "XML" # keywords are extracted from xml workspace (alternatively can be set to "FCS")
# , additional.keys = c("PATIENT ID") #use additional keywords together with FCS filename to uniquely identify samples
# , execute = F) # parse workspace without the actual gating (can save time if just want to get the info from xml)
#
# #subset by pData (extracted from keywords)
# gs <- parseWorkspace(ws, path = dataDir, name = 4
# , subset = `TUBE NAME` %in% c("CytoTrol_1", "CytoTrol_2")
# , keywords = "TUBE NAME")
# ## End(Not run)
Run the code above in your browser using DataLab