diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2019-05-23 19:19:27 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2019-05-23 19:19:27 +0200 |
| commit | db472848915a8065347b8f81477a86928b89fbcf (patch) | |
| tree | ffb55c76d96d2b83677064bd01317c8f9fba1875 /R | |
| parent | 84abde72967691d82bbad66eeff4d1ab161530dd (diff) | |
Fix a bug that could lead to wrong chi2 error levels
Diffstat (limited to '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 5e7b5bd3..bc8b9d11 100644 --- a/R/mkinfit.R +++ b/R/mkinfit.R @@ -91,6 +91,7 @@ mkinfit <- function(mkinmod, observed, if (length(wrongpar.names) > 0) {
warning("Initial parameter(s) ", paste(wrongpar.names, collapse = ", "),
" not used in the model")
+ parms.ini <- parms.ini[setdiff(names(parms.ini), wrongpar.names)]
}
# Warn that the sum of formation fractions may exceed one if they are not
|