aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
authorjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-10-30 08:39:19 +0000
committerjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-10-30 08:39:19 +0000
commitc183667b90a6efdd78fbd71b33b029596e9b15db (patch)
tree70c59ab70a4fe40723deabb504a965bba9106aa2 /R
parent4bbcc09d767271513974aeefc741bdded9830186 (diff)
- Backtransform fixed ODE parameters for the summary (compare ChangeLog)
- Reformatted ChangeLog - Version bump as mkin 0.9-22 is on CRAN git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/kinfit/pkg/mkin@129 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
Diffstat (limited to 'R')
-rw-r--r--R/mkinfit.R4
1 files changed, 2 insertions, 2 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R
index b0292bba..2be55151 100644
--- a/R/mkinfit.R
+++ b/R/mkinfit.R
@@ -247,8 +247,8 @@ mkinfit <- function(mkinmod, observed,
rep("deparm", length(parms.optim)))
fit$start$transformed = c(state.ini.optim, parms.optim)
- fit$fixed <- data.frame(
- value = c(state.ini.fixed, parms.fixed))
+ fit$fixed <- data.frame(value = c(state.ini.fixed,
+ backtransform_odeparms(parms.fixed, mod_vars)))
fit$fixed$type = c(rep("state", length(state.ini.fixed)),
rep("deparm", length(parms.fixed)))

Contact - Imprint