[R-gregmisc-commits] r2093 - pkg/gplots/R

[noreply at r-forge.r-project.org]

Author: warnes
Date: 2016-03-25 14:41:06 +0100 (Fri, 25 Mar 2016)
New Revision: 2093

Modified:
   pkg/gplots/R/plot.lowess.R
Log:
Ensure extra arguments are properly passed to the plot call.

Modified: pkg/gplots/R/plot.lowess.R
===================================================================
--- pkg/gplots/R/plot.lowess.R	2016-03-25 13:40:03 UTC (rev 2092)
+++ pkg/gplots/R/plot.lowess.R	2016-03-25 13:41:06 UTC (rev 2093)
@@ -15,6 +15,7 @@
 {
   m <- x$call
   m[[1]] <- quote(plot)
+  m <- as.call(append(as.list(m), list(...)))
   eval(m,  envir = parent.frame())
 
   lines(x$x, x$y, col=col.lowess, lty=lty.lowess)