Printing gips object

Printing function for a gips class.

Usage

# S3 method for class 'gips'
print(
  x,
  digits = 3,
  compare_to_original = TRUE,
  log_value = FALSE,
  oneline = FALSE,
  ...
)

Arguments

x

An object of a gips class.

digits

The number of decimal places used to round displayed posterior ratios and, when log_value = TRUE, the unnormalized log-posterior. It can be negative. Defaults to 3. Passed to base::round().

compare_to_original

A logical. Whether to print how many times more likely the current permutation is compared to:

• the identity permutation () (for unoptimized gips object);

• the starting permutation (for optimized gips object).

log_value

A logical. Whether to print the logarithmic value. Default to FALSE.

oneline

A logical. Whether to print in one or multiple lines. Default to FALSE.

...

The additional arguments passed to base::cat().

Value

An invisible NULL.

Multi-sample

For multi-sample gips objects, posterior comparisons use the combined unnormalized log-posterior (sum of per-sample log weights). Use summary(x) to display the sample sizes; see summary.gips().

See also

• find_MAP() - The function that makes an optimized gips object out of the unoptimized one.

• compare_posteriories_of_perms() - The function that prints the compared posteriors between any two permutations, not only compared to the starting one or id.

Examples

S <- matrix(c(1, 0.5, 0.5, 2), nrow = 2, byrow = TRUE)
g <- gips(S, 10, perm = "(12)")
print(g, digits = 4, oneline = TRUE)
#> The permutation (1,2): is 2.2801 times more likely than the () permutation.