open Diva xml workspace
open_diva_xml(file, options = 0, ...)
| file | xml file |
|---|---|
| options | argument passed to xmlTreeParse |
| ... | arguments passed to xmlTreeParse |
a diva_workspace object
if (FALSE) { library(flowWorkspace) library(CytoML) ws <- open_diva_xml(system.file('extdata/diva/PE_2.xml', package = "flowWorkspaceData")) ws diva_get_sample_groups(ws) gs <- diva_to_gatingset(ws, name = 2, subset = 1) sampleNames(gs) gs_get_pop_paths(gs) plotGate(gs[[1]]) }