[adegenet-commits] r396 - pkg/R

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

Author: jombart
Date: 2009-06-11 23:58:49 +0200 (Thu, 11 Jun 2009)
New Revision: 396

Modified:
   pkg/R/haploSim.R
Log:
Fixed an issue in dim check in matCOnnect


Modified: pkg/R/haploSim.R
===================================================================
--- pkg/R/haploSim.R	2009-06-11 17:56:02 UTC (rev 395)
+++ pkg/R/haploSim.R	2009-06-11 21:58:49 UTC (rev 396)
@@ -224,7 +224,7 @@
         ## some checks
         if(!is.null(matConnect)) {
             if(nrow(matConnect) != ncol(matConnect)) stop("matConnect is not a square matrix")
-            if(nrow(matConnect) != grid.size) stop("dimension of matConnect does not match grid size")
+            if(nrow(matConnect) != grid.size^2) stop("dimension of matConnect does not match grid size")
         }
 
         ## initialization