From 3a37e73aa05a29e88f0c254d74074900050a6d61 Mon Sep 17 00:00:00 2001 From: Kent Johnson Date: Thu, 10 Jun 2021 10:06:35 -0400 Subject: [PATCH] Fix a critical bug in consolidation #45 --- DESCRIPTION | 4 ++-- NEWS.md | 5 +++++ R/split_phenotypes.R | 2 +- 3 files changed, 8 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 552d2a6..27d9e02 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: phenoptrReports Title: Create reports using Phenoptics data -Version: 0.2.11.9000 -Date: 2021-06-01 +Version: 0.2.12 +Date: 2021-06-10 Authors@R: c( person("Kent S", "Johnson", role = c("aut", "cre"), email = "kjohnson@akoyabio.com"), diff --git a/NEWS.md b/NEWS.md index ebf5e43..34f1e94 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,8 @@ +# phenoptrReports 0.2.12 +**2021-06-10** + +- Fix a critical bug in the consolidate and summarize addin + # phenoptrReports 0.2.11 **2021-06-01** diff --git a/R/split_phenotypes.R b/R/split_phenotypes.R index 3cce4b8..7a4b2ca 100644 --- a/R/split_phenotypes.R +++ b/R/split_phenotypes.R @@ -124,7 +124,7 @@ merge_and_split_phenotypes <- function(csd_files, output_dir, purrr::walk2(names[-1], csd_files[-1], function(name, path) { # We only need the phenotype columns and join columns from subsequent files # Drop everything else for speed and less memory use - col_select= rlang::quo(list( + col_select <<- rlang::quo(list( !!rlang::sym(field_col), `Cell ID`, # These two are required columns, they are added by `process_one_file`