# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
c_cov2cor <- function(m) {
.Call('_mvtraits_c_cov2cor', PACKAGE = 'mvtraits', m)
}
c_draw_mu <- function(xbar, nx, Sigma_inv, mu0, Sigma_0_inv) {
.Call('_mvtraits_c_draw_mu', PACKAGE = 'mvtraits', xbar, nx, Sigma_inv, mu0, Sigma_0_inv)
}
c_draw_Sigma <- function(x, mu, v0, S0) {
.Call('_mvtraits_c_draw_Sigma', PACKAGE = 'mvtraits', x, mu, v0, S0)
}
c_sample_mvnorm <- function(niter, dat, mu, Sigma, mu0, Sigma0_inv, v0, S0, setup, progress) {
.Call('_mvtraits_c_sample_mvnorm', PACKAGE = 'mvtraits', niter, dat, mu, Sigma, mu0, Sigma0_inv, v0, S0, setup, progress)
}
c_sample_mvnorm_hier <- function(niter, dat, groups, mu_global, Sigma_global, mu_group, Sigma_group, mu0_global, Sigma0_global_inv, mu0_group, Sigma0_group_inv, v0_global, S0_global, v0_group, S0_group, setup_bygroup, progress) {
.Call('_mvtraits_c_sample_mvnorm_hier', PACKAGE = 'mvtraits', niter, dat, groups, mu_global, Sigma_global, mu_group, Sigma_group, mu0_global, Sigma0_global_inv, mu0_group, Sigma0_group_inv, v0_global, S0_global, v0_group, S0_group, setup_bygroup, progress)
}
c_mvnorm_fill_missing <- function(dat, mu, Sigma, setup) {
.Call('_mvtraits_c_mvnorm_fill_missing', PACKAGE = 'mvtraits', dat, mu, Sigma, setup)
}
zsetseed <- function(s) {
invisible(.Call('_mvtraits_zsetseed', PACKAGE = 'mvtraits', s))
}
zgetseed <- function() {
.Call('_mvtraits_zgetseed', PACKAGE = 'mvtraits')
}
zrnorm <- function() {
.Call('_mvtraits_zrnorm', PACKAGE = 'mvtraits')
}
c_random_mvnorm <- function(n, mu, Sigma) {
.Call('_mvtraits_c_random_mvnorm', PACKAGE = 'mvtraits', n, mu, Sigma)
}
rwishart <- function(df, S) {
.Call('_mvtraits_rwishart', PACKAGE = 'mvtraits', df, S)
}
store_covmat <- function(X) {
.Call('_mvtraits_store_covmat', PACKAGE = 'mvtraits', X)
}
store_covgrouparray <- function(X) {
.Call('_mvtraits_store_covgrouparray', PACKAGE = 'mvtraits', X)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.