R/RcppExports.R

In eummd: Efficient Univariate Maximum Mean Discrepancy

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

mmd_lap_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, beta_) {
    .Call(`_eummd_mmd_lap_Rcpp`, X, Y, nX_, dX_, nY_, dY_, beta_)
}

mmd_gau_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, beta_) {
    .Call(`_eummd_mmd_gau_Rcpp`, X, Y, nX_, dX_, nY_, dY_, beta_)
}

fast_median_diff_Rcpp <- function(X_) {
    .Call(`_eummd_fast_median_diff_Rcpp`, X_)
}

naive_median_diff_Rcpp <- function(Z_, nZ_, dZ_, kmethod_) {
    .Call(`_eummd_naive_median_diff_Rcpp`, Z_, nZ_, dZ_, kmethod_)
}

mmd_lap_pval_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, beta_, twosided_, boundedminpval_) {
    .Call(`_eummd_mmd_lap_pval_Rcpp`, X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, beta_, twosided_, boundedminpval_)
}

mmd_gau_pval_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, beta_, twosided_, boundedminpval_) {
    .Call(`_eummd_mmd_gau_pval_Rcpp`, X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, beta_, twosided_, boundedminpval_)
}

eummd_Rcpp <- function(X_, Y_, beta_) {
    .Call(`_eummd_eummd_Rcpp`, X_, Y_, beta_)
}

eummd_pval_Rcpp <- function(X_, Y_, beta_, numperm_, seednum_, twosided_, boundedminpval_) {
    .Call(`_eummd_eummd_pval_Rcpp`, X_, Y_, beta_, numperm_, seednum_, twosided_, boundedminpval_)
}

meammd_proj_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, numproj_, seednum_, beta_) {
    .Call(`_eummd_meammd_proj_Rcpp`, X, Y, nX_, dX_, nY_, dY_, numproj_, seednum_, beta_)
}

meammd_proj_pval_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, numperm_, numproj_, seednum_, beta_, twosided_, boundedminpval_, faster_) {
    .Call(`_eummd_meammd_proj_pval_Rcpp`, X, Y, nX_, dX_, nY_, dY_, numperm_, numproj_, seednum_, beta_, twosided_, boundedminpval_, faster_)
}

meammd_dist_pval_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, beta_, pmethod_, nmethod_, twosided_, boundedminpval_) {
    .Call(`_eummd_meammd_dist_pval_Rcpp`, X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, beta_, pmethod_, nmethod_, twosided_, boundedminpval_)
}

energydist_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_) {
    .Call(`_eummd_energydist_Rcpp`, X, Y, nX_, dX_, nY_, dY_)
}

energydist_pval_Rcpp <- function(X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, twosided_, boundedminpval_) {
    .Call(`_eummd_energydist_pval_Rcpp`, X, Y, nX_, dX_, nY_, dY_, numperm_, seednum_, twosided_, boundedminpval_)
}