R/RcppExports.R

In PO.EN: An Elastic-Net Regularized Presence-Only Model

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

#'@name sum_compute_single_rcpp
#'@title Softthresholding computation function
NULL

#'Compute the maximization in the EM-algorithm
#'@return updated coefficients vector
NULL

sum_compute_single_rcpp <- function(y, start_beta, ytx, XtX_reduce, lambda, alpha, xtx, i_iter) {
    .Call(`_PO_EN_sum_compute_single_rcpp`, y, start_beta, ytx, XtX_reduce, lambda, alpha, xtx, i_iter)
}