R/RcppExports.R

Defines functions getK mcmc_marginal mcmc_marginal_burnin update_sigma2 compute_logprior compute_prec compute_vars compute_means update_z update_multinomialPr update_p update_sigma2_0 update_tau2 update_mu stageTwoLogLik log_ddirichlet_ loglik p_s20_reduced reduced_s20 p_nu0_reduced reduced_nu0 p_tau_reduced reduced_tau p_mu_reduced reduced_mu reduced_pi p_sigma_reduced reduced_sigma p_pmix_reduced permutedz_reduced2 permutedz_reduced1 simulate_z_reduced2 simulate_z_reduced1 p_theta_zpermuted marginal_theta mcmc_singlebatch_pooled burnin_singlebatch_pooled sigma2_pooled sigma2_0_pooled nu0_pooled z_pooled multinomialPr_pooled stageTwoLogLik_pooled loglik_pooled p_s20_reduced_pooled reduced_s20_pooled p_nu0_reduced_pooled reduced_nu0_pooled p_tau_reduced_pooled reduced_tau_pooled p_mu_reduced_pooled reduced_mu_pooled p_pmix_reduced_pooled reduced_pi_pooled p_sigma_reduced_pooled reduced_sigma_pooled full_theta_pooled p_sigma2_batch reduced_z_theta_fixed p_theta_zfixed_batch p_theta_batch mcmc_batch mcmc_batch_burnin update_sigma2_batch update_theta_batch stageTwoLogLikBatch compute_logprior_batch compute_prec_batch compute_vars_batch compute_means_batch update_z_batch update_p_batch update_multinomialPr_batch update_sigma20_batch update_tau2_batch update_mu_batch compute_loglik_batch tableBatchZ uniqueBatch p_s20_reduced_batch reduced_s20_batch p_nu0_reduced_batch reduced_nu0_batch p_tau_reduced_batch reduced_tau_batch p_mu_reduced_batch reduced_mu_batch reduced_pi_batch p_sigma_reduced_batch reduced_sigma_batch p_pmix_reduced_batch permutedz_reduced2_batch permutedz_reduced1_batch simulate_z_reduced2_batch simulate_z_reduced1_batch p_theta_zpermuted_batch marginal_theta_batch 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 ps20_multibatch_pvar_red s20_multibatch_pvar_red pnu0_multibatch_pvar_red nu0_multibatch_pvar_red tau_multibatch_pvar_red mu_multibatch_pvar_red pi_multibatch_pvar_red psigma_multibatch_pvar_red sigma_multibatch_pvar_red theta_multibatch_pvar_red tableZ rMultinom

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

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

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

theta_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_theta_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

sigma_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_sigma_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

psigma_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_psigma_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

pi_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_pi_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

mu_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_mu_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

tau_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_tau_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

nu0_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_nu0_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

pnu0_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_pnu0_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

s20_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_s20_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

ps20_multibatch_pvar_red <- function(xmod) {
    .Call('_CNPBayes_ps20_multibatch_pvar_red', PACKAGE = 'CNPBayes', xmod)
}

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)
}

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

p_theta_zpermuted_batch <- function(xmod) {
    .Call('_CNPBayes_p_theta_zpermuted_batch', PACKAGE = 'CNPBayes', xmod)
}

simulate_z_reduced1_batch <- function(object) {
    .Call('_CNPBayes_simulate_z_reduced1_batch', PACKAGE = 'CNPBayes', object)
}

simulate_z_reduced2_batch <- function(object) {
    .Call('_CNPBayes_simulate_z_reduced2_batch', PACKAGE = 'CNPBayes', object)
}

permutedz_reduced1_batch <- function(xmod) {
    .Call('_CNPBayes_permutedz_reduced1_batch', PACKAGE = 'CNPBayes', xmod)
}

permutedz_reduced2_batch <- function(xmod) {
    .Call('_CNPBayes_permutedz_reduced2_batch', PACKAGE = 'CNPBayes', xmod)
}

p_pmix_reduced_batch <- function(xmod) {
    .Call('_CNPBayes_p_pmix_reduced_batch', PACKAGE = 'CNPBayes', xmod)
}

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

p_sigma_reduced_batch <- function(xmod) {
    .Call('_CNPBayes_p_sigma_reduced_batch', PACKAGE = 'CNPBayes', xmod)
}

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

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

p_mu_reduced_batch <- function(xmod) {
    .Call('_CNPBayes_p_mu_reduced_batch', PACKAGE = 'CNPBayes', xmod)
}

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

p_tau_reduced_batch <- function(xmod) {
    .Call('_CNPBayes_p_tau_reduced_batch', PACKAGE = 'CNPBayes', xmod)
}

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

p_nu0_reduced_batch <- function(xmod) {
    .Call('_CNPBayes_p_nu0_reduced_batch', PACKAGE = 'CNPBayes', xmod)
}

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

p_s20_reduced_batch <- function(xmod) {
    .Call('_CNPBayes_p_s20_reduced_batch', PACKAGE = 'CNPBayes', xmod)
}

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

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

compute_loglik_batch <- function(xmod) {
    .Call('_CNPBayes_compute_loglik_batch', PACKAGE = 'CNPBayes', xmod)
}

update_mu_batch <- function(xmod) {
    .Call('_CNPBayes_update_mu_batch', PACKAGE = 'CNPBayes', xmod)
}

update_tau2_batch <- function(xmod) {
    .Call('_CNPBayes_update_tau2_batch', PACKAGE = 'CNPBayes', xmod)
}

update_sigma20_batch <- function(xmod) {
    .Call('_CNPBayes_update_sigma20_batch', PACKAGE = 'CNPBayes', xmod)
}

update_multinomialPr_batch <- function(xmod) {
    .Call('_CNPBayes_update_multinomialPr_batch', PACKAGE = 'CNPBayes', xmod)
}

update_p_batch <- function(xmod) {
    .Call('_CNPBayes_update_p_batch', PACKAGE = 'CNPBayes', xmod)
}

update_z_batch <- function(xmod) {
    .Call('_CNPBayes_update_z_batch', PACKAGE = 'CNPBayes', xmod)
}

compute_means_batch <- function(xmod) {
    .Call('_CNPBayes_compute_means_batch', PACKAGE = 'CNPBayes', xmod)
}

compute_vars_batch <- function(xmod) {
    .Call('_CNPBayes_compute_vars_batch', PACKAGE = 'CNPBayes', xmod)
}

compute_prec_batch <- function(xmod) {
    .Call('_CNPBayes_compute_prec_batch', PACKAGE = 'CNPBayes', xmod)
}

compute_logprior_batch <- function(xmod) {
    .Call('_CNPBayes_compute_logprior_batch', PACKAGE = 'CNPBayes', xmod)
}

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

update_theta_batch <- function(xmod) {
    .Call('_CNPBayes_update_theta_batch', PACKAGE = 'CNPBayes', xmod)
}

update_sigma2_batch <- function(xmod) {
    .Call('_CNPBayes_update_sigma2_batch', PACKAGE = 'CNPBayes', xmod)
}

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

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

p_theta_batch <- function(xmod) {
    .Call('_CNPBayes_p_theta_batch', PACKAGE = 'CNPBayes', xmod)
}

p_theta_zfixed_batch <- function(xmod) {
    .Call('_CNPBayes_p_theta_zfixed_batch', PACKAGE = 'CNPBayes', xmod)
}

reduced_z_theta_fixed <- function(object) {
    .Call('_CNPBayes_reduced_z_theta_fixed', PACKAGE = 'CNPBayes', object)
}

p_sigma2_batch <- function(xmod) {
    .Call('_CNPBayes_p_sigma2_batch', PACKAGE = 'CNPBayes', xmod)
}

full_theta_pooled <- function(xmod) {
    .Call('_CNPBayes_full_theta_pooled', PACKAGE = 'CNPBayes', xmod)
}

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

p_sigma_reduced_pooled <- function(xmod) {
    .Call('_CNPBayes_p_sigma_reduced_pooled', PACKAGE = 'CNPBayes', xmod)
}

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

p_pmix_reduced_pooled <- function(xmod) {
    .Call('_CNPBayes_p_pmix_reduced_pooled', PACKAGE = 'CNPBayes', xmod)
}

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

p_mu_reduced_pooled <- function(xmod) {
    .Call('_CNPBayes_p_mu_reduced_pooled', PACKAGE = 'CNPBayes', xmod)
}

reduced_tau_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_tau_pooled', PACKAGE = 'CNPBayes', xmod)
}

p_tau_reduced_pooled <- function(xmod) {
    .Call('_CNPBayes_p_tau_reduced_pooled', PACKAGE = 'CNPBayes', xmod)
}

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

p_nu0_reduced_pooled <- function(xmod) {
    .Call('_CNPBayes_p_nu0_reduced_pooled', PACKAGE = 'CNPBayes', xmod)
}

reduced_s20_pooled <- function(xmod) {
    .Call('_CNPBayes_reduced_s20_pooled', PACKAGE = 'CNPBayes', xmod)
}

p_s20_reduced_pooled <- function(xmod) {
    .Call('_CNPBayes_p_s20_reduced_pooled', PACKAGE = 'CNPBayes', xmod)
}

loglik_pooled <- function(xmod) {
    .Call('_CNPBayes_loglik_pooled', PACKAGE = 'CNPBayes', xmod)
}

stageTwoLogLik_pooled <- function(xmod) {
    .Call('_CNPBayes_stageTwoLogLik_pooled', PACKAGE = 'CNPBayes', xmod)
}

multinomialPr_pooled <- function(xmod) {
    .Call('_CNPBayes_multinomialPr_pooled', PACKAGE = 'CNPBayes', xmod)
}

z_pooled <- function(xmod) {
    .Call('_CNPBayes_z_pooled', PACKAGE = 'CNPBayes', xmod)
}

nu0_pooled <- function(xmod) {
    .Call('_CNPBayes_nu0_pooled', PACKAGE = 'CNPBayes', xmod)
}

sigma2_0_pooled <- function(xmod) {
    .Call('_CNPBayes_sigma2_0_pooled', PACKAGE = 'CNPBayes', xmod)
}

sigma2_pooled <- function(xmod) {
    .Call('_CNPBayes_sigma2_pooled', PACKAGE = 'CNPBayes', xmod)
}

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

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

marginal_theta <- function(xmod) {
    .Call('_CNPBayes_marginal_theta', PACKAGE = 'CNPBayes', xmod)
}

p_theta_zpermuted <- function(xmod) {
    .Call('_CNPBayes_p_theta_zpermuted', PACKAGE = 'CNPBayes', xmod)
}

simulate_z_reduced1 <- function(object) {
    .Call('_CNPBayes_simulate_z_reduced1', PACKAGE = 'CNPBayes', object)
}

simulate_z_reduced2 <- function(object) {
    .Call('_CNPBayes_simulate_z_reduced2', PACKAGE = 'CNPBayes', object)
}

permutedz_reduced1 <- function(xmod) {
    .Call('_CNPBayes_permutedz_reduced1', PACKAGE = 'CNPBayes', xmod)
}

permutedz_reduced2 <- function(xmod) {
    .Call('_CNPBayes_permutedz_reduced2', PACKAGE = 'CNPBayes', xmod)
}

p_pmix_reduced <- function(xmod) {
    .Call('_CNPBayes_p_pmix_reduced', PACKAGE = 'CNPBayes', xmod)
}

reduced_sigma <- function(xmod) {
    .Call('_CNPBayes_reduced_sigma', PACKAGE = 'CNPBayes', xmod)
}

p_sigma_reduced <- function(xmod) {
    .Call('_CNPBayes_p_sigma_reduced', PACKAGE = 'CNPBayes', xmod)
}

reduced_pi <- function(xmod) {
    .Call('_CNPBayes_reduced_pi', PACKAGE = 'CNPBayes', xmod)
}

reduced_mu <- function(xmod) {
    .Call('_CNPBayes_reduced_mu', PACKAGE = 'CNPBayes', xmod)
}

p_mu_reduced <- function(xmod) {
    .Call('_CNPBayes_p_mu_reduced', PACKAGE = 'CNPBayes', xmod)
}

reduced_tau <- function(xmod) {
    .Call('_CNPBayes_reduced_tau', PACKAGE = 'CNPBayes', xmod)
}

p_tau_reduced <- function(xmod) {
    .Call('_CNPBayes_p_tau_reduced', PACKAGE = 'CNPBayes', xmod)
}

reduced_nu0 <- function(xmod) {
    .Call('_CNPBayes_reduced_nu0', PACKAGE = 'CNPBayes', xmod)
}

p_nu0_reduced <- function(xmod) {
    .Call('_CNPBayes_p_nu0_reduced', PACKAGE = 'CNPBayes', xmod)
}

reduced_s20 <- function(xmod) {
    .Call('_CNPBayes_reduced_s20', PACKAGE = 'CNPBayes', xmod)
}

p_s20_reduced <- function(xmod) {
    .Call('_CNPBayes_p_s20_reduced', PACKAGE = 'CNPBayes', xmod)
}

loglik <- function(xmod) {
    .Call('_CNPBayes_loglik', PACKAGE = 'CNPBayes', xmod)
}

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

stageTwoLogLik <- function(xmod) {
    .Call('_CNPBayes_stageTwoLogLik', 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_sigma2_0 <- function(xmod) {
    .Call('_CNPBayes_update_sigma2_0', PACKAGE = 'CNPBayes', xmod)
}

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

update_multinomialPr <- function(xmod) {
    .Call('_CNPBayes_update_multinomialPr', 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)
}

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

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

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

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

Try the CNPBayes package in your browser

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

CNPBayes documentation built on May 2, 2018, 3:57 a.m.