R/RcppExports.R

In sasfunclust: Sparse and Smooth Functional Clustering

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

get_sigma <- function(x, curve, time, S, piigivej, gcov, n_i, gamma, mu) {
    .Call(`_sasfunclust_get_sigma`, x, curve, time, S, piigivej, gcov, n_i, gamma, mu)
}

get_numden <- function(x, curve, time, S, piigivej, gcov, n_i, gamma) {
    .Call(`_sasfunclust_get_numden`, x, curve, time, S, piigivej, gcov, n_i, gamma)
}

get_Estep <- function(par, data, vars, S, hard, n_i) {
    .Call(`_sasfunclust_get_Estep`, par, data, vars, S, hard, n_i)
}