diff --git a/R/PLNfit-class.R b/R/PLNfit-class.R index 44e071a4..af3a94e7 100644 --- a/R/PLNfit-class.R +++ b/R/PLNfit-class.R @@ -158,7 +158,7 @@ PLNfit <- R6Class( ## Check for convergence #print (delta_f) if (delta_f < config$ftol_rel) status <- 3 - if (delta_x < config$xtol_rel) status <- 4 + #if (delta_x < config$xtol_rel) status <- 4 if (status %in% c(3,4)) { objective <- objective[1:iterate + 1] break