diff options
Diffstat (limited to 'R/mkinfit.R')
| -rw-r--r-- | R/mkinfit.R | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R index 83ac087..b0292bb 100644 --- a/R/mkinfit.R +++ b/R/mkinfit.R @@ -53,7 +53,8 @@ mkinfit <- function(mkinmod, observed, # Prevent inital parameter specifications that are not in the model
wrongpar.names <- setdiff(names(parms.ini), mkinmod$parms)
if (length(wrongpar.names) > 0) {
- stop("Initial parameter(s) ", paste(wrongpar.names, collapse = ", "), " not used in the model")
+ stop("Initial parameter(s) ", paste(wrongpar.names, collapse = ", "),
+ " not used in the model")
}
defaultpar.names <- setdiff(mkinmod$parms, names(parms.ini))
|