Nothing
R/lambda.stem.ms01.R
In laser: Likelihood Analysis of Speciation/Extinction Rates from Phylogenies
`lambda.stem.ms01` <-
function(n, tb, eps=0)
{
res<-list()
x<- (1/tb)*log(n*(1-eps)+eps)
res$r <- x
res$lambda <- x/(1-eps)
res
}
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.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
`lambda.stem.ms01` <-
function(n, tb, eps=0)
{
res<-list()
x<- (1/tb)*log(n*(1-eps)+eps)
res$r <- x
res$lambda <- x/(1-eps)
res
}
Try the laser package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.