returns in foreground in normalized read counts

mskilab-org · Sep 11, 2024 · 14adc34 · 14adc34
1 parent 2c55551
commit 14adc34
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/dryclean.R b/R/dryclean.R
@@ -249,7 +249,7 @@ dryclean <- R6::R6Class("dryclean",
       cov[, log.reads := log(input.read.counts)]
       cov[is.infinite(log.reads), log.reads := NA]
 
-      scaling.factor <- sum(cov$input.read.counts) / sum(cov$foreground + cov$background)
+      scaling.factor <- sum(cov$input.read.counts) / sum(cov$foreground)
       cov$foreground <- cov$foreground * scaling.factor
       cov$background <- cov$background * scaling.factor