[adegenet-commits] r379 - pkg/R

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

Author: jombart
Date: 2009-06-08 12:07:05 +0200 (Mon, 08 Jun 2009)
New Revision: 379

Modified:
   pkg/R/haploSim.R
   pkg/R/seqTrack.R
Log:
quiet=FALSE by default in plotSeqTrack


Modified: pkg/R/haploSim.R
===================================================================
--- pkg/R/haploSim.R	2009-06-08 09:22:53 UTC (rev 378)
+++ pkg/R/haploSim.R	2009-06-08 10:07:05 UTC (rev 379)
@@ -455,7 +455,7 @@
 
 
     ## CALL TO PLOTSEQTRACK ##
-    plotSeqTrack(res, xy=xy, annot=annot, dateRange=dateRange,
+    plotSeqTrack(x=res, xy=xy, annot=annot, dateRange=dateRange,
                         col=col, bg=bg, add=add, showAmbiguous=FALSE, ...)
 
     return(invisible(res))

Modified: pkg/R/seqTrack.R
===================================================================
--- pkg/R/seqTrack.R	2009-06-08 09:22:53 UTC (rev 378)
+++ pkg/R/seqTrack.R	2009-06-08 10:07:05 UTC (rev 379)
@@ -126,7 +126,7 @@
 ## plotSeqTrack
 ################
 plotSeqTrack <- function(x, xy, useArrows=TRUE, annot=TRUE, dateRange=NULL,
-                         col=NULL, bg="grey", add=FALSE, quiet=TRUE,
+                         col=NULL, bg="grey", add=FALSE, quiet=FALSE,
                          showAmbiguous=TRUE, mu0=NULL, seq.length=NULL, prob=0.75,
                          plot=TRUE,...){