From 95c854adc72b092489b234d951448cadfa26235f Mon Sep 17 00:00:00 2001 From: KarolisKoncevicius Date: Tue, 5 Jan 2021 00:42:29 +0200 Subject: [PATCH] fix a small bug where preprocessFunnorm() was not silent with verbose=FALSE --- R/preprocessFunnorm.R | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/R/preprocessFunnorm.R b/R/preprocessFunnorm.R index b3d2fcc..a8530b8 100644 --- a/R/preprocessFunnorm.R +++ b/R/preprocessFunnorm.R @@ -16,10 +16,12 @@ preprocessFunnorm <- function(rgSet, nPCs=2, sex = NULL, bgCorr = TRUE, dyeCorr # Background correction and dye bias normalization: if (bgCorr){ - if(verbose && dyeCorr) { - message("[preprocessFunnorm] Background and dye bias correction with noob") - } else { - message("[preprocessFunnorm] Background correction with noob") + if(verbose) { + if(dyeCorr) { + message("[preprocessFunnorm] Background and dye bias correction with noob") + } else { + message("[preprocessFunnorm] Background correction with noob") + } } gmSet <- preprocessNoob(rgSet, dyeCorr = dyeCorr) if(verbose) message("[preprocessFunnorm] Mapping to genome")