R/RcppExports.R

In molic: Multivariate Outlier Detection in Contingency Tables

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

count_unique <- function(x) {
    .Call('_molic_count_unique', PACKAGE = 'molic', x)
}

matpr <- function(A) {
    .Call('_molic_matpr', PACKAGE = 'molic', A)
}

n_a <- function(A) {
    .Call('_molic_n_a', PACKAGE = 'molic', A)
}

na_ya <- function(na, ya) {
    .Call('_molic_na_ya', PACKAGE = 'molic', na, ya)
}

n_b <- function(na, b) {
    .Call('_molic_n_b', PACKAGE = 'molic', na, b)
}

subtract_one <- function(x) {
    .Call('_molic_subtract_one', PACKAGE = 'molic', x)
}

Gx_ <- function(x) {
    .Call('_molic_Gx_', PACKAGE = 'molic', x)
}

Hx_ <- function(x) {
    .Call('_molic_Hx_', PACKAGE = 'molic', x)
}

subM <- function(A, x) {
    .Call('_molic_subM', PACKAGE = 'molic', A, x)
}

a_marginals <- function(A, am) {
    .Call('_molic_a_marginals', PACKAGE = 'molic', A, am)
}

TY <- function(y, C_marginals, S_marginals) {
    .Call('_molic_TY', PACKAGE = 'molic', y, C_marginals, S_marginals)
}

set_intersect <- function(v1, v2) {
    .Call('_molic_set_intersect', PACKAGE = 'molic', v1, v2)
}

set_union <- function(v1, v2) {
    .Call('_molic_set_union', PACKAGE = 'molic', v1, v2)
}

set_diff <- function(v1, v2) {
    .Call('_molic_set_diff', PACKAGE = 'molic', v1, v2)
}

set_eq <- function(v1, v2) {
    .Call('_molic_set_eq', PACKAGE = 'molic', v1, v2)
}

set_in <- function(a, b) {
    .Call('_molic_set_in', PACKAGE = 'molic', a, b)
}

set_issubeq <- function(a, b) {
    .Call('_molic_set_issubeq', PACKAGE = 'molic', a, b)
}

set_any <- function(v) {
    .Call('_molic_set_any', PACKAGE = 'molic', v)
}