# This file was generated by Rcpp::compileAttributes
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

beta_ridge_C <- function(X, Y, lambda_beta) {
    .Call('graphicalVAR_beta_ridge_C', PACKAGE = 'graphicalVAR', X, Y, lambda_beta)
}

Beta_C <- function(kappa, beta, X, Y, lambda_beta, convergence, maxit) {
    .Call('graphicalVAR_Beta_C', PACKAGE = 'graphicalVAR', kappa, beta, X, Y, lambda_beta, convergence, maxit)
}

VAR_logLik_C <- function(X, Y, kappa, beta) {
    .Call('graphicalVAR_VAR_logLik_C', PACKAGE = 'graphicalVAR', X, Y, kappa, beta)
}

LogLik_and_BIC <- function(X, Y, estimates) {
    .Call('graphicalVAR_LogLik_and_BIC', PACKAGE = 'graphicalVAR', X, Y, estimates)
}