Hi Nick,
This can be fixed by editing the code of tiplabels() with the usual
procedure:
fix(tiplabels)
then find this line of code:
tmp <- rect2polar(XX, YY)
and insert below the following one:
if (lastPP$align.tip.label) tmp$r[] <- max(tmp$r)
save and close. Your commands work for me after this fix. You should
then be able to add series of labels with increasing values of offset:
tiplabels(.... offset = 6)
tiplabels(.... offset = 8)
tiplabels(.... offset = 10)
Best,
Emmanuel
Le 24/08/2018 à 17:04, Carleson, Nick a écrit :
Hello all,
I'm using the R package 'ape' to make non-ultrametric phylogenetic trees
. I want to align tip labels together when drawing a tree with
plot.phylo(), and also add on more labels using the tiplabels()
function. But, I can't get additional tip labels from tiplabels aligned
properly with those from plot.phylo. When I call tiplabels, the labels
are being drawn at the true edge length instead of neatly around the
plot with the tip labels drawn by plot.phylo. So, in the plot below, I
want the tip labels (circles) to be aligned adjacent to the tip labels
(names) drawn byplot.phylo.
Good: tips like t30, t31, and t2
Bad: tips like t1, t20, and t21
Can anyone help me out?
Below is the code to produce the tree above. I'm using ape version 5.1
and R version 3.4.3.
library(ape)
set.seed(31)
sim_tree <- rlineage(0.1, 0.05)
plot.phylo(sim_tree, type = "fan", align.tip.label = TRUE)
tiplabels(pch = 19, col = rainbow(3), offset = 6)
Thanks all!
**Nick Carleson*
*
**
PhD Student*| Oregon State University
*Graduate Research Assistant | *Botany and Plant Pathology**
*
Pour nous remonter une erreur de filtrage, veuillez vous rendre ici
<http://f.security-mail.net/408Dy4h8dmT>
_______________________________________________
R-sig-phylo mailing list - R-sig-phylo@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-sig-phylo
Searchable archive at http://www.mail-archive.com/r-sig-phylo@r-project.org/
_______________________________________________
R-sig-phylo mailing list - R-sig-phylo@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-sig-phylo
Searchable archive at http://www.mail-archive.com/r-sig-phylo@r-project.org/