gs_compare_cytobank_counts: compare the counts to cytobank's exported csv so that the...

Description Usage Arguments Value Examples

View source: R/cytobank2GatingSet.R

Description

compare the counts to cytobank's exported csv so that the parsing result can be verified.

Usage

1
2
3
4
5
6
gs_compare_cytobank_counts(
  gs,
  file,
  id.vars = c("FCS Filename", "population"),
  ...
)

Arguments

gs

parsed GatingSet

file

the stats file (contains the populatio counts) exported from cytobank.

id.vars

either "population" or "FCS filename" that tells whether the stats file format is one population per row or FCS file per row.

...

arguments passed to data.table::fread function

Value

a data.table (in long format) that contains the counts from openCyto and Cytobank side by side.

Examples

1
2
3
4
5
6
7
acsfile <- system.file("extdata/cytobank_experiment.acs", package = "CytoML")
ce <- open_cytobank_experiment(acsfile)
gs <- cytobank_to_gatingset(ce)
## verify the stats are correct
statsfile <- ce$attachments[1]
dt_merged <- gs_compare_cytobank_counts(gs, statsfile, id.vars = "population", skip = "FCS Filename")
all.equal(dt_merged[, count.x], dt_merged[, count.y], tol = 5e-4)

CytoML documentation built on March 12, 2021, 2 a.m.