R/gamma_site_models_to_xml_prior_distr.R

Defines functions gamma_site_models_to_xml_prior_distr

#' Creates the gamma site models section in the distribution section
#' of a BEAST2 XML parameter file
#' @inheritParams default_params_doc
#' @return lines of XML text
#' @author Richèl J.C. Bilderbeek
#' @noRd
gamma_site_models_to_xml_prior_distr <- function( # nolint beautier function
  site_models
) {
  text <- NULL
  for (site_model in site_models) {
    text <- c(
      text,
      gamma_site_model_to_xml_prior_distr(site_model) # nolint
    )
  }
  text
}
ropensci/beautier documentation built on March 12, 2019, 8:27 p.m.