diff options
Diffstat (limited to 'R/mkinfit.R')
-rw-r--r-- | R/mkinfit.R | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R index 2af4e493..6606ec7a 100644 --- a/R/mkinfit.R +++ b/R/mkinfit.R @@ -443,6 +443,7 @@ mkinfit <- function(mkinmod, observed, degparms <- c(state.ini.optim, transparms.optim)
if (err_mod == "const") {
+ error_model_algorithm = "OLS"
if (!quiet) message("Ordinary least squares optimisation")
fit <- nlminb(degparms, nlogLik, control = control,
lower = lower[names(degparms)],
|