aboutsummaryrefslogtreecommitdiff
path: root/R/mkinfit.R
diff options
context:
space:
mode:
authorjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-10-29 23:09:52 +0000
committerjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-10-29 23:09:52 +0000
commit4bbcc09d767271513974aeefc741bdded9830186 (patch)
tree11a22b7614904a844a4c1b9c8e59a4261d12c3d9 /R/mkinfit.R
parenta1c198293fadbc15b0e966f19fc2312f6878e288 (diff)
- Just one little formatting change in mkinfit.R
- Some very basic fitting now works in the experimental GUI with the new widget layout git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/kinfit/pkg/mkin@128 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
Diffstat (limited to 'R/mkinfit.R')
-rw-r--r--R/mkinfit.R3
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))

Contact - Imprint