pkg_name <- "SOMbrero"
citHeader(paste("To cite the R package ", pkg_name, " in publications use:"))

if(!exists("meta") || is.null(meta)) meta <- packageDescription(pkg_name)
stopifnot(meta$Package == pkg_name)

year <- sub(".*(2[[:digit:]]{3})-.*", "\\1", meta$Date)
vers <- paste("R package version", meta$Version)
url <- paste0("https://CRAN.R-project.org/package=", pkg_name)

bibentry(
  bibtype = "Article",
  title = 'On-line relational and multiple relational SOM',
  author = c(person("Madalina", "Olteanu"), 
             person("Nathalie", "Villa-Vialaneix")),
  journal = 'Neurocomputing',
  year = '2015',
  volume = '147',
  pages = '15--30',
  doi = '10.1016/j.neucom.2013.11.047'
)

bibentry(
  bibtype = 'inProceedings',
  title = 'Stochastic self-organizing map variants with the R package SOMbrero',
  author = c(person("Nathalie", "Villa-Vialaneix")),
  year = '2017',
  booktitle = 'Proceedings of the 12th International Workshop on Self-Organizing Maps and Learning Vector Quantization, Clustering and Data Visualization (WSOM 2017)',
  publisher = 'IEEE, Nancy, France',
  pages = '1--7',
  editor = 'Lamirel JC, Cottrell M, Olteanu M'
)

bibentry(
  bibtype = 'inProceedings',
  title = 'On-line relational SOM for dissimilarity data',
  author = c(person("Madalina", "Olteanu"), 
             person("Nathalie", "Villa-Vialaneix"), 
             person("Marie", "Cottrell")),
  booktitle = 'Advances in Self-Organizing Maps (Proceedings of WSOM 2012, Santiago, Chili, 12-14 decembre 2012)',
  address = 'Berlin/Heidelberg',
  publisher = 'Springer Verlag',
  year = 2012,
  volume= 198,
  pages = '13--22',
  editor = 'Estevez, P. and Principe, J. and Zegers, P. and Barreto G.',
  series = 'Advances in Intelligent Systems and Computing series'
)

bibentry(
  bibtype = 'Article',
  title = 'Using SOMbrero for clustering and visualizing graphs',
  author = c(person("Madalina", "Olteanu"), 
             person("Nathalie", "Villa-Vialaneix")),
  journal = 'Journal de la Societe Francaise de Statistique',
  year = '2015b',
  volume = '156',
  pages = '95--119'
)

bibentry(
  bibtype = 'inProceedings',
  title = 'Accelerating stochastic kernel SOM',
  author = c(person("Jerome", "Mariette"), person("Fabrice", "Rossi"), 
             person("Madalina", "Olteanu"), 
             person("Nathalie", "Villa-Vialaneix")),
  year = '2017',
  booktitle = 'Proceedings of XXVth European Symposium on Artificial Neural Networks, Computational Intelligence and Machine Learning (ESANN 2017)',
  publisher = 'i6doc',
  pages = '269--274',
  editor = 'Verleysen M.'
)

bibentry(bibtype = "Manual",
	       title	= "SOMbrero: SOM Bound to Realize Euclidean and Relational Outputs",
	       author = c(person("Nathalie", "Vialaneix", role = c("aut", "cre"), 
                    email = "nathalie.vialaneix@inrae.fr", 
                    comment = c(ORCID = "0000-0003-1156-0639")),
             person("Elise", "Maigne", role = "aut", 
                    email = "elise.maigne@inrae.fr"),
             person("Jerome", "Mariette", role = "aut", 
                    email = "jerome.mariette@inrae.fr"),
             person("Madalina", "Olteanu", role = "aut", 
                    email = "olteanu@ceremade.dauphine.fr"),
             person("Fabrice", "Rossi", role = "aut", 
                    email = "fabrice.rossi@apiacoa.org"),
             person("Laura", "Bendhaiba", role = "ctb", 
                    email = "laurabendhaiba@gmail.com"),
             person("Julien", "Boelaert", role = "ctb", 
                    email = "julien.boelaert@gmail.com")),
         year = year,
         url = url,
	       note = paste(vers, "---", "For new features, see the 'NEWS'"),
	       textVersion = paste0(
	           "Vialaneix, N., Maigne, E., Mariette, J., Olteanu, M., Rossi, F., Bendhaiba, L., Boelaert, J. (",
	           year, ").  phoenix: . ", vers, ".")
)
