R/RcppExports.R

Defines functions log_prob_s20p reduced_nu0_pooled log_prob_nu0p reduced_tau2_pooled reduced_mu_pooled reduced_pi_pooled reduced_sigma_pooled log_prob_sigmap marginal_theta_pooled log_prob_thetap cpp_mcmc cpp_burnin update_probz update_sigma2 update_theta stageTwoLogLikBatch compute_logprior compute_prec compute_vars compute_means update_z update_p update_multinomialPr update_nu0 update_sigma20 update_tau2 update_mu compute_loglik reduced_s20_batch log_prob_s20 reduced_nu0_batch log_prob_nu0 reduced_tau_batch log_prob_tau2 reduced_mu_batch log_prob_mu reduced_pi_batch log_prob_pmix reduced_sigma_batch log_prob_sigma2 marginal_theta_batch log_prob_theta mcmc_multibatch_pvar burnin_multibatch_pvar sigma2_multibatch_pvar theta_multibatch_pvar stagetwo_multibatch_pvar z_multibatch_pvar multinomialPr_multibatch_pvar nu0_multibatch_pvar sigma20_multibatch_pvar loglik_multibatch_pvar log_ddirichlet_ compute_heavy_means_batch compute_heavy_sums_batch compute_u_sums_batch compute_heavy_means compute_heavy_sums compute_u_sums rlocScale_t dlocScale_t rMultinom tableBatchZ tableZ uniqueBatch getDf getK

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

getK <- function(hyperparams) {
    .Call('_CNPBayes_getK', PACKAGE = 'CNPBayes', hyperparams)
}

getDf <- function(hyperparams) {
    .Call('_CNPBayes_getDf', PACKAGE = 'CNPBayes', hyperparams)
}

uniqueBatch <- function(x) {
    .Call('_CNPBayes_uniqueBatch', PACKAGE = 'CNPBayes', x)
}

tableZ <- function(K, z) {
    .Call('_CNPBayes_tableZ', PACKAGE = 'CNPBayes', K, z)
}

tableBatchZ <- function(xmod) {
    .Call('_CNPBayes_tableBatchZ', PACKAGE = 'CNPBayes', xmod)
}

rMultinom <- function(probs, m) {
    .Call('_CNPBayes_rMultinom', PACKAGE = 'CNPBayes', probs, m)
}

dlocScale_t <- function(x, df, mu, sigma) {
    .Call('_CNPBayes_dlocScale_t', PACKAGE = 'CNPBayes', x, df, mu, sigma)
}

rlocScale_t <- function(n, df, mu, sigma) {
    .Call('_CNPBayes_rlocScale_t', PACKAGE = 'CNPBayes', n, df, mu, sigma)
}

compute_u_sums <- function(xmod) {
    .Call('_CNPBayes_compute_u_sums', PACKAGE = 'CNPBayes', xmod)
}

compute_heavy_sums <- function(object) {
    .Call('_CNPBayes_compute_heavy_sums', PACKAGE = 'CNPBayes', object)
}

compute_heavy_means <- function(xmod) {
    .Call('_CNPBayes_compute_heavy_means', PACKAGE = 'CNPBayes', xmod)
}

compute_u_sums_batch <- function(xmod) {
    .Call('_CNPBayes_compute_u_sums_batch', PACKAGE = 'CNPBayes', xmod)
}

compute_heavy_sums_batch <- function(object) {
    .Call('_CNPBayes_compute_heavy_sums_batch', PACKAGE = 'CNPBayes', object)
}

compute_heavy_means_batch <- function(xmod) {
    .Call('_CNPBayes_compute_heavy_means_batch', PACKAGE = 'CNPBayes', xmod)
}

log_ddirichlet_ <- function(x_, alpha_) {
    .Call('_CNPBayes_log_ddirichlet_', PACKAGE = 'CNPBayes', x_, alpha_)
}

loglik_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_loglik_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

sigma20_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_sigma20_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

nu0_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_nu0_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

multinomialPr_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_multinomialPr_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

z_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_z_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

stagetwo_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_stagetwo_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

theta_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_theta_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

sigma2_multibatch_pvar <- function(xmod) {
    .Call('_CNPBayes_sigma2_multibatch_pvar', PACKAGE = 'CNPBayes', xmod)
}

burnin_multibatch_pvar <- function(object, mcmcp) {
    .Call('_CNPBayes_burnin_multibatch_pvar', PACKAGE = 'CNPBayes', object, mcmcp)
}

mcmc_multibatch_pvar <- function(object, mcmcp) {
    .Call('_CNPBayes_mcmc_multibatch_pvar', PACKAGE = 'CNPBayes', object, mcmcp)
}

log_prob_theta <- function(xmod, thetastar) {
    .Call('_CNPBayes_log_prob_theta', PACKAGE = 'CNPBayes', xmod, thetastar)
}

marginal_theta_batch <- function(xmod) {
    .Call('_CNPBayes_marginal_theta_batch', PACKAGE = 'CNPBayes', xmod)
}

log_prob_sigma2 <- function(model, sigma2star) {
    .Call('_CNPBayes_log_prob_sigma2', PACKAGE = 'CNPBayes', model, sigma2star)
}

reduced_sigma_batch <- function(xmod) {
    .Call('_CNPBayes_reduced_sigma_batch', PACKAGE = 'CNPBayes', xmod)
}

log_prob_pmix <- function(xmod, pstar) {
    .Call('_CNPBayes_log_prob_pmix', PACKAGE = 'CNPBayes', xmod, pstar)
}

reduced_pi_batch <- function(xmod) {
    .Call('_CNPBayes_reduced_pi_batch', PACKAGE = 'CNPBayes', xmod)
}

log_prob_mu <- function(xmod, mustar) {
    .Call('_CNPBayes_log_prob_mu', PACKAGE = 'CNPBayes', xmod, mustar)
}

reduced_mu_batch <- function(xmod) {
    .Call('_CNPBayes_reduced_mu_batch', PACKAGE = 'CNPBayes', xmod)
}

log_prob_tau2 <- function(xmod) {
    .Call('_CNPBayes_log_prob_tau2', PACKAGE = 'CNPBayes', xmod)
}

reduced_tau_batch <- function(xmod) {
    .Call('_CNPBayes_reduced_tau_batch', PACKAGE = 'CNPBayes', xmod)
}

log_prob_nu0 <- function(xmod, nu0star) {
    .Call('_CNPBayes_log_prob_nu0', PACKAGE = 'CNPBayes', xmod, nu0star)
}

reduced_nu0_batch <- function(xmod) {
    .Call('_CNPBayes_reduced_nu0_batch', PACKAGE = 'CNPBayes', xmod)
}

log_prob_s20 <- function(xmod) {
    .Call('_CNPBayes_log_prob_s20', PACKAGE = 'CNPBayes', xmod)
}

reduced_s20_batch <- function(xmod) {
    .Call('_CNPBayes_reduced_s20_batch', PACKAGE = 'CNPBayes', xmod)
}

compute_loglik <- function(xmod) {
    .Call('_CNPBayes_compute_loglik', PACKAGE = 'CNPBayes', xmod)
}

update_mu <- function(xmod) {
    .Call('_CNPBayes_update_mu', PACKAGE = 'CNPBayes', xmod)
}

update_tau2 <- function(xmod) {
    .Call('_CNPBayes_update_tau2', PACKAGE = 'CNPBayes', xmod)
}

update_sigma20 <- function(xmod) {
    .Call('_CNPBayes_update_sigma20', PACKAGE = 'CNPBayes', xmod)
}

update_nu0 <- function(xmod) {
    .Call('_CNPBayes_update_nu0', PACKAGE = 'CNPBayes', xmod)
}

update_multinomialPr <- function(xmod) {
    .Call('_CNPBayes_update_multinomialPr', PACKAGE = 'CNPBayes', xmod)
}

update_p <- function(xmod) {
    .Call('_CNPBayes_update_p', PACKAGE = 'CNPBayes', xmod)
}

update_z <- function(xmod) {
    .Call('_CNPBayes_update_z', PACKAGE = 'CNPBayes', xmod)
}

compute_means <- function(xmod) {
    .Call('_CNPBayes_compute_means', PACKAGE = 'CNPBayes', xmod)
}

compute_vars <- function(xmod) {
    .Call('_CNPBayes_compute_vars', PACKAGE = 'CNPBayes', xmod)
}

compute_prec <- function(xmod) {
    .Call('_CNPBayes_compute_prec', PACKAGE = 'CNPBayes', xmod)
}

compute_logprior <- function(xmod) {
    .Call('_CNPBayes_compute_logprior', PACKAGE = 'CNPBayes', xmod)
}

stageTwoLogLikBatch <- function(xmod) {
    .Call('_CNPBayes_stageTwoLogLikBatch', PACKAGE = 'CNPBayes', xmod)
}

update_theta <- function(xmod) {
    .Call('_CNPBayes_update_theta', PACKAGE = 'CNPBayes', xmod)
}

update_sigma2 <- function(xmod) {
    .Call('_CNPBayes_update_sigma2', PACKAGE = 'CNPBayes', xmod)
}

update_probz <- function(xmod) {
    .Call('_CNPBayes_update_probz', PACKAGE = 'CNPBayes', xmod)
}

cpp_burnin <- function(object, mcmcp) {
    .Call('_CNPBayes_cpp_burnin', PACKAGE = 'CNPBayes', object, mcmcp)
}

cpp_mcmc <- function(object, mcmcp) {
    .Call('_CNPBayes_cpp_mcmc', PACKAGE = 'CNPBayes', object, mcmcp)
}

log_prob_thetap <- function(xmod, thetastar) {
    .Call('_CNPBayes_log_prob_thetap', PACKAGE = 'CNPBayes', xmod, thetastar)
}

marginal_theta_pooled <- function(xmod) {
    .Call('_CNPBayes_marginal_theta_pooled', PACKAGE = 'CNPBayes', xmod)
}

log_prob_sigmap <- function(xmod, sigma2star) {
    .Call('_CNPBayes_log_prob_sigmap', PACKAGE = 'CNPBayes', xmod, sigma2star)
}

reduced_sigma_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_sigma_pooled', PACKAGE = 'CNPBayes', xmod)
}

reduced_pi_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_pi_pooled', PACKAGE = 'CNPBayes', xmod)
}

reduced_mu_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_mu_pooled', PACKAGE = 'CNPBayes', xmod)
}

reduced_tau2_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_tau2_pooled', PACKAGE = 'CNPBayes', xmod)
}

log_prob_nu0p <- function(xmod, nu0star) {
    .Call('_CNPBayes_log_prob_nu0p', PACKAGE = 'CNPBayes', xmod, nu0star)
}

reduced_nu0_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_nu0_pooled', PACKAGE = 'CNPBayes', xmod)
}

log_prob_s20p <- function(xmod) {
    .Call('_CNPBayes_log_prob_s20p', PACKAGE = 'CNPBayes', xmod)
}

Try the CNPBayes package in your browser

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

CNPBayes documentation built on Nov. 1, 2018, 4:47 a.m.