
year = sub('.*(2[[:digit:]]{3})-.*', '\\1', meta$Date, perl = TRUE)
vers = paste('R package version', meta$Version)

bibentry(
  bibtype  = 'manual',
  textVersion = paste("Chunqiao Luo, Shasha Bai(", year, "). ", meta$Title, ". ", vers, ".", sep = ""),
  header = "To cite patternplot in publications, please use",
  author = Filter(function(p) 'aut' %in% p$role, as.person(meta$Author)),
  title = meta$Title,
  year = year,
  url = meta$URL
  
)

