X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=R%2Fcophyloplot.R;fp=R%2Fcophyloplot.R;h=29e5b3c33d2f14acd7c4a7073530424b823cdbfe;hb=a2fc961dffe9f9b7994ed880e68c03b2334dc341;hp=85f091fd8614bc15176e8f7691a6e20601de7958;hpb=dff741171e7afe3f9aaa2d9cb19c2f91995e8623;p=ape.git diff --git a/R/cophyloplot.R b/R/cophyloplot.R index 85f091f..29e5b3c 100644 --- 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