diff options
Diffstat (limited to 'R/estUtil.R')
-rw-r--r-- | R/estUtil.R | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/R/estUtil.R b/R/estUtil.R index 8bdc668..96ac3e3 100644 --- a/R/estUtil.R +++ b/R/estUtil.R @@ -66,7 +66,6 @@ levbmqdt <- function(...,obj,theta0,N,opt){ e <- l$Y-l$X%*%theta sumsq <- sum(e^2) sumSqRatio <- (sumsq0-sumsq)/sumsq0 - print(c(i,maxIter,sumsq0,sumSqRatio)) # If sum square error with the updated parameters is less than the # previous one, the updated parameters become the current parameters |