R/phybase2phylo.R

# Added by Brian O'Meara
phybase2phylo <- function(x) {
	if(grepl('#', x)) {
		x<-gsub("#\\.*\\d*\\.*\\d*","",x)
	}
	return(read.tree(text=x))
}
bomeara/phybase documentation built on May 12, 2019, 11:35 p.m.