powered by
Calculates the root seed id for each node of the recruitement tree.
get.seed.id(data)
An rds.data.frame
data(fauxmadrona) seeds <- get.seed.id(fauxmadrona) #number recruited by each seed barplot(table(seeds))
Run the code above in your browser using DataLab