R/RcppExports.R

In davidbolin/ngme: Linear Mixed Effects Models With Flexible Distributions

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

estimateLong_cpp <- function(in_list) {
    .Call(`_ngme_estimateLong_cpp`, in_list)
}

estimateFisher <- function(in_list) {
    .Call(`_ngme_estimateFisher`, in_list)
}

estimateProcesses_cpp <- function(in_list) {
    .Call(`_ngme_estimateProcesses_cpp`, in_list)
}

fisher_cpp <- function(in_list) {
    .Call(`_ngme_fisher_cpp`, in_list)
}

predictLong_cpp <- function(in_list) {
    .Call(`_ngme_predictLong_cpp`, in_list)
}

rGIG_cpp <- function(p, a, b, seed = 0L) {
    .Call(`_ngme_rGIG_cpp`, p, a, b, seed)
}

simulateLongGH_cpp <- function(in_list) {
    .Call(`_ngme_simulateLongGH_cpp`, in_list)
}

simulateLongME_cpp <- function(in_list) {
    .Call(`_ngme_simulateLongME_cpp`, in_list)
}

simulateLongProcesses_cpp <- function(in_list) {
    .Call(`_ngme_simulateLongProcesses_cpp`, in_list)
}

getDuplicateM <- function(n) {
    .Call(`_ngme_getDuplicateM`, n)
}

test_d2_process <- function(Y, process_list, operator_list) {
    .Call(`_ngme_test_d2_process`, Y, process_list, operator_list)
}

test_sampling_NIG <- function(mixedEffect_list, meas_list, nsamples) {
    .Call(`_ngme_test_sampling_NIG`, mixedEffect_list, meas_list, nsamples)
}

test_logf_NIG <- function(U, mu, delta, iSigma, nu) {
    .Call(`_ngme_test_logf_NIG`, U, mu, delta, iSigma, nu)
}

test_logf_GH <- function(U, mu, delta, iSigma, p, a, b) {
    .Call(`_ngme_test_logf_GH`, U, mu, delta, iSigma, p, a, b)
}

test_dU_EiV <- function(U, Sigma, delta, mu, p_GIG, a_GIG, b_GIG, res, Q_noise, B) {
    .Call(`_ngme_test_dU_EiV`, U, Sigma, delta, mu, p_GIG, a_GIG, b_GIG, res, Q_noise, B)
}

test_db_EiV_GIG <- function(p, a, b) {
    .Call(`_ngme_test_db_EiV_GIG`, p, a, b)
}

test_EiV_NGIG <- function(U, Sigma, delta, mu, p, a, b) {
    .Call(`_ngme_test_EiV_NGIG`, U, Sigma, delta, mu, p, a, b)
}

test_EiV_GIG <- function(p, a, b) {
    .Call(`_ngme_test_EiV_GIG`, p, a, b)
}

test_PreDiagsolver <- function(in_list) {
    .Call(`_ngme_test_PreDiagsolver`, in_list)
}

sampleR <- function(n, w_in) {
    .Call(`_ngme_sampleR`, n, w_in)
}

sample_internalR <- function(n, p_in, selected_in, w_in) {
    .Call(`_ngme_sample_internalR`, n, p_in, selected_in, w_in)
}

test_mixed <- function(niter, Y, mixed_list, error_list) {
    .Call(`_ngme_test_mixed`, niter, Y, mixed_list, error_list)
}

test_error <- function(niter, Y, error_list) {
    .Call(`_ngme_test_error`, niter, Y, error_list)
}

test_mixed_Fisher <- function(niter, Y, mixed_list, error_list) {
    .Call(`_ngme_test_mixed_Fisher`, niter, Y, mixed_list, error_list)
}

test_process <- function(niter, U, process_list) {
    .Call(`_ngme_test_process`, niter, U, process_list)
}

test_Mprocess <- function(niter, U, process_list) {
    .Call(`_ngme_test_Mprocess`, niter, U, process_list)
}

test_2Doperator <- function(process_list, operator_list) {
    .Call(`_ngme_test_2Doperator`, process_list, operator_list)
}

getNormalouterKron <- function(Sigma, mu) {
    .Call(`_ngme_getNormalouterKron`, Sigma, mu)
}

getXXty <- function(Sigma1, Sigma12, mu1, mu2) {
    .Call(`_ngme_getXXty`, Sigma1, Sigma12, mu1, mu2)
}

HeissanSigmaMVN <- function(Z, iSigma, Sigma, n) {
    .Call(`_ngme_HeissanSigmaMVN`, Z, iSigma, Sigma, n)
}