desc <- packageDescription("SemiParBIVProbit")
year <- sub(".*(2[[:digit:]]{3})-.*", "\\1", desc$Date)
vers <- paste(" R package version", desc$Version)

citEntry(entry="Manual",
title = "SemiParBIVProbit: Semiparametric Bivariate Probit Modelling",
author = "Marra G. and Radice R.",
year = year,
note = vers,
textVersion =
paste("Marra G. and Radice R. with contributions from Papageorgiou G. (",year,"). SemiParBIVProbit: Semiparametric Bivariate Probit Modelling.",vers, ".", sep="")
)

citEntry(
 entry="Article",
 title="Estimation of a semiparametric recursive bivariate probit model in the presence of endogeneity",
 journal="Canadian Journal of Statistics",
 volume= "39",
 number="2",
 pages="259-279",
 year="2011",
 author="Marra G. and Radice R.",
 textVersion="Marra G. and Radice R. (2011), Estimation of a semiparametric recursive bivariate probit model in the presence of endogeneity. Canadian Journal of Statistics, 39(2), 259-279."
 )
 
citEntry(
  entry="Article",
  title="A penalized likelihood estimation approach to semiparametric sample selection binary response modeling",
  journal="Electronic Journal of Statistics",
  volume= "7",
  number="",
  pages="1432-1455",
  year="2013", 
  author="Marra G. and Radice R.",
  textVersion="Marra G. and Radice R. (2013), A penalized likelihood estimation approach to semiparametric sample selection binary response modeling. Electronic Journal of Statistics, 7, 1432-1455."
 )
