desc <- packageDescription("expectreg")
year <- sub(".*(2[[:digit:]]{3})-.*", "\\1", desc$Date)
vers <- paste("R package version", desc$Version)
citEntry(entry="Manual",
title = "expectreg: Expectile and Quantile Regression",
author = personList(as.person("Fabian Sobotka"),
as.person("Sabine Schnabel"),
as.person("Linda Schulze Waltrup"),
as.person("Paul Eilers"),
as.person("Thomas Kneib"),
as.person("Goeran Kauermann")),
year = year,
note = vers,
textVersion =
paste("F. Sobotka, S. Schnabel and L. Schulze Waltrup with contributions from P. Eilers, T. Kneib and G. Kauermann (",
year,
"). expectreg: Expectile and Quantile Regression. ",
vers, ".", sep=""))

    citEntry(entry="Article",
         title = "Geoadditive Expectile Regression",
         author = personList(as.person("Fabian Sobotka"), as.person("Thomas Kneib")),
         journal      = "Computational Statistics and Data Analysis",
         year         = "2010",
         note         = "doi: 10.1016/j.csda.2010.11.015",

         textVersion =
         paste("Fabian Sobotka and Thomas Kneib (2010).",
               "Geoadditive Expectile Regression.",
               "Computational Statistics and Data Analysis,",
               "doi: 10.1016/j.csda.2010.11.015."),
   )


    citEntry(entry="Article",
         title = "Optimal Expectile Smoothing",
         author = personList(as.person("Sabine Schnabel"), as.person("Paul Eilers")),
         journal      = "Computational Statistics and Data Analysis",
         year         = "2009",
         volume       = "53",
         pages        = "4168--4177",

         textVersion =
         paste("Sabine Schnabel and Paul Eilers (2009).",
               "Optimal Expectile Smoothing.",
               "Computational Statistics and Data Analysis, 53:4168-4177."),
   )
