From 6967579ecc0ac202b58d5783d2802a0c7e6c7383 Mon Sep 17 00:00:00 2001
From: Thomas  OBADIA <tobadia@pasteur.fr>
Date: Thu, 21 Dec 2023 15:17:18 +0100
Subject: [PATCH] Handle the possible presence of a Description fiels in
 Bioplex exports

---
 FUNCTIONS.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FUNCTIONS.R b/FUNCTIONS.R
index e3bdc23..de65809 100644
--- a/FUNCTIONS.R
+++ b/FUNCTIONS.R
@@ -229,7 +229,7 @@ runRelativeAntibodyUnits = function(fname1, fname2, MFI_CSV, MFI_N_ANTIGENS, TEM
         dplyr::mutate(Location = paste0(1:n(), "(1,", Location, ")"))
       
       # Remove columns that are not MFI readings or sample code / location
-      L <- L[, !(colnames(L) %in% c("Region", "Gate", "Total", "% Agg Beads", "Sampling Errors"))]
+      L <- L[, !(colnames(L) %in% c("Region", "Gate", "Total", "% Agg Beads", "Sampling Errors", "Description"))]
       
       # Antigen names clean-up
       colnames(L) = gsub("\\..*", "", colnames(L))
-- 
GitLab