[R-gregmisc-users] SF.net SVN: r-gregmisc:[1823] trunk/gplots/R/heatmap.2.R

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

Revision: 1823
          http://sourceforge.net/p/r-gregmisc/code/1823
Author:   warnes
Date:     2014-06-30 19:26:21 +0000 (Mon, 30 Jun 2014)
Log Message:
-----------
Fix typo in dendrogram size checking code.

Modified Paths:
--------------
    trunk/gplots/R/heatmap.2.R

Modified: trunk/gplots/R/heatmap.2.R
===================================================================
--- trunk/gplots/R/heatmap.2.R	2014-06-19 18:51:32 UTC (rev 1822)
+++ trunk/gplots/R/heatmap.2.R	2014-06-30 19:26:21 UTC (rev 1823)
@@ -210,7 +210,7 @@
     {
       ddc <- Colv ## use Colv 'as-is', when it is dendrogram
       colInd <- order.dendrogram(ddc)
-      if(length(colInd)>nr || any(colInd<1 | colInd > nc ))
+      if(length(colInd)>nc || any(colInd<1 | colInd > nc ))
          stop("Colv dendrogram doesn't match size of x")
     }
   else if(identical(Colv, "Rowv")) {

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