R/RcppExports.R

In PLNmodels: Poisson Lognormal Models

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

cpp_graphical_lasso <- function(S, rho, thr, maxit, w_init = NULL, wi_init = NULL, trace = FALSE, stall_patience = 1000L) {
    .Call('_PLNmodels_cpp_graphical_lasso', PACKAGE = 'PLNmodels', S, rho, thr, maxit, w_init, wi_init, trace, stall_patience)
}

cpp_test_nlopt <- function() {
    .Call('_PLNmodels_cpp_test_nlopt', PACKAGE = 'PLNmodels')
}

nlopt_optimize_genetic_modeling <- function(init_parameters, Y, X, O, w, C, configuration) {
    .Call('_PLNmodels_nlopt_optimize_genetic_modeling', PACKAGE = 'PLNmodels', init_parameters, Y, X, O, w, C, configuration)
}

zipln_vloglik <- function(Y, X, O, Pi, Omega, B, R, M, S2) {
    .Call('_PLNmodels_zipln_vloglik', PACKAGE = 'PLNmodels', Y, X, O, Pi, Omega, B, R, M, S2)
}

optim_zipln_Omega_full <- function(M, X, B, S2) {
    .Call('_PLNmodels_optim_zipln_Omega_full', PACKAGE = 'PLNmodels', M, X, B, S2)
}

optim_zipln_Omega_spherical <- function(M, X, B, S2) {
    .Call('_PLNmodels_optim_zipln_Omega_spherical', PACKAGE = 'PLNmodels', M, X, B, S2)
}

optim_zipln_Omega_diagonal <- function(M, X, B, S2) {
    .Call('_PLNmodels_optim_zipln_Omega_diagonal', PACKAGE = 'PLNmodels', M, X, B, S2)
}

optim_zipln_B_dense <- function(M, X) {
    .Call('_PLNmodels_optim_zipln_B_dense', PACKAGE = 'PLNmodels', M, X)
}

optim_zipln_zipar_covar <- function(R, init_B0, X0, configuration) {
    .Call('_PLNmodels_optim_zipln_zipar_covar', PACKAGE = 'PLNmodels', R, init_B0, X0, configuration)
}

cpp_test_packing <- function() {
    .Call('_PLNmodels_cpp_test_packing', PACKAGE = 'PLNmodels')
}

get_sandwich_variance_B <- function(Y, X, A, S, Sigma, Diag_Omega) {
    .Call('_PLNmodels_get_sandwich_variance_B', PACKAGE = 'PLNmodels', Y, X, A, S, Sigma, Diag_Omega)
}

builtin_optimize_full <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_full', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_full <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_full', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_diagonal <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_diagonal', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_diagonal <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_diagonal', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_spherical <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_spherical', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_spherical <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_spherical', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_fixed <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_fixed', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_genetic <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_genetic', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_genetic <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_genetic', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_rank <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_rank', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_zipln_full <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_zipln_full', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_zipln_diagonal <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_zipln_diagonal', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_zipln_spherical <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_zipln_spherical', PACKAGE = 'PLNmodels', data, params, config)
}

builtin_optimize_vestep_zipln_fixed <- function(data, params, config) {
    .Call('_PLNmodels_builtin_optimize_vestep_zipln_fixed', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_full <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_full', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_full_profiled <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_full_profiled', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_full <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_full', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_fixed <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_fixed', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_genetic <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_genetic', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_genetic <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_genetic', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_diagonal <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_diagonal', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_diagonal <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_diagonal', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_spherical <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_spherical', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_spherical <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_spherical', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_rank <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_rank', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_rank <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_rank', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_zipln_full <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_zipln_full', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_zipln_diagonal <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_zipln_diagonal', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_zipln_spherical <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_zipln_spherical', PACKAGE = 'PLNmodels', data, params, config)
}

nlopt_optimize_vestep_zipln_fixed <- function(data, params, config) {
    .Call('_PLNmodels_nlopt_optimize_vestep_zipln_fixed', PACKAGE = 'PLNmodels', data, params, config)
}