year <- sub("-.*", "", meta$Date)
if(!length(year))
  year <- substr(Sys.Date(),1,4)
vers <- meta$Version
if(is.null(vers))
  vers <- packageVersion("exuber")
vers <- paste("R package version", vers)

citHeader("To cite exuber in publications as:")

bibentry(bibtype  = "Manual",
  title  = "exuber: Testing and Simulating Explosive Periods",
  author = personList(as.person("Kostas Vasilopoulos"),
                   as.person("Themis Pavlidis"),
                   as.person("Simon Spavound"),
                   as.person("Enr\u00EDqeu Matr\u00EDnez-Garc\u00EDa")),
  year  = year,
  note  = vers,
  url   = "https://CRAN.R-project.org/package=exuber",

  textVersion =
         paste0("Vasilopoulos Kostas, Pavlidis Themis, Spavound Simon and Matr\u00EDnez-Garc\u00EDa Enr\u00EDqeu(",
                year,"). exuber: Testing and Simulating Explosive Periods. ",
                vers, ".", " https://CRAN.R-project.org/package=exuber")

)
