From 8be01094ecbc65d4bdf1e7f819ef01b7a252b39d Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Thu, 24 Jul 2014 09:58:55 +0200
Subject: Avoid artificial zero residual in mkinresplot

---
 R/mkinresplot.R | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'R/mkinresplot.R')

diff --git a/R/mkinresplot.R b/R/mkinresplot.R
index c9a801fd..82ffd2cb 100644
--- a/R/mkinresplot.R
+++ b/R/mkinresplot.R
@@ -36,7 +36,8 @@ mkinresplot <- function (object,
 	col_obs <- pch_obs <- 1:length(obs_vars)
  	names(col_obs) <- names(pch_obs) <- obs_vars
 
-  plot(0,  xlab = xlab, ylab = ylab, 
+  plot(0, type = "n",
+       xlab = xlab, ylab = ylab, 
        xlim = xlim,
        ylim = c(-1.2 * maxabs, 1.2 * maxabs), ...)
 
-- 
cgit v1.2.1