Initializes a GTR site model
Arguments
- gtr_site_model
a GTR site model, as returned by
create_gtr_site_model
- distr_id
a distributions' ID
- param_id
a parameter's ID
Examples
check_empty_beautier_folder()
gtr_site_model <- create_gtr_site_model()
# FALSE
is_init_gtr_site_model(gtr_site_model)
#> [1] FALSE
gtr_site_model <- init_gtr_site_model(gtr_site_model)
# TRUE
is_init_gtr_site_model(gtr_site_model)
#> [1] TRUE
check_empty_beautier_folder()