From 163df96dd583d5b2505b88f86d70c7c8c962a325 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Tue, 29 Apr 2014 07:56:08 +0200
Subject: Fix y label in optional residual plot of plot.mkinfit

---
 R/plot.mkinfit.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'R')

diff --git a/R/plot.mkinfit.R b/R/plot.mkinfit.R
index 23eb30f..386452f 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])
-- 
cgit v1.2.1