year <- sub("-.*", "", meta$Date)
note <- sprintf("Version %s", strsplit(meta$Version, "-", fixed = TRUE)[[1]][1])

bibentry(bibtype = "Article",
  title        = "Structured Additive Regression Models: An {R} Interface to {BayesX}",
  author       = c(person(given = "Nikolaus",
                          family = "Umlauf",
                          email = "Nikolaus.Umlauf@uibk.ac.at"),
                   person(given = "Daniel",
                          family = "Adler",
                          email = "dadler@dyncall.org"),
                   person(given = "Thomas",
                          family = "Kneib",
                          email = "tkneib@uni-goettingen.de"),
                   person(given = "Stefan",
                          family = "Lang",
                          email = "Stefan.Lang@uibk.ac.at"),
                   person(given = "Achim",
                          family = "Zeileis",
                          email = "Achim.Zeileis@R-project.org")),
  journal      = "Journal of Statistical Software",
  year         = "2015",
  volume       = "63",
  number       = "21",
  pages        = "1--46",
  doi          = "10.18637/jss.v063.i21",
  header       = "When using R2BayesX/BayesXsrc in publications, please cite both the R interface and BayesX itself:"
)

bibentry(bibtype = "Manual",
  title        = "{BayesX}: Software for {B}ayesian Inference in Structured Additive Regression Models",
  author       = c(person(given = "Christian", family = "Belitz"),
                   person(given = "Andreas", family = "Brezger"),
                   person(given = "Nadja",
                          family = "Klein",
                          email = "nadja.klein@statistik.tu-dortmund.de"),
                   person(given = "Thomas",
                          family = "Kneib",
                          email = "tkneib@uni-goettingen.de"),
                   person(given = "Stefan",
                          family = "Lang",
                          email = "Stefan.Lang@uibk.ac.at"),
                   person(given = "Nikolaus",
                          family = "Umlauf",
                          email = "Nikolaus.Umlauf@uibk.ac.at")),
  year = year,
  note = note,
  url = "https://www.uni-goettingen.de/de/bayesx/550513.html",
  textVersion = paste("Christiane Belitz, Andreas Brezger, Thomas Kneib, Stefan Lang, Nikolaus Umlauf",
                  sprintf("(%s).", year),	 
                  "BayesX: Software for Bayesian Inference in Structured Additive Regression Models.",
	                paste(note, ".", sep = ""),
                  "https://www.uni-goettingen.de/de/bayesx/550513.html")
)

