R/RcppExports.R

In rangen: Random Number Generators and Utilities

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
#[export]
Runif <- function(n, min = 0, max = 1) {
    .Call(`_rangen_runif`, n, min, max)
}
#[export]
Rbeta <- function(n, alpha, beta) {
    .Call(`_rangen_rbeta`, n, alpha, beta)
}
#[export]
Rexp <- function(n, rate = 1) {
    .Call(`_rangen_rexp`, n, rate)
}
#[export]
Rchisq <- function(n, df) {
    .Call(`_rangen_rchisq`, n, df)
}
#[export]
Rgamma <- function(n, shape, rate = 1) {
    .Call(`_rangen_rgamma`, n, shape, rate)
}
#[export]
Rgeom <- function(n, prob) {
    .Call(`_rangen_rgeom`, n, prob)
}
#[export]
Rcauchy <- function(n, location = 0, scale = 1) {
    .Call(`_rangen_rcauchy`, n, location, scale)
}
#[export]
Rt <- function(n, df, ncp) {
    .Call(`_rangen_rt`, n, df, ncp)
}
#[export]
Rpareto <- function(n, shape = 1, scale = 1) {
    .Call(`_rangen_rpareto`, n, shape, scale)
}
#[export]
Rfrechet <- function(n, lambda = 1, mu = 0, sigma = 1) {
    .Call(`_rangen_rfrechet`, n, lambda, mu, sigma)
}
#[export]
Rlaplace <- function(n, mu = 0, sigma = 1) {
    .Call(`_rangen_rlaplace`, n, mu, sigma)
}
#[export]
Rgumble <- function(n, mu = 0, sigma = 1) {
    .Call(`_rangen_rgumble`, n, mu, sigma)
}
#[export]
Rarcsine <- function(n, min = 0, max = 1) {
    .Call(`_rangen_rarcsine`, n, min, max)
}
#[export]
Rnorm <- function(n, mean = 0, sd = 1) {
    .Call(`_rangen_rnorm`, n, mean, sd)
}
#[export]
colRunif <- function(nrow, ncol, min = rep_len(0, ncol), max = rep_len(1, ncol)) {
    .Call(`_rangen_colRunif`, nrow, ncol, min, max)
}
#[export]
colRbeta <- function(nrow, ncol, alpha, beta) {
    .Call(`_rangen_colRbeta`, nrow, ncol, alpha, beta)
}
#[export]
colRexp <- function(nrow, ncol, rate = rep_len(1, ncol)) {
    .Call(`_rangen_colRexp`, nrow, ncol, rate)
}
#[export]
colRchisq <- function(nrow, ncol, df) {
    .Call(`_rangen_colRchisq`, nrow, ncol, df)
}
#[export]
colRgamma <- function(nrow, ncol, shape, rate = rep_len(1, ncol)) {
    .Call(`_rangen_colRgamma`, nrow, ncol, shape, rate)
}
#[export]
colRgeom <- function(nrow, ncol, prob) {
    .Call(`_rangen_colRgeom`, nrow, ncol, prob)
}
#[export]
colRcauchy <- function(nrow, ncol, location = rep_len(0, ncol), scale = rep_len(1, ncol)) {
    .Call(`_rangen_colRcauchy`, nrow, ncol, location, scale)
}
#[export]
colRt <- function(nrow, ncol, df, ncp) {
    .Call(`_rangen_colRt`, nrow, ncol, df, ncp)
}
#[export]
colRpareto <- function(nrow, ncol, shape = rep_len(1, ncol), scale = rep_len(1, ncol)) {
    .Call(`_rangen_colRpareto`, nrow, ncol, shape, scale)
}
#[export]
colRfrechet <- function(nrow, ncol, lambda = rep_len(1, ncol), mu = rep_len(0, ncol), sigma = rep_len(1, ncol)) {
    .Call(`_rangen_colRfrechet`, nrow, ncol, lambda, mu, sigma)
}
#[export]
colRlaplace <- function(nrow, ncol, mu = rep_len(0, ncol), sigma = rep_len(1, ncol)) {
    .Call(`_rangen_colRlaplace`, nrow, ncol, mu, sigma)
}
#[export]
colRgumble <- function(nrow, ncol, mu = rep_len(0, ncol), sigma = rep_len(1, ncol)) {
    .Call(`_rangen_colRgumble`, nrow, ncol, mu, sigma)
}
#[export]
colRarcsine <- function(nrow, ncol, min = rep_len(0, ncol), max = rep_len(1, ncol)) {
    .Call(`_rangen_colRarcsine`, nrow, ncol, min, max)
}
#[export]
colRnorm <- function(nrow, ncol, mean = rep_len(0, ncol), sd = rep_len(1, ncol)) {
    .Call(`_rangen_colRnorm`, nrow, ncol, mean, sd)
}
#[export]
Runif.mat <- function(nrow, ncol, min = 0, max = 1) {
    .Call(`_rangen_runif_mat`, nrow, ncol, min, max)
}
#[export]
Rbeta.mat <- function(nrow, ncol, alpha, beta) {
    .Call(`_rangen_rbeta_mat`, nrow, ncol, alpha, beta)
}
#[export]
Rexp.mat <- function(nrow, ncol, rate = 1) {
    .Call(`_rangen_rexp_mat`, nrow, ncol, rate)
}
#[export]
Rchisq.mat <- function(nrow, ncol, df) {
    .Call(`_rangen_rchisq_mat`, nrow, ncol, df)
}
#[export]
Rgamma.mat <- function(nrow, ncol, shape, rate = 1) {
    .Call(`_rangen_rgamma_mat`, nrow, ncol, shape, rate)
}
#[export]
Rgeom.mat <- function(nrow, ncol, prob) {
    .Call(`_rangen_rgeom_mat`, nrow, ncol, prob)
}
#[export]
Rcauchy.mat <- function(nrow, ncol, location = 0, scale = 1) {
    .Call(`_rangen_rcauchy_mat`, nrow, ncol, location, scale)
}
#[export]
Rt.mat <- function(nrow, ncol, df, ncp) {
    .Call(`_rangen_rt_mat`, nrow, ncol, df, ncp)
}
#[export]
Rpareto.mat <- function(nrow, ncol, shape = 1, scale = 1) {
    .Call(`_rangen_rpareto_mat`, nrow, ncol, shape, scale)
}
#[export]
Rfrechet.mat <- function(nrow, ncol, lambda = 1, mu = 0, sigma = 1) {
    .Call(`_rangen_rfrechet_mat`, nrow, ncol, lambda, mu, sigma)
}
#[export]
Rlaplace.mat <- function(nrow, ncol, mu = 0, sigma = 1) {
    .Call(`_rangen_rlaplace_mat`, nrow, ncol, mu, sigma)
}
#[export]
Rgumble.mat <- function(nrow, ncol, mu = 0, sigma = 1) {
    .Call(`_rangen_rgumble_mat`, nrow, ncol, mu, sigma)
}
#[export]
Rarcsine.mat <- function(nrow, ncol, min = 0, max = 1) {
    .Call(`_rangen_rarcsine_mat`, nrow, ncol, min, max)
}
#[export]
Rnorm.mat <- function(nrow, ncol, mean = 0, sd = 1) {
    .Call(`_rangen_rnorm_mat`, nrow, ncol, mean, sd)
}
#[export]
Sample.int <- function(n, size = n, replace = FALSE) {
    .Call(`_rangen_sample_int`, n, size, replace)
}
#[export]
Sample <- function(x, size = length(x), replace = FALSE) {
    .Call(`_rangen_sample`, x, size, replace)
}
#[export]
colSample <- function(x, size = rep_len(nrow(x), ncol(x)), replace = rep_len(FALSE, ncol(x)), parallel = FALSE, cores = 0) {
    .Call(`_rangen_colSample`, x, size, replace, parallel, cores)
}
#[export]
rowSample <- function(x, size = rep_len(ncol(x), nrow(x)), replace = rep_len(FALSE, nrow(x)), parallel = FALSE, cores = 0) {
    .Call(`_rangen_rowSample`, x, size, replace, parallel, cores)
}
#[export]
nanoTime <- function() {
    .Call(`_rangen_nanoTime`)
}
#[export]
setSeed <- function(seed = nanoTime()) {
    invisible(.Call(`_rangen_setSeed`, seed))
}