diff --git a/src/bin/kmerclust.R b/src/bin/kmerclust.R
index fdfc4f9ae96bc8aada5c9db70f6efbe7afc52e09..1f8761671f0d3611acab00a1f0d14e54b19d5058 100644
--- a/src/bin/kmerclust.R
+++ b/src/bin/kmerclust.R
@@ -2,5 +2,5 @@ library(kmerclust)
 args <- commandArgs(trailingOnly = TRUE)
 print(args)
 load(file = paste0(args[1], ".Rdata"))
-res <- compare_models(count, nboot = as.numeirc(args[2]) * 2, bootsize = nrow(count), core = as.numeric(args[2]))
+res <- compare_models(count, nboot = as.numeric(args[2]) * 2, bootsize = nrow(count), core = as.numeric(args[2]))
 save(res, file = paste0(args[1], "_boot_", args[3], ".Rdata"))