Revision: 1723
http://sourceforge.net/p/r-gregmisc/code/1723
Author: warnes
Date: 2013-10-11 17:15:54 +0000 (Fri, 11 Oct 2013)
Log Message:
-----------
Fix bug in getVennCounts.data.frame when number of TRUE cases in each variable are equal.
Modified Paths:
--------------
trunk/gplots/R/venn.R
Modified: trunk/gplots/R/venn.R
===================================================================
--- trunk/gplots/R/venn.R 2013-10-09 18:39:35 UTC (rev 1722)
+++ trunk/gplots/R/venn.R 2013-10-11 17:15:54 UTC (rev 1723)
@@ -22,7 +22,7 @@
if( !all(unique(unlist(l)) %in% c(0,1)) )
stop("Only indicator columns permitted")
- l <- sapply( l, function(x) which(as.logical(x)))
+ l <- lapply( l, function(x) which(as.logical(x)))
getVennCounts.list(l)
}
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
