if(!exists("meta") || is.null(meta)) meta <- packageDescription("DEoptim")
year <- sub(".*(2[[:digit:]]{3})-.*", "\\1", meta$Date)
vers <- paste("version", meta$Version)

citEntry(entry = "Article",
  title        = "{DEoptim}: An {R} Package for Global Optimization by Differential Evolution",
  author       = personList(as.person("Katharine Mullen"),
                   as.person("David Ardia"),
                   as.person("David Gil"),
                   as.person("Donald Windover"),
                   as.person("James Cline")),
  journal      = "Journal of Statistical Software",
  year         = "2011",
  volume       = "40",
  number       = "6",
  pages        = "1--26",
  textVersion  =
  paste("Katharine Mullen, David Ardia, David Gil, Donald Windover, James Cline (2011).",
        "DEoptim: An R Package for Global Optimization by Differential Evolution.",
        "Journal of Statistical Software, 40(6), 1-26.",
        "URL http://www.jstatsoft.org/v40/i06/."),
  
  header       = "To cite the R package use:",
  url          = "http://www.jstatsoft.org/v40/i06/"
)

citEntry(entry = "misc",
	 title = "{D}ifferential {E}volution ({DEoptim}) for Non-Convex Portfolio Optimization",
	 author = personList(as.person("David Ardia"),
                         as.person("Kris Boudt"),
                         as.person("Peter Carl"),
                         as.person("Katharine M. Mullen"),
                         as.person("Brian G. Peterson")),
         year = "2010",
         url = "http://ssrn.com/abstract=1584905",
         textVersion = 
         paste("Ardia, D., Boudt, K., Carl, P., Mullen, K.M., Peterson, B.G. (2010).",
               "Differential Evolution ('DEoptim') for Non-Convex Portfolio Optimization.",
               "URL http://ssrn.com/abstract=1584905."),
         header       = "Selected additional DEoptim-related references:",
)

citEntry(entry = "misc",
	 title = "{J}ump-Diffusion Calibration using {D}ifferential {E}volution",
	 author = personList(as.person("David Ardia"),
                         as.person("Juan Ospina Arango"),
                         as.person("Norman Giraldo Gomez")),
         year = "2010",
         url = "http://ssrn.com/abstract=1584905",
         textVersion = 
         paste("Ardia, D., Ospina Arango, N., Giraldo Gomez, N. (2010).",
               "Jump-Diffusion Calibration using Differential Evolution.",
               "URL http://ssrn.com/abstract=1584905.")	       
)

citEntry(entry = "Book",
         title = "{D}ifferential {E}volution - A Practical Approach to Global Optimization",
         author = personList(as.person("Kenneth V. Price"),
                             as.person("Rainer M. Storn"),
                             as.person("Jouni A. Lampinen")),
         publisher = "Springer-Verlag",
         series = "Natural Computing",
         month = "January",
         year = "2006",
         note = "ISBN 540209506",
         textVersion =
         paste("Kenneth V. Price, Rainer M. Storn and Jouni A. Lampinen (2006).",
               "Differential Evolution - A Practical Approach to Global Optimization.",
               "Berlin Heidelberg: Springer-Verlag. ISBN 3540209506."),
         header = "To cite the Differential Evolution algorithm use:"
)

citFooter("BibTeX entries for LaTeX users: use\n", 
sQuote('toBibtex(citation("DEoptim"))'))

