R/RcppExports.R

Defines functions rwishart_cpp dwishart_cpp rttnorm_cpp rtnorm_cpp dttnorm_cpp dtnorm_cpp rmvnorm_cpp dmvnorm_cpp rdirichlet_cpp ddirichlet_cpp

Documented in ddirichlet_cpp dmvnorm_cpp dtnorm_cpp dttnorm_cpp dwishart_cpp rdirichlet_cpp rmvnorm_cpp rtnorm_cpp rttnorm_cpp rwishart_cpp

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

#' @rdname ddirichlet
#' @export
ddirichlet_cpp <- function(x, concentration, log = FALSE) {
    .Call(`_oeli_ddirichlet_cpp`, x, concentration, log)
}

#' @rdname ddirichlet
#' @export
rdirichlet_cpp <- function(concentration) {
    .Call(`_oeli_rdirichlet_cpp`, concentration)
}

#' @rdname dmvnorm
#' @export
dmvnorm_cpp <- function(x, mean, Sigma, log = FALSE) {
    .Call(`_oeli_dmvnorm_cpp`, x, mean, Sigma, log)
}

#' @rdname dmvnorm
#' @export
rmvnorm_cpp <- function(mean, Sigma, log = FALSE) {
    .Call(`_oeli_rmvnorm_cpp`, mean, Sigma, log)
}

#' @rdname dtnorm
#' @export
dtnorm_cpp <- function(x, mean, sd, point, above, log = FALSE) {
    .Call(`_oeli_dtnorm_cpp`, x, mean, sd, point, above, log)
}

#' @rdname dtnorm
#' @export
dttnorm_cpp <- function(x, mean, sd, lower, upper, log = FALSE) {
    .Call(`_oeli_dttnorm_cpp`, x, mean, sd, lower, upper, log)
}

#' @rdname dtnorm
#' @export
rtnorm_cpp <- function(mean, sd, point, above, log = FALSE) {
    .Call(`_oeli_rtnorm_cpp`, mean, sd, point, above, log)
}

#' @rdname dtnorm
#' @export
rttnorm_cpp <- function(mean, sd, lower, upper, log = FALSE) {
    .Call(`_oeli_rttnorm_cpp`, mean, sd, lower, upper, log)
}

#' @rdname dwishart
#' @export
dwishart_cpp <- function(x, df, scale, log = FALSE, inv = FALSE) {
    .Call(`_oeli_dwishart_cpp`, x, df, scale, log, inv)
}

#' @rdname dwishart
#' @export
rwishart_cpp <- function(df, scale, inv = FALSE) {
    .Call(`_oeli_rwishart_cpp`, df, scale, inv)
}

Try the oeli package in your browser

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

oeli documentation built on Oct. 16, 2024, 5:08 p.m.