get_gamma_site_model_n_distrs {beautier}

Get the number of distributions in a gamma site model

Description

Get the number of distributions in a gamma site model

Usage

get_gamma_site_model_n_distrs(gamma_site_model)

Arguments

gamma_site_model

a site model's gamma site model, as returned by create_gamma_site_model

Value

the number of distributions a gamma site model has

Author(s)

Richèl J.C. Bilderbeek

See Also

Use create_gamma_site_model to create a gamma site model

Examples

check_empty_beautier_folder()

# zero distributions
gamma_site_model <- create_gamma_site_model()
get_gamma_site_model_n_distrs(
  gamma_site_model
)

gamma_site_model <- create_gamma_site_model(
 gamma_cat_count = 2,
 gamma_shape_prior_distr = create_exp_distr()
)

# one distribution
get_gamma_site_model_n_distrs(gamma_site_model)

check_empty_beautier_folder()