R/RcppExports.R

In iBATCGH: Integrative Bayesian Analysis of Transcriptomic and CGH Data

# This file was generated by Rcpp::compileAttributes
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

Center <- function(Y) {
    .Call('iBATCGH_Center', PACKAGE = 'iBATCGH', Y)
}

iBAT <- function(Y, X, distance, disfix, intercept=1, xi, R=-1, tran, mu, sigma=((rgamma(4,1,1))^(-0.5)), cmu=1/1000000, c=10, delta=3, d, e=0.001, f=0.999, alpha=20, deltak=c(-1,0,0.58,1), tauk=c(1,1,1,2), upp_bounds=c(-0.1, 0.1, 0.73, Inf), low_bounds=c(-Inf, -0.1, 0.1, 0.73), alpha_IG=c(1,1,1,1), beta_IG=c(1,1,1,1), low_IG=c(0.41,0.41,0.41,1), a=c(1,1,1,1), niter=500000, burnin=200000, Cout=1000, phi=0.5, pR=0.4, selectioncgh=-1, pXI=0.6,indep=0) {
    .Call('iBATCGH_iBAT', PACKAGE = 'iBATCGH', Y, X, distance, disfix, intercept, xi, R, tran, mu, sigma, cmu, c, delta, d, e, f, alpha, deltak, tauk, upp_bounds, low_bounds, alpha_IG, beta_IG, low_IG, a, niter, burnin, Cout, phi, pR, selectioncgh, pXI,indep)
}

iBATProbit <- function(Y, X, distance, disfix, intercept=1, xi, R=-1, tran, mu, sigma=((rgamma(4,1,1))^(-0.5)), cmu=1/1000000, c=10, delta=3, d, alpha0=2.32, alpha1=1, deltak=c(-1,0,0.58,1), tauk=c(1,1,1,2), upp_bounds=c(-0.1, 0.1, 0.73, Inf), low_bounds=c(-Inf, -0.1, 0.1, 0.73), alpha_IG=c(1,1,1,1), beta_IG=c(1,1,1,1), low_IG=c(0.41,0.41,0.41,1), a=c(1,1,1,1), niter=500000, burnin=200000, Cout=1000, phi=0.5, pR=0.4, selectioncgh=-1, pXI=0.6) {
    .Call('iBATCGH_iBATProbit', PACKAGE = 'iBATCGH', Y, X, distance, disfix, intercept, xi, R, tran, mu, sigma, cmu, c, delta, d, alpha0, alpha1, deltak, tauk, upp_bounds, low_bounds, alpha_IG, beta_IG, low_IG, a, niter, burnin, Cout, phi, pR, selectioncgh, pXI)
}

RListToVector <- function(xList, G, T) {
    .Call('iBATCGH_RListToVector', PACKAGE = 'iBATCGH', xList, G, T)
}

Tran <- function(xi) {
    .Call('iBATCGH_Tran', PACKAGE = 'iBATCGH', xi)
}

# Register entry points for exported C++ functions
methods::setLoadAction(function(ns) {
    .Call('iBATCGH_RcppExport_registerCCallable', PACKAGE = 'iBATCGH')
})