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

citEntry(entry="Manual",
title = "Gene Set Regulation Index (GSRI)",
author = personList(as.person("Julian Gehring"),
as.person("Kilian Bartholome"),
as.person("Clemens Kreutz"),
as.person("Jens Timmer")),
year = year,
note = vers,
textVersion =
paste("Julian Gehring, Kilian Bartholome, Clemens Kreutz, Jens Timmer",
" (", year, "): Gene Set Regulation Index (GSRI). ",
"Institute of Physics and Freiburg Center for Data Analysis and Modeling, 
University of Freiburg, Germany. ", vers, ".", sep=""))
