R/RcppExports.R

In NorskRegnesentral/SpatGEVBMA: Hierarchical spatial generalized extreme value (GEV) modeling with Bayesian Model Averaging (BMA)

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

#' Title
#'
#' @param tau 
#' @param alpha 
#' @param lambda 
#' @param D 
#' @param a 
#' @param b 
#'
#' @return
#' @export
#'
#' @examples
ldot <- function(tau, alpha, lambda, D, a, b) {
    .Call('_SpatGEVBMA_ldot', PACKAGE = 'SpatGEVBMA', tau, alpha, lambda, D, a, b)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param kappa 
#' @param xi_hat 
#' @param eps 
#'
#' @return
#' @export
#'
#' @examples
j_double_prime_new <- function(tau, tau_hat, varsigma, kappa, xi_hat, eps) {
    .Call('_SpatGEVBMA_j_double_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, kappa, xi_hat, eps)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param kappa 
#' @param xi_hat 
#' @param eps 
#'
#' @return
#' @export
#'
#' @examples
j_prime_new <- function(tau, tau_hat, varsigma, kappa, xi_hat, eps) {
    .Call('_SpatGEVBMA_j_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, kappa, xi_hat, eps)
}



#' Title
#'
#' @param Y 
#' @param mu 
#' @param kappa 
#' @param xi 
#'
#' @return
#' @export
#'
#' @examples
gev_like_new <- function(Y, mu, kappa, xi) {
    .Call('_SpatGEVBMA_gev_like_new', PACKAGE = 'SpatGEVBMA', Y, mu, kappa, xi)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param xi 
#' @param kappa_hat 
#' @param eps 
#'
#' @return
#' @export
#'
#' @examples
g_prime_new <- function(tau, tau_hat, varsigma, xi, kappa_hat, eps) {
    .Call('_SpatGEVBMA_g_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, xi, kappa_hat, eps)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param xi 
#' @param kappa_hat 
#' @param eps 
#'
#' @return
#' @export
#'
#' @examples
g_double_prime_new <- function(tau, tau_hat, varsigma, xi, kappa_hat, eps) {
    .Call('_SpatGEVBMA_g_double_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, xi, kappa_hat, eps)
}




#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param xi 
#' @param kappa 
#' @param R 
#'
#' @return
#' @export
#'
#' @examples
f_prime_new <- function(tau, tau_hat, varsigma, xi, kappa, R) {
    .Call('_SpatGEVBMA_f_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, xi, kappa, R)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param xi 
#' @param kappa 
#' @param R 
#'
#' @return
#' @export
#'
#' @examples
f_double_prime_new <- function(tau, tau_hat, varsigma, xi, kappa, R) {
    .Call('_SpatGEVBMA_f_double_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, xi, kappa, R)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param xi 
#' @param eta_hat 
#' @param eps 
#'
#' @return
#' @export
#'
#' @examples
g_eta_prime_new <- function(tau, tau_hat, varsigma, xi, eta_hat, eps) {
    .Call('_SpatGEVBMA_g_eta_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, xi, eta_hat, eps)
}



#' Title
#'
#' @param tau 
#' @param tau_hat 
#' @param varsigma 
#' @param xi 
#' @param eta_hat 
#' @param eps 
#'
#' @return
#' @export
#'
#' @examples
g_eta_double_prime_new <- function(tau, tau_hat, varsigma, xi, eta_hat, eps) {
    .Call('_SpatGEVBMA_g_eta_double_prime_new', PACKAGE = 'SpatGEVBMA', tau, tau_hat, varsigma, xi, eta_hat, eps)
}



#' Title
#'
#' @param Y 
#' @param X 
#' @param M 
#' @param alpha 
#' @param lambda 
#' @param D 
#' @param beta0 
#' @param Omega0 
#'
#' @return
#' @export
#'
#' @examples
gevUpdateM <- function(Y, X, M, alpha, lambda, D, beta0, Omega0) {
    .Call('_SpatGEVBMA_gevUpdateM', PACKAGE = 'SpatGEVBMA', Y, X, M, alpha, lambda, D, beta0, Omega0)
}

#' Title
#'
#' @param p 
#'
#' @return
#' @export
#'
#' @examples
A <- function(p) {
    .Call('_SpatGEVBMA_A', PACKAGE = 'SpatGEVBMA', p)
}