aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2014-04-29 07:56:08 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2014-04-29 07:56:08 +0200
commit163df96dd583d5b2505b88f86d70c7c8c962a325 (patch)
treeed42dd631c2d5977ee061af3da2a49876c4c3485
parentde7de65fc97ae54c731b829c13d01fc065b0b15d (diff)
Fix y label in optional residual plot of plot.mkinfit
-rw-r--r--R/plot.mkinfit.R2
1 files changed, 1 insertions, 1 deletions
diff --git a/R/plot.mkinfit.R b/R/plot.mkinfit.R
index 23eb30fa..386452f8 100644
--- a/R/plot.mkinfit.R
+++ b/R/plot.mkinfit.R
@@ -86,7 +86,7 @@ plot.mkinfit <- function(x, fit = x,
plot(0, type="n",
xlim = xlim,
ylim = c(-1.2 * maxabs, 1.2 * maxabs),
- xlab = xlab, ylab = ylab)
+ xlab = xlab, ylab = "Residuals")
for(obs_var in obs_vars){
residuals_plot <- subset(fit$data, variable == obs_var, c("time", "residual"))
points(residuals_plot, pch = pch_obs[obs_var], col = col_obs[obs_var])

Contact - Imprint