R/RcppExports.R

In binGroup2: Identification and Estimation using Group Testing

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

theta <- function(p, size, type) {
    .Call(`_binGroup2_theta`, p, size, type)
}

eff_nomaster_1 <- function(p, SE, SP, n) {
    .Call(`_binGroup2_eff_nomaster_1`, p, SE, SP, n)
}

eff_nomaster_2 <- function(p, SE, SP, n) {
    .Call(`_binGroup2_eff_nomaster_2`, p, SE, SP, n)
}

ARRAY_nomaster <- function(p, SE, SP, n) {
    .Call(`_binGroup2_ARRAY_nomaster`, p, SE, SP, n)
}

ARRAY_master <- function(p, SE, SP, n) {
    .Call(`_binGroup2_ARRAY_master`, p, SE, SP, n)
}

EFF_HIER <- function(p, S, SE, SP, ns) {
    .Call(`_binGroup2_EFF_HIER`, p, S, SE, SP, ns)
}

prob <- function(p, S, SE, SP, ns) {
    .Call(`_binGroup2_prob`, p, S, SE, SP, ns)
}

ACCU_HIER <- function(p, S, SE, SP, ns) {
    .Call(`_binGroup2_ACCU_HIER`, p, S, SE, SP, ns)
}

OPT <- function(p, SE, SP, MAMPS, obj, algorithm) {
    .Call(`_binGroup2_OPT`, p, SE, SP, MAMPS, obj, algorithm)
}

optimal_stage <- function(rho, SE, SP, pi1, pi2, MAMPS, obj, algorithm) {
    .Call(`_binGroup2_optimal_stage`, rho, SE, SP, pi1, pi2, MAMPS, obj, algorithm)
}