R/RcppExports.R

Defines functions ppexpM ppexpV betaRegSamplermc betaRegSampler sigma2marginalmc sigma2marginal

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

sigma2marginal <- function(n, grid, XtX, SigmaBetaInv, Xstar, Xty, mu0, ystar) {
    .Call(`_bayesDP_sigma2marginal`, n, grid, XtX, SigmaBetaInv, Xstar, Xty, mu0, ystar)
}

sigma2marginalmc <- function(n, grid, XtX, SigmaBetaInv, Xstar, Xty, mu0, ystar) {
    .Call(`_bayesDP_sigma2marginalmc`, n, grid, XtX, SigmaBetaInv, Xstar, Xty, mu0, ystar)
}

betaRegSampler <- function(sigma2, XtX, SigmaBetaInv, mu0, Xty, nsamples) {
    .Call(`_bayesDP_betaRegSampler`, sigma2, XtX, SigmaBetaInv, mu0, Xty, nsamples)
}

betaRegSamplermc <- function(sigma2, XtX, SigmaBetaInv, SigmaBetaInvID, mu0, Xty, nsamples) {
    .Call(`_bayesDP_betaRegSamplermc`, sigma2, XtX, SigmaBetaInv, SigmaBetaInvID, mu0, Xty, nsamples)
}

ppexpV <- function(q, x, cuts) {
    .Call(`_bayesDP_ppexpV`, q, x, cuts)
}

ppexpM <- function(q, x, cuts) {
    .Call(`_bayesDP_ppexpM`, q, x, cuts)
}

Try the bayesDP package in your browser

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

bayesDP documentation built on March 18, 2022, 7:41 p.m.