Re: [R-sig-phylo] Force read.nexus() to return a multiPhylo object, even if there is only one tree

2016-12-28 Thread Liam J. Revell
Ahhh. I see. I missed the part in Yan's original email about the names. All the best, Liam Liam J. Revell, Associate Professor of Biology University of Massachusetts Boston web: http://faculty.umb.edu/liam.revell/ email: liam.rev...@umb.edu blog: http://blog.phytools.org On 12/28/2016 6:45 AM,

Re: [R-sig-phylo] Force read.nexus() to return a multiPhylo object, even if there is only one tree

2016-12-28 Thread Emmanuel Paradis
Hi Liam, Actually, this can be done with c(): R> tr <- rtree(10) R> c(tr) 1 phylogenetic trees With respect to Yan's initial query, this will not restore the tree name from the NEXUS file which is (currently) lost if there is a single tree. Best, Emmanuel Le 28/12/2016 à 03:11, Liam J.

Re: [R-sig-phylo] Force read.nexus() to return a multiPhylo object, even if there is only one tree

2016-12-27 Thread Liam J. Revell
Hi Yan. In case it is useful I just pushed an update to phytools in which I have added an as.multiPhylo method for objects of class "phylo". This will also return an object of class "multiPhylo" if that is already the object class. This means that: obj<-as.multiPhylo(read.nexus(...)) in

Re: [R-sig-phylo] Force read.nexus() to return a multiPhylo object, even if there is only one tree

2016-12-27 Thread Yan Wong
On 27 Dec 2016, at 22:08, Emmanuel Paradis wrote: > Hi Yan, > > Yes, you are right: this modification can be done. In the meantime, you can > fix the code with: > > fix(read.nexus) > > Find this line (#117): > >if (Ntree == 1) { > > and change it to: > >

Re: [R-sig-phylo] Force read.nexus() to return a multiPhylo object, even if there is only one tree

2016-12-27 Thread Emmanuel Paradis
Hi Yan, Yes, you are right: this modification can be done. In the meantime, you can fix the code with: fix(read.nexus) Find this line (#117): if (Ntree == 1) { and change it to: if (FALSE) { save and close. Tell me if you still have problem. Best, Emmanuel Le 27/12/2016 à