diff --git a/bin/reduce_sequence.R b/bin/reduce_sequence.R
index f9e8340..6df5bdc 100644
--- a/bin/reduce_sequence.R
+++ b/bin/reduce_sequence.R
@@ -15,7 +15,8 @@ option_list <- list(
 )
 
 opt_parser <- OptionParser(option_list = option_list, 
-                           description = "Reduces each sequence to its most frequent region.")
+                           description = "Reduces each sequence to its most frequent region.",
+                           epilogue = "Author: Hendrik Schultheis <Hendrik.Schultheis@mpi-bn.mpg.de>")
 
 opt <- parse_args(opt_parser)