From 4672c2b3fd6c22e63b00ee5038998dd68a885c25 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Tue, 28 Jun 2016 00:24:46 +0200
Subject: Convenience wrapper plot_sep, further vignette updates

---
 R/plot.mkinfit.R | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'R')

diff --git a/R/plot.mkinfit.R b/R/plot.mkinfit.R
index 3ca18c19..303effb5 100644
--- a/R/plot.mkinfit.R
+++ b/R/plot.mkinfit.R
@@ -187,3 +187,9 @@ plot.mkinfit <- function(x, fit = x,
   }
   if (do_layout) par(oldpar, no.readonly = TRUE)
 }
+# Convenience function for switching on some features of mkinfit
+# that have not been made the default to keep compatibility
+plot_sep <- function(fit, sep_obs = TRUE, show_residuals = TRUE, show_errmin = TRUE, ...) {
+  plot.mkinfit(fit, sep_obs = TRUE, show_residuals = TRUE, 
+          show_errmin = TRUE, ...)
+}
-- 
cgit v1.2.1