mrs <- person(c("Martin", "R."), "Smith", email = "martin.smith@durham.ac.uk")
vers <- paste("R package version", meta$Version)

bibentry(
  mheader = paste0(
    "Please acknowledge your use of Quartet and cite the relevant algorithm. ",
    "For example, 'Quartet divergence (Smith 2019b) was calculated using the ",
    "tqDist algorithm (Sand et al. 2014) implemented in the R package Quartet v",
    meta$Version, " (Smith 2019a).' ",
    "For triplet distances, cite the CPDT algorithm (Jansson & Rajaby 2017)."
  ),
  bibtype = "manual",
  key = "Smith2019a",
  title = paste(
    "Quartet: comparison of phylogenetic trees using quartet and split",
    "measures"
  ),
  author = mrs,
  note = vers,
  year = 2019,
  organization = "Comprehensive R Archive Network",
  address = "Vienna",
  doi = "10.32614/CRAN.package.Quartet",

  textVersion = paste0(
    "*Smith, M.R. (2019a). Quartet: comparison of phylogenetic trees using",
    " quartet and split measures.",
    " R package version ", meta$Version,
    ". Comprehensive R Archive Network, Vienna. doi:10.32614/CRAN.package.Quartet"
  )
)

bibentry(
  bibtype = "article",
  key = "Smith2019b",
  author = mrs,
  doi = "10.1098/rsbl.2018.0632",
  journal = "Biology Letters",
  title = paste(
    "Bayesian and parsimony approaches reconstruct informative trees from",
    "simulated morphological datasets"
  ),
  volume = 15,
  number = 2,
  pages = "20180632",
  year = "2019",
  textVersion = paste(
    "Smith, M.R. (2019b). Bayesian and parsimony approaches reconstruct",
    "informative trees from simulated morphological datasets.",
    "Biology Letters 15:20180632. doi:10.1098/rsbl.2018.0632"
  )
)

bibentry(
  bibtype = "article",
  key = "Sand2014",
  author = c(
    person("Andreas", "Sand"),
    person(c("Morten", "K."), "Holt"),
    person("Jens", "Johansen"),
    person(c("Gerth", "S."), "Brodal"),
    person("Thomas", "Mailund"),
    person(c("Christian", "N.", "S."), "Pedersen")
  ),
  doi = "10.1093/bioinformatics/btu157",
  journal = "Bioinformatics",
  number = 14,
  pages = "2079--2080",
  title = paste(
    "tqDist: a library for computing the quartet and triplet distances",
    "between binary or general trees"
  ),
  volume = 30,
  year = 2014,

  textVersion = paste(
    "Sand, A. et al. (2014).",
    "tqDist: a library for computing the quartet and triplet distances",
    "between binary or general trees.",
    "Bioinformatics 30(14): 2079-2080.",
    "doi:10.1093/bioinformatics/btu157"
  )
)

bibentry(
  bibtype = "article",
  key = "Jansson2017",
  author = c(
    person("Jesper", "Jansson"),
    person("Ramesh", "Rajaby")
  ),
  doi = "10.1089/cmb.2016.0185",
  journal = "Journal of Computational Biology",
  number = 2,
  pages = "106--126",
  title = "A more practical algorithm for the rooted triplet distance",
  volume = 24,
  year = 2017,

  textVersion = paste(
    "Jansson, J. & Rajaby, R. (2017).",
    "A more practical algorithm for the rooted triplet distance.",
    "Journal of Computational Biology 24(2): 106-126.",
    "doi:10.1089/cmb.2016.0185"
  )
)
