R/RcppExports.R

In spass: Study Planning and Adaptation of Sample Size

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

minFunc <- function(x, daten, dataNA) {
    .Call('_spass_minFunc', PACKAGE = 'spass', x, daten, dataNA)
}

minFuncMult <- function(x, daten, dataNA, n) {
    .Call('_spass_minFuncMult', PACKAGE = 'spass', x, daten, dataNA, n)
}

minFuncBlinded <- function(x, daten, dataNA, n, delta) {
    .Call('_spass_minFuncBlinded', PACKAGE = 'spass', x, daten, dataNA, n, delta)
}

mlFirst <- function(y, groupE, groupC, nE, nC, tpE, tpC, type) {
    .Call('_spass_mlFirst', PACKAGE = 'spass', y, groupE, groupC, nE, nC, tpE, tpC, type)
}

mlFirstOneGroup <- function(y, groupC, nC, tpC, type) {
    .Call('_spass_mlFirstOneGroup', PACKAGE = 'spass', y, groupC, nC, tpC, type)
}

mlSecond <- function(rho, y, groupE, groupC, nE, nC, tpE, tpC, type) {
    .Call('_spass_mlSecond', PACKAGE = 'spass', rho, y, groupE, groupC, nE, nC, tpE, tpC, type)
}

mlSecondOneGroup <- function(rho, y, groupC, nC, tpC, type) {
    .Call('_spass_mlSecondOneGroup', PACKAGE = 'spass', rho, y, groupC, nC, tpC, type)
}

mlFirstGrad <- function(y, groupE, groupC, nE, nC, tpE, tpC, type) {
    .Call('_spass_mlFirstGrad', PACKAGE = 'spass', y, groupE, groupC, nE, nC, tpE, tpC, type)
}

mlFirstHObs <- function(y, groupE, groupC, nE, nC, tpE, tpC, type) {
    .Call('_spass_mlFirstHObs', PACKAGE = 'spass', y, groupE, groupC, nE, nC, tpE, tpC, type)
}

mlFirstHExp <- function(y, kf, tp, type) {
    .Call('_spass_mlFirstHExp', PACKAGE = 'spass', y, kf, tp, type)
}

mlFirstJObs <- function(y, groupE, groupC, nE, nC, tpE, tpC, type) {
    .Call('_spass_mlFirstJObs', PACKAGE = 'spass', y, groupE, groupC, nE, nC, tpE, tpC, type)
}

mlFirstJExp <- function(y, rho, kf, tp, type, approx = 50L) {
    .Call('_spass_mlFirstJExp', PACKAGE = 'spass', y, rho, kf, tp, type, approx)
}

mlFirstBlinded <- function(y, group, n, tp, type, theta, k) {
    .Call('_spass_mlFirstBlinded', PACKAGE = 'spass', y, group, n, tp, type, theta, k)
}

mlSecondBlinded <- function(rho, y, group, n, tp, type, k) {
    .Call('_spass_mlSecondBlinded', PACKAGE = 'spass', rho, y, group, n, tp, type, k)
}