R/RcppExports.R

Defines functions find_PB_using_pc_recursively_forcing_parents find_PB_using_pc_recursively find_PB_using_pc find_PB get_balance_using_pc inv_ilr_coordinates ilr_coordinates coordinates_basis sparse_coordinates matrix_coordinates alr_coordinates inv_clr_coordinates clr_coordinates ilr_to_alr ilr_basis_simplex ilr_basis_default clr_basis_default alr_basis_default c_variation_array pinv

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

pinv <- function(X) {
    .Call(`_coda_base_pinv`, X)
}

c_variation_array <- function(X, include_means = FALSE) {
    .Call(`_coda_base_c_variation_array`, X, include_means)
}

alr_basis_default <- function(dim) {
    .Call(`_coda_base_alr_basis_default`, dim)
}

clr_basis_default <- function(dim) {
    .Call(`_coda_base_clr_basis_default`, dim)
}

ilr_basis_default <- function(dim) {
    .Call(`_coda_base_ilr_basis_default`, dim)
}

ilr_basis_simplex <- function(dim) {
    .Call(`_coda_base_ilr_basis_simplex`, dim)
}

ilr_to_alr <- function(dim) {
    .Call(`_coda_base_ilr_to_alr`, dim)
}

clr_coordinates <- function(X) {
    .Call(`_coda_base_clr_coordinates`, X)
}

inv_clr_coordinates <- function(clrX) {
    .Call(`_coda_base_inv_clr_coordinates`, clrX)
}

alr_coordinates <- function(X, denominator) {
    .Call(`_coda_base_alr_coordinates`, X, denominator)
}

matrix_coordinates <- function(X, B) {
    .Call(`_coda_base_matrix_coordinates`, X, B)
}

sparse_coordinates <- function(X, B) {
    .Call(`_coda_base_sparse_coordinates`, X, B)
}

coordinates_basis <- function(X, B, sparse = FALSE) {
    .Call(`_coda_base_coordinates_basis`, X, B, sparse)
}

ilr_coordinates <- function(X) {
    .Call(`_coda_base_ilr_coordinates`, X)
}

inv_ilr_coordinates <- function(ilrX) {
    .Call(`_coda_base_inv_ilr_coordinates`, ilrX)
}

get_balance_using_pc <- function(X) {
    .Call(`_coda_base_get_balance_using_pc`, X)
}

find_PB <- function(X) {
    .Call(`_coda_base_find_PB`, X)
}

find_PB_using_pc <- function(X) {
    .Call(`_coda_base_find_PB_using_pc`, X)
}

find_PB_using_pc_recursively <- function(X) {
    .Call(`_coda_base_find_PB_using_pc_recursively`, X)
}

find_PB_using_pc_recursively_forcing_parents <- function(X) {
    .Call(`_coda_base_find_PB_using_pc_recursively_forcing_parents`, X)
}

Try the coda.base package in your browser

Any scripts or data that you put into this service are public.

coda.base documentation built on Nov. 26, 2023, 1:07 a.m.