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

citHeader("To cite 'nse' in publications use:")

citEntry(entry = "manual",
	 title = "Numerical standard errors computation in R",
	 author = personList(person("David","Ardia"),
			     person("Keven","Bluteau")),
   year = year,
	 note = vers,
	 url = "https://github.com/keblu/nse",
	 textVersion =
         paste("David Ardia and Keven Bluteau (", year,"). ",
               "'nse': Numerical standard errors computation in 'R'. ", vers, ".", sep = "")
)

citEntry(entry = "misc",
	 title = "Comparison of Multiple Methods for Computing Numerical Standard Errors: An Extensive Monte Carlo Study",
	 author = personList(person("David","Ardia"),
			     person("Keven","Bluteau"),
                             person("Lennart","Hoogerheide")),
         year = "2016",
	 url = "http://papers.ssrn.com/sol3/papers.cfm?abstract_id=2741587",
         textVersion = paste(
                "Ardia, D., Bluteau K., and Hoogerheide, Lennart F. (2016).",
                "Comparison of Multiple Methods for Computing Numerical Standard Errors: An Extensive Monte Carlo Study.",
                "Working paper.",
                "URL http://papers.ssrn.com/sol3/papers.cfm?abstract_id=2741587")
)