PageRenderTime 7ms CodeModel.GetById 2ms app.highlight 1ms RepoModel.GetById 2ms app.codeStats 0ms

/working/auteur.extended/R/get.ancestors.R

http://github.com/eastman/auteur
R | 5 lines | 4 code | 1 blank | 0 comment | 0 complexity | 9a83d9c1eadda45cf6a81246989c22e8 MD5 | raw file
1get.ancestors<-function(phy) 
2{
3	return(lapply(1:Ntip(phy), function(x) get.ancestors.of.node(x,phy)))
4}
5