diff --git a/R/detect_cpts.R b/R/detect_cpts.R
index f07a2c249bdfd739cb2bef47f6a539983a490b76..e7e042e12db2b775f64b3a731823b75cccff9b9c 100644
--- a/R/detect_cpts.R
+++ b/R/detect_cpts.R
@@ -32,7 +32,7 @@ detect_cpts <- function(lr, file_name = NULL, chromosome = NULL,
 
   # Set NULL variables
 
-  chromosome <- file_name <- position <- lr_sub <- NULL
+  # chromosome <- file_name <- position <- lr_sub <- NULL
 
   # Extract list of samples