citHeader("To cite reproducible in publications use:")

persons <- eval(parse(text = meta$`Authors@R`))
authors <- persons[vapply(persons, function(x, r = c("aut", "cre", "ctb", "fnd")) {
  any(x$role %in% r)
}, logical(1))]

bibentry(
  bibtype  = "Manual",
  title    = paste0("{", meta$Package, "}", ": ", meta$Title),
  author   = authors,
  year = sub("-.*", "", meta$Date),
  note = sprintf("R package version %s", meta$Version),
  url = "https://reproducible.predictiveecology.org"
)
