aboutsummaryrefslogtreecommitdiff
path: root/R/mkinfit.R
diff options
context:
space:
mode:
authorjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-02-16 21:15:52 +0000
committerjranke <jranke@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>2013-02-16 21:15:52 +0000
commit329dadc5fd557cbeec0d1f3a6db57b6b4d6f41d4 (patch)
tree8159a9ba673fc6c150a92748e142697c845ece1d /R/mkinfit.R
parente6ba7af29db678ef437e7f8301299ec18f4c66a4 (diff)
- Some maintenance fixes
- Start of the examples vignette git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/kinfit/pkg/mkin@61 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
Diffstat (limited to 'R/mkinfit.R')
-rw-r--r--R/mkinfit.R2
1 files changed, 1 insertions, 1 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R
index f574b6eb..411cb40c 100644
--- a/R/mkinfit.R
+++ b/R/mkinfit.R
@@ -158,7 +158,7 @@ mkinfit <- function(mkinmod, observed,
points(subset(observed, name == obs_var, c(time, value)),
pch = pch_obs[obs_var], col = col_obs[obs_var])
}
- matlines(out_plot$time, out_plot[-1], co = col_obs, lty = lty_obs)
+ matlines(out_plot$time, out_plot[-1], col = col_obs, lty = lty_obs)
legend("topright", inset=c(0.05, 0.05), legend=obs_vars,
col=col_obs, pch=pch_obs, lty=1:length(pch_obs))
}

Contact - Imprint