aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2014-07-01 08:34:01 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2014-07-01 08:34:01 +0200
commitddaa35ff58c8dcb04ef86723dccba0bfa97cf053 (patch)
treeeb0920ca59d47ff1a9c67744232295d08f7582d5
parentf836d2e30ab206c2e8558fd4cca89b8ee3d08f05 (diff)
One more source code comment
-rw-r--r--R/mkinfit.R2
1 files changed, 2 insertions, 0 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R
index 661dfda4..f1a3e6bb 100644
--- a/R/mkinfit.R
+++ b/R/mkinfit.R
@@ -59,6 +59,8 @@ mkinfit <- function(mkinmod, observed,
" not used in the model")
}
+ # Set initial parameter values, including a small increment (salt)
+ # to avoid linear dependencies (singular matrix) in Eigenvalue based solutions
k_salt = 0
defaultpar.names <- setdiff(mkinmod$parms, names(parms.ini))
for (parmname in defaultpar.names) {

Contact - Imprint