# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
wbar <- function(tinf, dateT, rOff, pOff, pi, shGen, scGen, shSam, scSam, delta_t = 0.05) {
.Call('TransPhyloC_wbar', PACKAGE = 'TransPhyloC', tinf, dateT, rOff, pOff, pi, shGen, scGen, shSam, scSam, delta_t)
}
probTTree <- function(ttree, rOff, pOff, pi, shGen, scGen, shSam, scSam, dateT, delta_t = 0.05) {
.Call('TransPhyloC_probTTree', PACKAGE = 'TransPhyloC', ttree, rOff, pOff, pi, shGen, scGen, shSam, scSam, dateT, delta_t)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.