R/RcppExports.R

In DiscreteDists: Discrete Statistical Distributions

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

#' Function to obtain F11 with C++.
#' @param gamma numeric value for gamma.
#' @param lambda numeric value for lambda.
#' @param maxiter_series numeric value.
#' @param tol numeric value.
#' @export
#' @return returns the F11 value.
f11_cpp <- function(gamma, lambda, maxiter_series = 10000L, tol = 1.0e-10) {
    .Call('_DiscreteDists_f11_cpp', PACKAGE = 'DiscreteDists', gamma, lambda, maxiter_series, tol)
}

#' Function to obtain the dHYPERPO for a single value x
#' @param x numeric value for x.
#' @param mu numeric value for nu.
#' @param sigma numeric value for sigma.
#' @param log logical value for log.
#' @export
#' @return returns the pmf for a single value x.
dHYPERPO_single <- function(x, mu = 1, sigma = 1, log = FALSE) {
    .Call('_DiscreteDists_dHYPERPO_single', PACKAGE = 'DiscreteDists', x, mu, sigma, log)
}

#' Function to obtain the dHYPERPO for a vector x
#' @param x numeric value for x.
#' @param mu numeric value for nu.
#' @param sigma numeric value for sigma.
#' @param log logical value for log.
#' @export
#' @return returns the pmf for a vector.
dHYPERPO_vec <- function(x, mu, sigma, log) {
    .Call('_DiscreteDists_dHYPERPO_vec', PACKAGE = 'DiscreteDists', x, mu, sigma, log)
}