R/node.sons.R

`node.sons` <-
function(phy, node)
{
	mat <- phy$edge;
	sons <- mat[,2][which(mat[,1] == node)];
	sons;
}

Try the laser package in your browser

Any scripts or data that you put into this service are public.

laser documentation built on Jan. 15, 2017, 4:49 p.m.