[R-gregmisc-users] SF.net SVN: r-gregmisc:[2006] trunk/gplots/R

[<wa...@us...>]

Revision: 2006
          http://sourceforge.net/p/r-gregmisc/code/2006
Author:   warnes
Date:     2015-05-01 17:44:30 +0000 (Fri, 01 May 2015)
Log Message:
-----------
Make ballonplot.n() and plot.lm2() 'defunct'.

Modified Paths:
--------------
    trunk/gplots/R/boxplot2.R
    trunk/gplots/R/lmplot2.R

Modified: trunk/gplots/R/boxplot2.R
===================================================================
--- trunk/gplots/R/boxplot2.R	2015-05-01 17:24:09 UTC (rev 2005)
+++ trunk/gplots/R/boxplot2.R	2015-05-01 17:44:30 UTC (rev 2006)
@@ -1,11 +1,7 @@
 # $Id$
 boxplot.n <- function( ..., top=FALSE, shrink=1.0, textcolor=NULL )
     {
-        .Deprecated("gboxplot", package="gplots")
-        cl <- match.call()
-        mf <- match.call(expand.dots = FALSE)
-        mf[[1L]] <- quote(boxplot2)
-        eval(mf, parent.frame())
+        .Defunct("gboxplot", package="gplots")
     }
 
 boxplot2  <- function( ..., top=FALSE, shrink=1.0, textcolor=NULL )

Modified: trunk/gplots/R/lmplot2.R
===================================================================
--- trunk/gplots/R/lmplot2.R	2015-05-01 17:24:09 UTC (rev 2005)
+++ trunk/gplots/R/lmplot2.R	2015-05-01 17:44:30 UTC (rev 2006)
@@ -17,10 +17,7 @@
                      max.n=5000
                      )
 {
-    cl <- match.call()
-    mf <- match.call(expand.dots = FALSE)
-    mf[[1L]] <- quote(lmplot2)
-    eval(mf, parent.frame())
+    .Defunct("lmplot", "gplots")
 }
 
 

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.