R/RcppExports.R

Defines functions .Rcpp_adhoc_shermanM_sp .Rcpp_adhoc_shermanMstep_sp .Rcpp_chol2solve .Rcpp_backsolve_M_M .Rcpp_backsolve .Rcpp_Csum .Rcpp_crossprod .crossprod_not_dge .dgCtcrossprod .dgCcrossprod .dgCprod .selfAdjointSolverCpp .LogAbsDetCpp .LevenbergMsolveCpp .tcrossprodCpp .crossprodCpp_d .RcppChol .Rcpp_d2hdv2 .ZtWZ .ZWZt .Rcpp_sweepZ1W .sparse_cwiseprod .leverages .rankinfo .setNbThreads .nuln_plus_bessel_lnKnu .is_promise .is_evaluated .logit .C_dispInv .C_makelong2 .C_makelong .C_calc_cov_from_ranCoef .rC_inv_chol_cpp `.upper.tri<-` `.lower.tri<-` .RcppMatrixCb2 .Rcpp_dense_cbind_mat_vec .Rcpp_dense_cbind_mat_mat .Rcpp_chol_R .lmwith_sparse_QRp .lmwithQRP .lmwithQR .update_R_in_place .lmwith_sparse_LLp .lmwith_sparse_LDLp .Rcpp_COMP_Z_asympto .COMP_Z_integrand .Rcpp_COMP_Z

Documented in .ZWZt

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

.Rcpp_COMP_Z <- function(moment, nu, lambda, maxn) {
    .Call(`_spaMM_Rcpp_COMP_Z`, moment, nu, lambda, maxn)
}

.COMP_Z_integrand <- function(z, eta = NULL, lambda = NULL, nu = 0.5, moment = 0L, logScaleFac = 0) {
    .Call(`_spaMM_COMP_Z_integrand`, z, eta, lambda, nu, moment, logScaleFac)
}

.Rcpp_COMP_Z_asympto <- function(nu, pow_lam_nu) {
    .Call(`_spaMM_Rcpp_COMP_Z_asympto`, nu, pow_lam_nu)
}

.lmwith_sparse_LDLp <- function(XX, yy, returntQ, returnR, pivot) {
    .Call(`_spaMM_lmwith_sparse_LDLp`, XX, yy, returntQ, returnR, pivot)
}

.lmwith_sparse_LLp <- function(XX, yy, returntQ, returnR, pivot) {
    .Call(`_spaMM_lmwith_sparse_LLp`, XX, yy, returntQ, returnR, pivot)
}

.update_R_in_place <- function(RD) {
    .Call(`_spaMM_update_R_in_place`, RD)
}

.lmwithQR <- function(XX, yy, returntQ, returnR) {
    .Call(`_spaMM_lmwithQR`, XX, yy, returntQ, returnR)
}

.lmwithQRP <- function(XX, yy, returntQ, returnR) {
    .Call(`_spaMM_lmwithQRP`, XX, yy, returntQ, returnR)
}

.lmwith_sparse_QRp <- function(XX, yy, returntQ, returnR, COLAMDO = TRUE) {
    .Call(`_spaMM_lmwith_sparse_QRp`, XX, yy, returntQ, returnR, COLAMDO)
}

.Rcpp_chol_R <- function(AA) {
    .Call(`_spaMM_Rcpp_chol_R`, AA)
}

.Rcpp_dense_cbind_mat_mat <- function(a, b) {
    .Call(`_spaMM_Rcpp_dense_cbind_mat_mat`, a, b)
}

.Rcpp_dense_cbind_mat_vec <- function(a, b) {
    .Call(`_spaMM_Rcpp_dense_cbind_mat_vec`, a, b)
}

.RcppMatrixCb2 <- function(matrix1, matrix2) {
    .Call(`_spaMM_RcppMatrixCb2`, matrix1, matrix2)
}

`.lower.tri<-` <- function(A, diag, value) {
    .Call(`_spaMM_lowertri`, A, diag, value)
}

`.upper.tri<-` <- function(A, diag, value) {
    .Call(`_spaMM_uppertri`, A, diag, value)
}

.rC_inv_chol_cpp <- function(trCoef) {
    .Call(`_spaMM_rC_inv_chol_cpp`, trCoef)
}

.C_calc_cov_from_ranCoef <- function(ranCoef, Xi_ncol = NULL) {
    .Call(`_spaMM_C_calc_cov_from_ranCoef`, ranCoef, Xi_ncol)
}

.C_makelong <- function(Lcompact, Lsize) {
    .Call(`_spaMM_makelong`, Lcompact, Lsize)
}

.C_makelong2 <- function(Lcompact, Lsize) {
    .Call(`_spaMM_makelong2`, Lcompact, Lsize)
}

.C_dispInv <- function(x) {
    .Call(`_spaMM_C_dispInv`, x)
}

.logit <- function(mu) {
    .Call(`_spaMM_logit`, mu)
}

.is_evaluated <- function(name, env) {
    .Call(`_spaMM_is_evaluated`, name, env)
}

.is_promise <- function(name, env) {
    .Call(`_spaMM_is_promise2`, name, env)
}

.nuln_plus_bessel_lnKnu <- function(x, nu) {
    .Call(`_spaMM_nuln_plus_bessel_lnKnu`, x, nu)
}

.setNbThreads <- function(thr) {
    .Call(`_spaMM_set_thread_nbr`, thr)
}

.rankinfo <- function(x, tol) {
    .Call(`_spaMM_rankinfo`, x, tol)
}

.leverages <- function(XX) {
    .Call(`_spaMM_leverages`, XX)
}

.sparse_cwiseprod <- function(AA, BB) {
    .Call(`_spaMM_sparse_cwiseprod`, AA, BB)
}

.Rcpp_sweepZ1W <- function(ZZ, WW) {
    .Call(`_spaMM_sweepZ1W`, ZZ, WW)
}

.ZWZt <- function(ZZ, WW) {
    .Call(`_spaMM_ZWZt`, ZZ, WW)
}

.ZtWZ <- function(ZZ, WW) {
    .Call(`_spaMM_ZtWZ`, ZZ, WW)
}

.Rcpp_d2hdv2 <- function(ZZ, WA, WB) {
    .Call(`_spaMM_Rcpp_d2hdv2`, ZZ, WA, WB)
}

.RcppChol <- function(AA) {
    .Call(`_spaMM_RcppChol`, AA)
}

.crossprodCpp_d <- function(Mat, yy) {
    .Call(`_spaMM_crossprodCpp_d`, Mat, yy)
}

.tcrossprodCpp <- function(Mat, yy) {
    .Call(`_spaMM_tcrossprodCpp`, Mat, yy)
}

.LevenbergMsolveCpp <- function(AA, rrhhss, dd) {
    .Call(`_spaMM_LevenbergMsolveCpp`, AA, rrhhss, dd)
}

.LogAbsDetCpp <- function(AA) {
    .Call(`_spaMM_LogAbsDetCpp`, AA)
}

.selfAdjointSolverCpp <- function(AA) {
    .Call(`_spaMM_selfAdjointSolverCpp`, AA)
}

.dgCprod <- function(AA, BB) {
    .Call(`_spaMM_dgCprod`, AA, BB)
}

.dgCcrossprod <- function(AA, BB, as_mat = FALSE) {
    .Call(`_spaMM_dgCcrossprod`, AA, BB, as_mat)
}

.dgCtcrossprod <- function(AA, BB) {
    .Call(`_spaMM_dgCtcrossprod`, AA, BB)
}

.crossprod_not_dge <- function(AA, BB, eval_dens, as_mat, keep_names) {
    .Call(`_spaMM_crossprod_not_dge`, AA, BB, eval_dens, as_mat, keep_names)
}

.Rcpp_crossprod <- function(AA, BB, eval_dens = TRUE, as_mat = FALSE, keep_names = TRUE) {
    .Call(`_spaMM_Rcpp_crossprod`, AA, BB, eval_dens, as_mat, keep_names)
}

.Rcpp_Csum <- function(AA, BB) {
    .Call(`_spaMM_Rcpp_Csum`, AA, BB)
}

.Rcpp_backsolve <- function(r, x, upper_tri = TRUE, transpose = FALSE) {
    .Call(`_spaMM_Rcpp_backsolve`, r, x, upper_tri, transpose)
}

.Rcpp_backsolve_M_M <- function(r, x, upper_tri = TRUE, transpose = FALSE) {
    .Call(`_spaMM_Rcpp_backsolve_M_M`, r, x, upper_tri, transpose)
}

.Rcpp_chol2solve <- function(r, x) {
    .Call(`_spaMM_Rcpp_chol2solve`, r, x)
}

.Rcpp_adhoc_shermanMstep_sp <- function(AAinv, uu) {
    .Call(`_spaMM_adhoc_shermanMstep_sp`, AAinv, uu)
}

.Rcpp_adhoc_shermanM_sp <- function(QQt, iindic) {
    .Call(`_spaMM_adhoc_shermanM_sp`, QQt, iindic)
}

Try the spaMM package in your browser

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

spaMM documentation built on Aug. 30, 2023, 1:07 a.m.