From 5390a6ee946c1ad2f2c6b2d768d838da02c8860a Mon Sep 17 00:00:00 2001 From: Carldeboer Date: Wed, 19 Feb 2020 20:24:12 -0500 Subject: [PATCH] bug in suppress warnings --- R/MAUDE.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/MAUDE.R b/R/MAUDE.R index fa44b2f..a1cfde6 100755 --- a/R/MAUDE.R +++ b/R/MAUDE.R @@ -76,7 +76,7 @@ getNBGaussianLikelihood = function(x, mu, k, sigma=1, nullModel, libFract){ #message(sprintf("observed fractions = %s",paste(as.character(((x/k))),collapse=", "))) for (i in 1:nrow(nullModel)){ #dnbinom(x = number of reads for this guide, size = number of reads total, prob= probability of getting a read at each drawing) - suppressWarnings(likelihood = likelihood + dnbinom(x=x[i], size=k[i], prob =1- binFractions[i], log=T)) + suppressWarnings({likelihood = likelihood + dnbinom(x=x[i], size=k[i], prob =1- binFractions[i], log=T)}) } return(likelihood) }