| ... | ... |
@@ -4,7 +4,7 @@ Title: A GatingML Interface for Cross Platform Cytometry Data Sharing |
| 4 | 4 |
Version: 2.7.2 |
| 5 | 5 |
Date: 2016-04-15 |
| 6 | 6 |
Author: Mike Jiang, Jake Wagner |
| 7 |
-Maintainer: Mike Jiang <mike@ozette.ai> |
|
| 7 |
+Maintainer: Mike Jiang <mike@ozette.com> |
|
| 8 | 8 |
Description: Uses platform-specific implemenations of the GatingML2.0 standard |
| 9 | 9 |
to exchange gated cytometry data with other software platforms. |
| 10 | 10 |
License: file LICENSE |
| ... | ... |
@@ -770,10 +770,10 @@ test_that("v 9.7.4 - mac 3.0",{
|
| 770 | 770 |
wsFile <- file.path(thisPath, "T1_CHI-002v974.xml") |
| 771 | 771 |
|
| 772 | 772 |
ws <- open_flowjo_xml(wsFile) |
| 773 |
- gs <- flowjo_to_gatingset(ws, name = "CHI-002 PBMC control", subset = "CHI-002_PBMC_control_101211.fcs", execute = FALSE) |
|
| 773 |
+ gs <- flowjo_to_gatingset(ws, name = "CHI-002_PBMC_control", subset = "CHI-002_PBMC_control_101211.fcs", execute = FALSE) |
|
| 774 | 774 |
expect_is(gs, "GatingSet") |
| 775 | 775 |
set.seed(1) |
| 776 |
- gs <- flowjo_to_gatingset(ws, name = "CHI-002 PBMC control", subset = "CHI-002_PBMC_control_101211.fcs") |
|
| 776 |
+ gs <- flowjo_to_gatingset(ws, name = "CHI-002_PBMC_control", subset = "CHI-002_PBMC_control_101211.fcs") |
|
| 777 | 777 |
gh <- gs[[1]] |
| 778 | 778 |
expectCounts <- fread(file.path(thisPath, "expectCounts.csv")) |
| 779 | 779 |
thisCounts <- gh_pop_compare_stats(gh, path = "full")[, list(xml.count,openCyto.count, node)] |
