still include

Author: philchalmers

R/PBA.R

@@ -292,8 +292,7 @@ PBA <- function(f, interval, ..., p = .6,
             if(integer)
                 cat(sprintf("\rIter: %i; Median: %i", iter, med))
             else cat(sprintf("\rIter: %i; Median: %.3f", iter, med))
-            if(is.null(FromSimSolve))
-                cat(sprintf("; E(f(x)) = %.2f", abs(e.froot)))
+            cat(sprintf("; E(f(x)) = %.2f", abs(e.froot)))
             if(!is.null(FromSimSolve))
                 cat('; Total.reps =', sum(replications[1L:iter]))
             if(interpolate && iter > interpolate.after && !is.na(glmpred[1L]))