diff --git a/bin/bed_to_fasta.R b/bin/bed_to_fasta.R
index 73ea732..e0ade14 100644
--- a/bin/bed_to_fasta.R
+++ b/bin/bed_to_fasta.R
@@ -13,7 +13,7 @@ opt_parser <- OptionParser(option_list = option_list,
 opt <- parse_args(opt_parser)
 
 #' Splitting BED-files depending on their cluster.
-#' The Sequences of each cluster are writen as an FASTA-file.
+#' The Sequences of each cluster are written as an FASTA-file.
 #' @param bedInput <string> BED-file with sequences and cluster-id as last two columns:
 #'                              Sequence: second last column; Cluster ID: last column
 #' @param prefix <string> prefix for filenames