a few changes....

[ape.git] / R / cophyloplot.R

diff --git a/R/cophyloplot.R b/R/cophyloplot.R
index 85f091fd8614bc15176e8f7691a6e20601de7958..29e5b3c33d2f14acd7c4a7073530424b823cdbfe 100644 (file)
--- a/R/cophyloplot.R
+++ b/R/cophyloplot.R
@@ -42,11 +42,11 @@ cophyloplot <-
 }
 
 plotCophylo2 <-
-    function (x, y, assoc = assoc, use.edge.length = use.edge.length,
-              space = space, length.line = length.line, gap = gap,
-              type = type, return = return, col = col, lwd=lwd, lty=lty,
-              show.tip.label = show.tip.label,
-              font = font, ...)
+    function(x, y, assoc = assoc, use.edge.length = use.edge.length,
+             space = space, length.line = length.line, gap = gap,
+             type = type, return = return, col = col, lwd=lwd, lty=lty,
+             show.tip.label = show.tip.label,
+             font = font, ...)
 {
     res <- list()
 ###choice of the minimum space between the trees