R/RcppExports.R

In xavierdidelot/BactDating: BactDating: Bayesian inference of ancestral dates on bacterial phylogenetic trees

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

coalpriorC <- function(leaves, nodes, alpha) {
    .Call('_BactDating_coalpriorC', PACKAGE = 'BactDating', leaves, nodes, alpha)
}

likelihoodGammaC <- function(tab, mu) {
    .Call('_BactDating_likelihoodGammaC', PACKAGE = 'BactDating', tab, mu)
}

likelihoodRelaxedgammaC <- function(tab, mu, sigma) {
    .Call('_BactDating_likelihoodRelaxedgammaC', PACKAGE = 'BactDating', tab, mu, sigma)
}

likelihoodPoissonC <- function(tab, mu) {
    .Call('_BactDating_likelihoodPoissonC', PACKAGE = 'BactDating', tab, mu)
}

likelihoodNegbinC <- function(tab, mu, sigma) {
    .Call('_BactDating_likelihoodNegbinC', PACKAGE = 'BactDating', tab, mu, sigma)
}

changeinorderedvec <- function(vec, old, n) {
    invisible(.Call('_BactDating_changeinorderedvec', PACKAGE = 'BactDating', vec, old, n))
}

likelihoodArcC <- function(tab, mu, sigma) {
    .Call('_BactDating_likelihoodArcC', PACKAGE = 'BactDating', tab, mu, sigma)
}

likelihoodCarcC <- function(tab, mu, sigma) {
    .Call('_BactDating_likelihoodCarcC', PACKAGE = 'BactDating', tab, mu, sigma)
}