diff --git a/DESCRIPTION b/DESCRIPTION index 61d6f57..c976edc 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: EWCE Type: Package Title: Expression Weighted Celltype Enrichment -Version: 1.11.4 +Version: 1.11.5 Authors@R: c(person(given = "Alan", family = "Murphy", diff --git a/NEWS.md b/NEWS.md index e771778..3ef284e 100755 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,11 @@ +# EWCE 1.11.5 + +## Bug fixes + +* `check_bootstrap_args`: + - annotation level for checking cell type names was previous hardcoded to + level 1, now updated to match user input for annotation level. + # EWCE 1.11.4 ## Bug fixes diff --git a/R/check_bootstrap_args.R b/R/check_bootstrap_args.R index b2b8656..cde2ae4 100755 --- a/R/check_bootstrap_args.R +++ b/R/check_bootstrap_args.R @@ -34,7 +34,7 @@ check_bootstrap_args <- function(sct_data, } #### Check if controlling for another celltype ### if (!is.null(controlledCT)) { - ct_names <- colnames(sct_data[[1]]$specificity) + ct_names <- colnames(sct_data[[annotLevel]]$specificity) if(fix_celltypes){ ct_names <- fix_celltype_names(ct_names) }