citHeader("To cite package 'mixture' in publications use:")
     
     ## R >= 2.8.0 passes package metadata to citation().
     if(!exists("meta") || is.null(meta)) meta <- packageDescription("pgmm")
     year <- sub(".*(2[[:digit:]]{3})-.*", "\\1", meta$Date)
     vers <- paste("R package version", meta$Version)

citEntry(entry="Manual",
              title = "mixture: Mixture Models for Clustering and Classification",
              author = personList(as.person("Ryan P. Browne"),as.person("Paul D. McNicholas")),
              year = year,
              note = vers,
              textVersion = paste("Ryan P. Browne and Paul D. McNicholas (", year, "). mixture: Mixture Models for Clustering and Classification. ", vers, ".", sep="")
)

citEntry(entry = "TechReport",
     	title = "Estimating Common Principal Components in High Dimensions",
     	author = personList(as.person("Ryan P. Browne"),as.person("Paul D. McNicholas")),
	textVersion = paste("Ryan P. Browne and Paul D. McNicholas (2013). Estimating Common Principal Components in High Dimensions. Arxiv preprint arXiv:1302.2102."),
     	year = "2013",
     	institution = "Arxiv preprint",
     	number = "arXiv:1302.2102",
)

citEntry(entry = "Article",
     	title = "Orthogonal Stiefel Manifold Optimization for Eigen-Decomposed Covariance Parameter Estimation in Mixture Models",
     	author = personList(as.person("Ryan P. Browne"),as.person("Paul D. McNicholas")),
	textVersion = paste("Ryan P. Browne and Paul D. McNicholas (2012). Orthogonal Stiefel Manifold Optimization for Eigen-Decomposed Covariance Parameter Estimation in Mixture Models. Statistics and Computing. To appear."),
     	year = "2012",
     	journal = "Statistics and Computing",
)

citEntry(entry = "Article",
     	title = "Gaussian Parsimonious Clustering Models",
     	author = personList(as.person("Gilles Celeux"),as.person("Gerard Govaert")),
	textVersion = paste("Gilles Celeux and Gerard Govaert (1995). Gaussian Parsimonious Clustering Models. Pattern Recognition. 28(5), 781-793."),
     	year = "2012",
     	journal = "Pattern Recognition",
     	volume = "28",
     	number = "5",
     	pages  = "781-793",
)
