R/RcppExports.R

In mapfit: PH/MAP Parameter Estimation

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

emfit_erhmm_time <- function(alpha, xi, rate, shape, P0, data, options, H0) {
    .Call(`_mapfit_emfit_erhmm_time`, alpha, xi, rate, shape, P0, data, options, H0)
}

emfit_mapgen_group <- function(alpha, xi, D00, D10, data, options, P00, P10, H00, H10, en00, en10) {
    .Call(`_mapfit_emfit_mapgen_group`, alpha, xi, D00, D10, data, options, P00, P10, H00, H10, en00, en10)
}

emfit_gmmpp_group <- function(alpha, xi, xD0, xD1, data, options, xP0, xP1, xen0, xen1, xG, xPsiT1, xPsiT2, xPsiN1, xPsiN2, xtmpm) {
    .Call(`_mapfit_emfit_gmmpp_group`, alpha, xi, xD0, xD1, data, options, xP0, xP1, xen0, xen1, xG, xPsiT1, xPsiT2, xPsiN1, xPsiN2, xtmpm)
}

emfit_cf1_wtime <- function(alpha, rate, data, options, Q0, P0, H0) {
    .Call(`_mapfit_emfit_cf1_wtime`, alpha, rate, data, options, Q0, P0, H0)
}

emfit_cf1_group <- function(alpha, rate, data, options, Q0, P0, H0) {
    .Call(`_mapfit_emfit_cf1_group`, alpha, rate, data, options, Q0, P0, H0)
}

emfit_cf1_group_poi <- function(omega, alpha, rate, data, options, Q0, P0, H0) {
    .Call(`_mapfit_emfit_cf1_group_poi`, omega, alpha, rate, data, options, Q0, P0, H0)
}

emfit_gph_wtime <- function(alpha, Q0, xi, data, options, P0, H0) {
    .Call(`_mapfit_emfit_gph_wtime`, alpha, Q0, xi, data, options, P0, H0)
}

emfit_gph_group <- function(alpha, Q0, xi, data, options, P0, H0) {
    .Call(`_mapfit_emfit_gph_group`, alpha, Q0, xi, data, options, P0, H0)
}

emfit_gph_group_poi <- function(omega, alpha, Q0, xi, data, options, P0, H0) {
    .Call(`_mapfit_emfit_gph_group_poi`, omega, alpha, Q0, xi, data, options, P0, H0)
}

emfit_herlang_wtime <- function(alpha, shape, rate, data, options) {
    .Call(`_mapfit_emfit_herlang_wtime`, alpha, shape, rate, data, options)
}

emfit_herlang_group <- function(alpha, shape, rate, data, options) {
    .Call(`_mapfit_emfit_herlang_group`, alpha, shape, rate, data, options)
}

emfit_herlang_group_poi <- function(alpha, shape, rate, omega, data, options) {
    .Call(`_mapfit_emfit_herlang_group_poi`, alpha, shape, rate, omega, data, options)
}

markov_gth_dense <- function(Q, x) {
    .Call(`_mapfit_markov_gth_dense`, Q, x)
}

markov_gth_s4 <- function(Q0, x) {
    .Call(`_mapfit_markov_gth_s4`, Q0, x)
}

map_gth_s4 <- function(D00, D10, x) {
    .Call(`_mapfit_map_gth_s4`, D00, D10, x)
}

phase_dist_pdf <- function(dt, maxtime, alpha, Q0, xi, eps, ufactor, P0) {
    .Call(`_mapfit_phase_dist_pdf`, dt, maxtime, alpha, Q0, xi, eps, ufactor, P0)
}

phase_dist_ccdf <- function(dt, maxtime, alpha, Q0, eps, ufactor, P0) {
    .Call(`_mapfit_phase_dist_ccdf`, dt, maxtime, alpha, Q0, eps, ufactor, P0)
}

phase_cf1_sort <- function(alpha, rate) {
    .Call(`_mapfit_phase_cf1_sort`, alpha, rate)
}