aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
Diffstat (limited to 'R')
-rw-r--r--R/mkinfit.R4
1 files changed, 4 insertions, 0 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R
index d8a1c9ea..b80be976 100644
--- a/R/mkinfit.R
+++ b/R/mkinfit.R
@@ -255,6 +255,7 @@ summary.mkinfit <- function(object, data = TRUE, distimes = TRUE, alpha = 0.05,
Rversion = paste(R.version$major, R.version$minor, sep="."),
date.fit = object$date,
date.summary = date(),
+ solution_type = object$solution_type,
use_of_ff = object$mkinmod$use_of_ff,
residuals = object$residuals,
residualVariance = resvar,
@@ -299,6 +300,9 @@ print.summary.mkinfit <- function(x, digits = max(3, getOption("digits") - 3), .
df <- x$df
rdf <- df[2]
+ cat("\nMethod used for solution of differential equation system:\n")
+ cat(x$solution_type, "\n")
+
cat("\nStarting values for optimised parameters:\n")
print(x$start)

Contact - Imprint