From 57ac729467640c4e55d6047fa42ce83bcc9ce42f Mon Sep 17 00:00:00 2001
From: Yu Jiawei <jiawei.yu@uq.edu.au>
Date: Wed, 20 Nov 2024 10:23:56 +1000
Subject: [PATCH] change productive to productivity

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

diff --git a/R/setup_vdj_pseudobulk.R b/R/setup_vdj_pseudobulk.R
index eca59c3..833785d 100644
--- a/R/setup_vdj_pseudobulk.R
+++ b/R/setup_vdj_pseudobulk.R
@@ -78,7 +78,7 @@ setup_vdj_pseudobulk <- function(sce, mode_option = c("abT", "gdT", "B"), alread
   if (!already.productive) {
     if (is.null(mode_option)) {
       if (!is.null(productive_cols)) {
-        message(paste("checking productive column(s) from", paste(productive_cols,
+        message(paste("checking productivity column(s) from", paste(productive_cols,
           collapse = ", "), "..."), appendLF = FALSE)
         cnumber0 <- dim(sce)[2]
         sce <- Reduce(function(data, p_col) {