bht_compare: Print function for Bayesian hypothesis testing.

In keesmulder/circbayes: Bayesian Analysis of Circular Data

Description

Print function for Bayesian hypothesis testing.

Bayesian hypothesis tests from marginal likelihoods.

Usage

## S3 method for class 'bht_comparison'
print(x, digits = 3, ...)

bht_compare(...)

Arguments

x	Object of type bht_comparison.
digits	Number of digits to print.
...	(Named) list of models.

Value

Object of type 'bht_comparison'.

Methods (by generic)

• print: Print method.

Examples

th <- rvm(100, 3, .2)

vm_mod <- vm_posterior(th, prior = c(0, 0, 1))

cu_ml <- marg_lik_circ_unif(th)
vm_ml <- marg_lik(vm_mod)

bht_compare(uniform = cu_ml, von_mises = vm_ml)
# Test circular uniformity versus von mises.
th     <- rvm(30, 0, 1)
vm_mod <- vm_posterior(th)

bht_compare(uniform  = marg_lik_circ_unif(th),
            vonmises = marg_lik(vm_mod))

keesmulder/circbayes documentation built on May 30, 2019, 2:04 p.m.