R/RcppExports.R

In spinBayes: Semi-Parametric Gene-Environment Interaction via Bayesian Variable Selection

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

BVCStr <- function(xx, y, W, Ex, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatLambdaSq0, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress) {
    .Call(`_spinBayes_BVCStr`, xx, y, W, Ex, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatLambdaSq0, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress)
}

BVCStr_NoE <- function(xx, y, W, CLIN, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatLambdaSq0, hatLambdaSqStar, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress) {
    .Call(`_spinBayes_BVCStr_NoE`, xx, y, W, CLIN, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatLambdaSq0, hatLambdaSqStar, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress)
}

BVCPointMass <- function(xx, y, W, Ex, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatPi0, hatPiStar, hatPiZeta, hatLambdaSq0, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, mu0, muStar, muE, nu0, nuStar, nuE, progress) {
    .Call(`_spinBayes_BVCPointMass`, xx, y, W, Ex, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatPi0, hatPiStar, hatPiZeta, hatLambdaSq0, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, mu0, muStar, muE, nu0, nuStar, nuE, progress)
}

BVCPointMass_NoE <- function(xx, y, W, CLIN, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatPi0, hatPiStar, hatLambdaSq0, hatLambdaSqStar, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, mu0, muStar, nu0, nuStar, progress) {
    .Call(`_spinBayes_BVCPointMass_NoE`, xx, y, W, CLIN, s, q, maxSteps, hatM, hatR0, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSq0, hatInvTauSqStar, invSigAlpha0, hatPi0, hatPiStar, hatLambdaSq0, hatLambdaSqStar, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, mu0, muStar, nu0, nuStar, progress)
}

BVCPointMassNonStr <- function(xx, y, W, Ex, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatPiStar, hatPiZeta, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, mu0, muStar, nu0, nuStar, progress) {
    .Call(`_spinBayes_BVCPointMassNonStr`, xx, y, W, Ex, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatPiStar, hatPiZeta, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, mu0, muStar, nu0, nuStar, progress)
}

BVCPointMassNonStr_NoE <- function(xx, y, W, CLIN, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatPiStar, hatLambdaSqStar, hatSigmaSq, aStar, bStar, alpha, gamma, muStar, nuStar, progress) {
    .Call(`_spinBayes_BVCPointMassNonStr_NoE`, xx, y, W, CLIN, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatPiStar, hatLambdaSqStar, hatSigmaSq, aStar, bStar, alpha, gamma, muStar, nuStar, progress)
}

BVCNoStr <- function(xx, y, W, Ex, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress) {
    .Call(`_spinBayes_BVCNoStr`, xx, y, W, Ex, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatZeta, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress)
}

BVCNoStr_NoE <- function(xx, y, W, CLIN, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatLambdaSqStar, hatSigmaSq, aStar, bStar, alpha, gamma, progress) {
    .Call(`_spinBayes_BVCNoStr_NoE`, xx, y, W, CLIN, s, q, maxSteps, hatM, hatRStar, hatAlpha, hatInvSigM0, hatInvTauSqStar, invSigAlpha0, hatLambdaSqStar, hatSigmaSq, aStar, bStar, alpha, gamma, progress)
}

BayesLasso <- function(xx, y, W, Ex, s, maxSteps, hatM, hatRStar, hatAlpha, hatZeta, invSigM0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress) {
    .Call(`_spinBayes_BayesLasso`, xx, y, W, Ex, s, maxSteps, hatM, hatRStar, hatAlpha, hatZeta, invSigM0, hatInvTauSqStar, invSigAlpha0, hatInvTauSqZeta, hatLambdaSqStar, hatLambdaSqZeta, hatSigmaSq, a0, b0, aStar, bStar, alpha, gamma, progress)
}

BayesRefit <- function(xx, y, s0, q, maxSteps, hatM, hatRStar, invSigM0, hatInvTauSq, hatLambdaSq, hatSigmaSq, aStar, bStar, alpha, gamma, progress, debug) {
    .Call(`_spinBayes_BayesRefit`, xx, y, s0, q, maxSteps, hatM, hatRStar, invSigM0, hatInvTauSq, hatLambdaSq, hatSigmaSq, aStar, bStar, alpha, gamma, progress, debug)
}