Get the number of distributions a site model has

get_site_model_n_params(site_model)

Arguments

site_model

a site model, as returned by create_site_model

Value

the number of parameters a site model has

Author

Richèl J.C. Bilderbeek

Examples

  testit::assert(
    get_site_model_n_params(create_gtr_site_model()) == 10
  )
  testit::assert(
    get_site_model_n_params(create_hky_site_model()) == 2
  )
  testit::assert(
    get_site_model_n_params(create_jc69_site_model()) == 0
  )
  testit::assert(
    get_site_model_n_params(create_tn93_site_model()) == 4
  )