diff --git a/bin/cdhit_wrapper.R b/bin/cdhit_wrapper.R index c5f7230..fcbd5eb 100644 --- a/bin/cdhit_wrapper.R +++ b/bin/cdhit_wrapper.R @@ -33,7 +33,8 @@ option_list <- list( ) opt_parser <- OptionParser(option_list = option_list, - description = "CD-HIT-EST Wrapper function. See https://github.com/weizhongli/cdhit/wiki for more information regarding CD-HITs parameters.") + description = "CD-HIT-EST Wrapper function. See https://github.com/weizhongli/cdhit/wiki for more information regarding CD-HITs parameters.", + epilogue = "Author: Hendrik Schultheis ") opt <- parse_args(opt_parser) @@ -76,7 +77,7 @@ cdhitest <- function(input, identity = 0.8, coverage = 8, output = "cluster.bed" } if (missing(input)) { - stop("Input parameter missing!") + stop("No input specified! Please forward a valid bed-file.") } message("Loading bed.")